mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: [forse OT] [delphi] api per leggere ups

ciao a tutti, ho cercato invano ma non ho trovato nulla nei vari forum, sdk 
ecc... qualcuno di voi ha avuto esperienza di interfacciamento tra delphi e 
i gruppi di continuitą... ho visto che tutti lavorano su com o su usb, perņ 
non riesco a trovare che standard utilizzano per comunicare... avrei 
semplicemente bisogno di verificare lo stato della batteria e se cč corrente
Simone 

 semplicemente bisogno di verificare lo stato della batteria e se cè corrente
Da quello che ricordo della documentazione del mio ups, gloriosamente
immolatosi per salvarmi il pc da un fulmine, esso usava comunicare
attraverso la seriale. 
Lato delphi, quindi, ti basterebbe installare un componente che comunichi
con le porte del pc (suggerisco async pro di turbopower, cerca su
sourceforge). Non ricordo il protocollo implementato dagli UPS, ma nella
documentazione del tuo ci deve essere tutto il necessario per capirlo.
Ciao
-- 
Morde

 documentazione del tuo ci deve essere tutto il necessario per capirlo.
Guarda cosa ho trovato su google, nonostante il basso stipendio che mi
danno per pubblicizzarlo...
http://www.networkupstools.org/
-- 
Morde

 
http://www.networkupstools.org/
Tzč, pivello. Te l'avevamo detto di barrare la casella "moderatore di
newsgroup" sul modulo d'assunzione!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 newsgroup" sul modulo d'assunzione!
Per favore, sei OT.

grazie x il sito
Simone

Newsgroup: it.comp.lang.delphi
Titolo: possibile inserire "plug-in" all'interno di un eseguibile ?

mi spiego meglio:
ho il mio programma che effettua delle modifiche in alcuni file ben
definiti (un editor insomma)
queste modifiche sono "lecite" ...
vorrei lasciare la possibilità ad altri di creare dei tool per
eseguire altri tipi di modifica (meno lecite) sempre negli stessi file
sui quali lavora il mio programma
dunque il mio programma è strutturato con i frame
sarebbe possibile lasciare dei frame in bianco da usare e/o lasciare
possibilità di aprire degli eseguibili all'interno di una directory
predefinita e/o ... come si può fare ... se è possibile ?
sarebbe anche possibile utilizzare le routine di lettura scrittura
presenti nel mio programma ? (piuttosto che fare due volte le stesse
cose)
sarebbe molto gradito (se possibile) un piccolo esempio pratico di
codice

 ha scritto nel messaggio
news:1172146942....@h3g2000cwc.googlegroups.com...

Newsgroup: it.comp.lang.delphi
Titolo: Ancora Batch Build...

Me lo sono sempre chiesto:
E' possibile in Delphi 7 realizzare un batch che compili diversi
progetti specificando quali BPL devono essere
linkate? (runtime packages)
JH

linkate? (runtime packages)
Sě. Usi DCC32 e passi gli opportuni parametri sulla riga comando. Usando 
opportunamente le variabili di ambiente puoi fare un batch che non usa 
path fissi.
--- posted by geoForum on 
http://www.delphiedintorni.it

 path fissi.
Qualche esempio? Settimana scorsa cercarva proprio questo feed da qualcuno
del ng..
ciao
-- 
Morde

>Qualche esempio? Settimana scorsa cercarva proprio questo feed da 
Questo ad esempio č il file batch che compila le Indy per D7:
@echo off
if (%1)==() goto test_command
if (%1)==(start) goto start
goto endok
:test_command
if (%COMSPEC%)==() goto no_command
%COMSPEC% /E:9217 /C %0 start %1 %2 %3
goto endok
:no_command
echo No Command Interpreter found
goto endok
:start
call clean.bat
computil SetupD7
if exist setenv.bat call setenv.bat
if not exist ..\D7\*.* md ..\D7 >nul
if exist ..\D7\*.* call clean.bat ..\D7\
if (%NDD7%)==() goto enderror
if (%NDWINSYS%)==() goto enderror
REM ***************************************************
REM Compile Runtime Package Indy70
REM ***************************************************
REM IdCompressionIntercept.pas has to be compiled separately from Indy70 
because of a DCC32 bug.  The bug
REM also appears when doing a full build.
%NDD7%\bin\dcc32.exe 
IdCompressionIntercept.pas /Oobjs /m /h /w /N..\D7 /LE..\D7 /LN..\D7 -$d-
l-n+p+r-s-t-w- %2 %3 %4
%NDD7%\bin\dcc32.exe 
Indy70.dpk /Oobjs /m /h /w /N..\D7 /LE..\D7 /LN..\D7 -$d-l-n+p+r-s-t-w- %
2 %3 %4
if errorlevel 1 goto enderror
copy ..\D7\Indy70.bpl %NDWINSYS% >nul
REM ***************************************************
REM Compile Design-time Package dclIndy70
REM ***************************************************
%NDD7%\bin\dcc32.exe 
dclIndy70.dpk /Oobjs /m /h /w /N..\D7 /LE..\D7 /LN..\D7 /L..\D7
\Indy70.dcp /U..\D7 -$d-l-n+p+r-s-t-w- %2 %3 %4
if errorlevel 1 goto enderror
REM ***************************************************
REM Clean-up
REM ***************************************************
del ..\D7\dclIndy70.dcu >nul
del ..\D7\dclIndy70.dcp >nul
del ..\D7\Indy70.dcu >nul
del ..\D7\Indy70.bpl >nul
del ..\D7\IdAbout.dcu >nul
del ..\D7\IdDsnPropEdBinding.dcu >nul
del ..\D7\IdDsnRegister.dcu >nul
del ..\D7\IdRegister.dcu >nul
goto endok
:enderror
call clean
echo Error!
:endok


Newsgroup: it.comp.lang.delphi
Titolo: Delphi 2007 e database SQL Server

Devo realizzare un'applicazione in Delphi 2007 con collegamenti a
database in SQL Server.
Quali componenti mi consigliate di utilizzare ?
Ho visto in rete componenti NON free . Che differenza hanno con quelli
disponibili in Delphi ?
Grazie
Alberto

ado.
A.
Newsgroup: it.comp.lang.delphi
Titolo: Tempo...

Come faccio a fare in modo che il mio programma faccia una cosa ogni 30
minuti?
Grazie!
CIAO!


Usa un TTimer (che non arriva a 30 minuti, ma che puoi comunque usare come
tick) oppure intercetta l'evento applicazione AppIdle se quello che devi
eseguire non pretende una precisione assoluta (cioe' se ti va bene che
capiti anche dopo 30 minuti e 2 secondi, ad esempio)
Ciao,
Stefano
Newsgroup: it.comp.lang.delphi
Titolo: stampare piu immagini tif contemporaneamente

Salve a tutti ,
Il mio problema è questo:
volevo chiedere se è possibile stampare in qualche modo un certo numero di
immagini in formato tif contemporaneamente in un unico spool di stampa.

"Marc" ha scritto nel messaggio

Non credi di pretendere un po' troppo dai poteri paranormali delle
persone che frequentano questo gruppo? Non credi che sia piu' semplice
ottenere una risposta spiegando in quale contesto hai questa 
necessita',
che tools di report usi per la stampa (se ne usi uno, altrimenti
quali altri sistemi usi per stampare), quale versione di Delphi usi,
se utilizzi qualche componente particolare, su quale sistema operativo
stai sviluppando e su quale sistema operativo tu vuoi
che funzioni quello che chiedi, ecc... ecc...?
Comunque, il termine "spool" e  il termine "contemporaneamente"
sono in contraddizione: spiega meglio e piu' diffusamente cosa hai 
bisogno.
Ciao.
-- 
ACSH
[D4]
Chi fa da se', fatica il doppio


questo è un ng di sviluppatori delphi.
Mi spieghi la relazione esistente tra questo tuo post e delphi?
-- 
Alberto Salvati
A NEAPOLITAN Delphi Developer who is studying c# and .net
"Dicette 'o pappece 'nfaccia 'a noce dammi 'o tiempo che pure te spertoso"

 ha scritto nel messaggio
news:dc3j5d$h1l$1...@newsreader1.mclink.it...


mi sfugge la differenza tra leggere e stampare un tif alla volta e 
"fonderli" in un solo tif multipagina e mandare quello in stampa.
Nel primo caso hai n job "piccoli" di stampa nello spool, nel secondo 
caso ne hai uno solo che potrebbe essere bello grosso...


 "fonderli" in un solo tif multipagina e mandare quello in stampa.
Le immagini da stampare devono essere stampate in formato pdf. Tutte le
immagini devono essere contenute in un unico file pdf, perciň devo stamparle
contemporaneamente
Ciao

Allora crei un tif multipagina, ci metti dentro i files e poi dirotti
la stampa.
Gli activex kodak sono documentati.
AS
Newsgroup: it.comp.lang.delphi
Titolo: Nuovo componente e tbutton

Ciao a tutti,
   sto cercando di creare un nuovo componente al cui interno dovrei mettere 
3 bottoni.
Il nuovo componente discende da TCustomControl e per adesso non e' altro che 
un rettangolo.
Ora dovrei inserire questi bottoni e la via e' quella di andare a disegnarli 
uno alla volta dove servono nella procedura Paint.
A questo proposito visto che ci sono i TButton gia' fatti ..... e' possibile 
andare ad inserirli ???? evitando di ridisegnarli ???
Grazie per le risposte
Ciao
Daniele 
__________ Information from ESET NOD32 Antivirus, version of virus signature database 4339 (20090816) __________
The message was checked by ESET NOD32 Antivirus.
http://www.eset.com

 andare ad inserirli ???? evitando di ridisegnarli ???
Se creassi un nuovo tframe? E utilizzassi quello?
-- 
Morde

Morde ha scritto:

Altra idea, un Tpanel 3 Tbutton e una Unit per il codice condiviso ?
Anche se l'idea del frame non ï¿œ male :)
^_Goblin_^

 Anche se l'idea del frame non ï¿œ male :)
Era perchï¿œ io l'ho utilizzata per farmi un componentino che contenesse 
un grafico per poterlo manipolare.
Avevo creato un nuovo componente con ancestor il tframe.
Ecco uno snippet dell'interface dal componente
[SNIP]
type
    TLabEnvironment = ( leMETA, leLBSS, leWNST, leNTLB, leSTDA, leDNA, 
leWNST_SA, leMETA_SA );
    TGraficoEleForesi = class( TFrame )
        Graph: TChart;
        Series1: TLineSeries;
        TeeFunction1: TAddTeeFunction;
        Series2: TLineSeries;
    private
[/SNIP]
come vedi il tframe si adatta per questi tipi di utilizzo dove devi 
raggruppare dei controlli e dargli un comportmaento particolare.
Ciao
-- 
Morde

 Se creassi un nuovo tframe? E utilizzassi quello?
A dire il vero non lo avevo considerato ....
In effetti e' la soluzione giusta ......
Grazie ancora !!!!
Ciao
Daniele
__________ Information from ESET NOD32 Antivirus, version of virus signature database 4343 (20090817) __________

Newsgroup: it.comp.lang.delphi
Titolo: [OT] scherzetto per gli utenti

Facciamo un pulsantino che scappa dal mouse :D
procedure TForm1.Button1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
 with Button1 do repeat
  left:=left+width-random(width*2);
  top:=top+height-random(height*2);
 until (left>x) and (top>y);
end;
Ciao, Sandro


E il gioco consiste nel capire che invece che inseguire il pulsante 
bisogna premere TAB per selezionarlo e INVIO per cliccarlo? ;)
Ciao,
   Luca
-- 
Linux registered user #291568 (
http://counter.li.org/
)
Electronic Frontier Foundation Member (
http://www.eff.org/
)
Mandrake Club Member (
http://www.mandrakeclub.com/
)

 bisogna premere TAB per selezionarlo e INVIO per cliccarlo? ;)
era sottinteso che Button1.TabStop:=false :) cosi' l'utente non riuscira' a
focalizzare mai il pulsante ne' tantomeno a premerlo ;)
Ciao, Sandro

> Facciamo un pulsantino che scappa dal mouse :D
..oppure facciamo qualcosa di più divertente ... del tipo :
facciamo sparire il pulsante start di windows !!!!
(Peccato funzioni solo sotto win9x!!!)
Zano

 (Peccato funzioni solo sotto win9x!!!)
e' anche molto semplice e carino fare uno screenshot del desktop (pulsante
Stamp), salvarlo, e metterlo come sfondo dello stesso desktop. Al primo
spostamento di una qualunque delle icone, il povero utente vedra' l'icona
"sotto" ma pensera' di vederci doppio, ci clicchera' sopra cercando di
spostarla, e ovviamente non riuscira' a farci nulla. La telefonata
all'assistenza (con relativo addebito al cliente) e' garantita! :DDD
Ciao, Sandro
Newsgroup: it.comp.lang.delphi
Titolo: vcl50.bpl

 
Buongiorno a tutti,
 
ho un vecchio programma in D5, che sul pc dove viene
compilato "gira" tranquillamente, seu qualsiasi altro pc
WinXP, mi da l'errore 
"Exception eolesyserror in module vcl50.bpl.Interfaccia non
registrata"
 
qualcuno potrebbe spiegarmi da cosa è dovuto???
 
 
Grazie mille per l'aiuto.
 
 
 
 
-- 
----------
Messaggio postato da Common Forum (HTML Forum e Newsgroups Usenet)
http://www.common.it
 
 
Il portale delle offerte di lavoro AS400
http://www.jobforblues.it
 
 
 
Il portale degli incarichi professionali AS400
http://www.taskforblues.it
 

 registrata"
 
Mamma mia quanto ci fai tornare indietro con la memoria! :)
 
Se non ricordo male un possibile errore e' che la midas.dll non e'
registrata. Nelle versioni successive lo fa da sola, ma in D5 devi
farlo manualmente usando regsvr32
 
ciao
Giacomo
 

 registrata"
 
Tu sai che tipo di errore è, questo?
 
A.

Newsgroup: it.comp.lang.delphi
Titolo: Stampa Etichette ?

Ciao a tutti!
Dovrei stampare dal un mio software delle etichette di indirizzi. Esiste
qualche report/pacchetto/altra cosa che contenga i modelli delle etichette
Avery?
Voi come fate?
Grazie in anticipo, Chris

io me li sono precaricati e disegno sul canvas della stampante, con non poca
fatica:))
ma le mie etik sono molto complesse... immagini.. etc....

il software avery se non vado errato ha il supporto di OLE automation..
Bye
A.

GmPrintSuite Professional ha dei componenti già pronti per l'utilizzo delle
etichette Avery ( 
http://www.murtsoft.co.uk/index.html
 ).
C'è però da spendere per l'acquisto della licenza.
Ciao,
MM



Io mi sono fatto un mio programma. I dati dell'indirizzo e destinatario li
pesca da un DB remoto e poi stampo tramite il canvas dell'oggetto
TPrinter. Disegno i bordi e scrivo il testo dove voglio e come voglio. Può
sembrare un po' complicato all'inizio ma in realtà è molto semplice, veloce
e flessibile.

...

io uso fuzzyReport e, basta capire come funziona, fa quello che serve.
ciao
Newsgroup: it.comp.lang.delphi
Titolo: modifica di proprietà a run-time

Salve a tutti.
Ho una form che può avere due diverse larghezze, a seconda che l'utente
voglia visualizzare o meno certi dati. L'operazione è compiuta premendo su
un pulsante: se la form è stretta, la allarga; se è larga, la restringe.
Ora, capita che all'avvio la larghezza sia quella che ho stabilito durante
la progettazione (form stretta), ma vorrei che, se l'utente conclude il
programma con la form larga, gli si riapra così all'avvio successivo, come
se fosse entrato nel codice per modificarlo.
La domanda fatidica è: come diamine si fa?
Ringrazio per le eventuali risposte.
Riccardo

 La domanda fatidica č: come diamine si fa?
Su 
torry.net
 trovi molti componenti che fanno persistere lo stato della form
su disco.
Saluti.


Volo! Grazie
Riccardo

 Riccardo
Ciao, Antņ.


Proverò a guardare, grazie. Francamente preferisco così. Ho visto che su
torry i componenti si acquistano, e per la mia cultura informatica è meglio
imparare che comprare (pochi soldi, già!).
Riccardo

 torry i componenti si acquistano,
[cut]
Quarda meglio, su torry ci sono circa 6500 componenti di circa la metà
gratuiti.


Riccardo su torry devi cercare i componenti con la dicitura FWS, ossia
freeware with source. Oltre alla gratuita' del componente puoi studiarti i
sorgenti e imparare molte cose.
Potresti salvare lo stato della form su un file INI, o su registro.
I componenti gia' pronti su torry faranno le stesse cose (credo :-))
Ciao
MOrde
--------------------------------
Inviato via 
http://usenet.libero.it

 Inviato via 
http://usenet.libero.it
Urca, mi sa che l'ora tarda mi ha ottenebrato le pupille, guarderň meglio e
intanto proverň anche a fare qualche prova.
Grazie a tutti.
Riccardo
Newsgroup: it.comp.lang.delphi
Titolo: Documentazione programmi Delphi e Database

Buon giornoIncomincio a sentire la necessità di documentare in modo
"professionale" i programmi in delphi che sviluppo.
Intendo documentare funzioni e funzionalità di Forms, Datamodule, Unit , le
procedure contenute, la loro funzione, il database e le relative tabelle
ecc. e non solo una documentazione generica.
Qualcuno sa aiutarmi indicadomi un sito che mi dia 2 dritte ?
O meglio esiste un tool (freeware / opensource) che mi possa aiutare.
Grazie a tutti.
Guido

Guido B. Rocca wrote:

Freeware ne conosco due: DelphiCodeToDoc è un prodotto interessante ma
manca ancora del parsing per alcuni tag Javadoc e non documenta le
proprietà correttamente.
L'altro è Pas2Dox, scaricabile da SourceForge, il quale è un filtro per
DoxyGen (per cui devi scaricare pure quest'ultimo). Io sto usando
principalmente DoxyGen e Pas2Dox anche se ovviamente la sintassi
generata nell'help non è quella tipica di Delphi; contemporaneamente
tengo d'occhio anche l'altro.
Pas2Dox ha un paio di bachi. 
1. Inserisce nella documentazione dei tag strani (tipo ___pad0____)
qualora tu inserissi del codice nella Initialization section
2. Non documenta correttamente le proprietà ma c'è un workaround,
ovvero far seguire da un . il tag di apertura della documentazione.
Qualcosa del genere: {*. Documentazione della proprietà}
Una limitazione a cui non sono riuscito ad ovviare con Pas2Dox è il tag
{@link } per il fatto che ci sono parentesi graffe aperte all'interno
di altre parentesi graffe. Per adeso rimedio con il tag @see. Se
qualcuno sa come risolvere l'inconveniente magari ci può aiutare.
Ciao
Antonio

Antonio
	Ciao
	MassimoB
 
---------------------------
http://www.massimobeschi.it/

 versione 1.0.
per quanto riguarda Pas2Dox è abbastanza stabile anche se non privo di
workaround da trovare ;). Ad uno di quelli che segnalavo è stata
trovata la soluzione dallo sviluppatore, anche se è solo una pezza e
definisce l'impossibilità dello sviluppatore di continuare a lavorare
sul codice sorgente:
http://sourceforge.net/forum/forum.php?thread_id=1200725&forum_id=185964
Se qualcun altro conosce altri strumenti di helping freeware si faccia
avanti ;)
Ciao
Antonio

...
Sorry, i'm not speaking italian, but if you have some new features you
want added in DelphiCodeToDoc or things fixed, just send me an email,
I will see what I can do.
TridenT
http://dephicodetodoc.sourceforge.net/

Newsgroup: it.comp.lang.delphi
Titolo: Lazarus: elemento selezionato su ListView

scusate se posto qui ma ancora non ho capito come raggiungere il
gruppo Lazarus.
Il mio quesito riguarda Lazarus e le ListView.
Come faccio a capire se è stato selezionato un elemento o no?
Cosa equivale al ListView.ItemIndex?
Aiutatemi per piacere.
Giovanni

Ho trovato questa soluzione:
if listview1.SelCount > 0 then indice := listview1.selected.index
Mi sembra funzionare bene.  E' corretto?

SelCount ti da il numero di elementi selezionati (possono essere piu' di 
uno se Multiselect e' posta a true), mentre Selected ti ritorna TRUE se 
un elemento e' selezionato.
Esempiuccio 1....
For I := 0 To Lista.Items.Count-1 Do
   If Lista.Selected[I]
   Then
     Caption := 'Elemento '+IntToStr(I)+' selezionato'
Esempiuccio 2....
If Lista.SelCount > 0
Then
   Caption := 'Ci sono '+IntToStr(Lista.SelCount)+' elementi selezionati'
Else
   Caption := 'Non ci sono elementi selezionati';
Poi, per il gruppo Lazarus devi sottoscrivere il gruppo 
it-alt.comp.lang.lazarus
Bye

Grazie,
quindi senza la Multiselect posso tranquillamente usare
       if listview1.SelCount = 1 then indice :=
listview1.selected.index
per trovare l'indice dell'elemento selezionato.

in teoria si ma, personalmente, non mi sono mai fidato (problemi con le 
vecchie versioni delphi)

scusa ancora ma  > it-alt.comp.lang.lazarus < Google Gruppi mi dice
che non esiste.

 
Nei gruppi di google non c'e', puoi trovare comp.lang.lazarus in lingua 
inglese. Personalmente uso 
nnrp-beta.newsland.it
 e li' c'e'.

Se multiselect e' false Itemindex lavora egregiamente

 Google Gruppi
Purtroppo BigG non veicola la gerarchia it-alt in quanto priva di 
gestione.
Ciao
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: [DB] Alias

Come si creano alias BDE via codice ?
--
 _______________________________________
        Gnaffy SoftWare
   web: 
http://gnaffy.tripod.com/
   e-mail: Gna...@Wappi.com
   e-mail: 
bmq...@tin.it
   ICQ#: 76488613
 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

 ha scritto nel messaggio
news:fcsX5.2519$D8.6...@twister2.tin.it...

Non mi ricordo molto bene ma dai un occhiata al componente TSession,
dovrebbe essere lui a gestire gli Alias.
Ciao
Davide Carrara

 dovrebbe essere lui a gestire gli Alias.
si, l'ho già guardato, ma è che proprio non mi ricordo come si faceva


 --
Puoi usare una procedura tipo questa, che crea un alias per una tabella di
Access:
procedure creaAlias(const dbName:string);
var
  aliases,parametri:TStringList;
begin
  aliases:=TStringList.create;
  session.GetAliasNames(aliases);
  if aliases.indexOf('nomeAlias')<>-1 then
    session.DeleteAlias('nomeAlias);
  parametri:=TStringList.create;
  with parametri do begin
    Add('TYPE=MSACCESS');
    Add('DATABASE NAME='+dbName);
    Add('OPEN MODE=READ/WRITE');
  end;
  try
    session.AddAlias('nomeAlias','MSACCESS',parametri);
  except
    on e:EDBEngineError do begin
      screen.cursor:=crDefault;
      messageDlg(e.message,mtWarning,[mbOk],0);
    end;
  end;
  parametri.Free;
  aliases.Free;
end;
se l'alias è per una tabella paradox c'è la versione "semplice":
procedure AddStandardAlias(const Name, Path, DefaultDriver: string);
per il funzionamento guarda l'help di Delphi.
Ciao
Ruggero

perfetto. grazie.


Newsgroup: it.comp.lang.delphi
Titolo: PROGETTO DELPHI4

Salve  mi sono imbattuto in una ditta che ha un applicazione
sviluppata in Delphi 4 con i componenti TRemote Server e con struttura
3 Tier. L'applicazione attualmente non e' utilizzata e non e'
funzionante in quanto il programmatore che l'ha sviluppata si e' reso
irreperibile. La ditta in questione e' nella zona di Cremona. Sono in
possesso dei sorgenti che la ditta mi ha lasciato copiare nella
speranza che ci potesse essere un subentro nel progetto. Qualcuno ha
informazioni o potrebbe essere interessato ? Grazie

qdavid ha scritto:

Ciao
io sarei interessato...
puoi scrivermi a lorisferro at alice punto it
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

qdavid ha scritto:

Ciao


 irreperibile.
..ed ha fatto bene !

 informazioni o potrebbe essere interessato ? Grazie
Qual'è di preciso la tua necessità: trovare un manutentore del software 
così com'è scritto in D4, che lo riattivi? Trovare qualcuno che ne 
faccia il reverse engineering e lo riscriva?
Non è detto che recuperare il software così com'è per non perdere 
l'investimento sia più redditizio che rifarlo da zero con una 
tecnologia diversa e attuale.
Ciao
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: Indici e SQL7

Ho questo problema:
Ho un DB Grid collegato (a runtime) con una tabella SQL Server 7: tale
tabella
ha due indici, PKTab, Tab1. Ora: vorrei poter ordinare la grid secondo
uno 
o l'altro indice senza utilizzare una Query, ma sfruttando la proprietà
IndexName della TTABLE. In Paradox ci riesco, con SQL7 no: non è che con 
SQL non si possono utilizzare gli indici espliciti ? (Sigh!!!!!!)
Grazie in anticipo
Maurizio

Maurizio Lugoboni

non uso SQL 7 ma hai provato a vedere gli indici che ti propone delphi?
...quelli che ti (dovrebbero) uscite a design time se quardi la proprietà
IndexName?
(probabilmente sbagli solo il nome dell'indice, credo...)
ad es. in InterBase se non dai un nome specifico ad un indice
gli assegna un nome lui tipo RDB$PRIMARY1, ecc...
(oppure usa IndexFieldName...)
Spero di esserti stato d'aiuto!
Ciao!
Alan Solo

Newsgroup: it.comp.lang.delphi
Titolo: Da C a Delphi

devo tradurre una funzione dal C al delphi e non sono sicuro di averla
tradotta giusta :
dal C
-----
srand(1234)  ---- è come usare randomize ? e perchè c'è un valore (1234) ?
a=rand()/valore+a ----- la funzione rand restituirà un valore tra 0 e 1 o
tra 0 e 1234 ?
in delphi equivarrebbe a fare :
randomize;
random(1234);
Aiuto grazie
Stefano Tampieri

 random(1234);
No dovrebbe corrispondere a:
Randomize;    // in delphi non si puo' dare il seme
a:=(random(1000)/1000) / valore +a;
In delphi Random(x) restituisce un valore tra 0 e x-1, quindi con
random(1000)/1000
ottieni un reale tra 0 e 1.
Se ho detto cacchiate perdonatemi (e correggetemi) :-)

Un valore con la virgola tra 0 e 1, se ricordo bene.
No, rand() restituisce un valore tra 0 e RAND_MAX (che e'
#definita in stdlib.h).
--
Andrea Laforgia (mica uno qualunque...)

On Sun, 02 Sep 2001 23:47:23 GMT, 
walkie...@libero.it
 
(Andrea Laforgia) wrote:
..ops... scusate:
In C si scriverebbe come :
<CODE>
#include <stdlib.h>
#include <time.h>
void Randomize( void )
{
     srand(time(0));
}
</CODE>


 ha scritto nel messaggio
news:3b92c43...@news.tin.it...


 funzione da C a Delphi
Scavando un po' piu' a fondo, ho scoperto che anche in Delphi si puo'
settare il seme, tramite la variabile di sistema RandSeed.
Randomize altro non fa che settare un valore in base al clock di sistema
(quindi abbastanza casuale) sulla variabile Randseed appunto.
Mi scuso per l'errore con rand :)
Quindi la traduzione finale sarebbe:
RandSeed:=1234;
a=Random(RAND_MAX) div valore + a;
ovviamente devi ricopiarti RAND_MAX da stdlib.h.
Ciao !
Newsgroup: it.comp.lang.delphi
Titolo: PackTable  delle tabelle. Necessario ?

Se ho un'applicazione che utilizza tabelle Paradox e' necessario fare il 
Pack delle tabelle?
Che vantaggi da ?
Quale altro dataBase non richiede questa funzione ?
Grazie!
procedure TForm1.PackTable(Table: TTable);
var Props: CURProps;
var hDb: hDBIDb;
var TableDesc: CRTblDesc;
begin
Table.Close;
Table.Exclusive:= True;
Table.Open;
if not Table.Active then
raise EDatabaseError.Create('Cannot pack a closed table.');
if not Table.Exclusive then
raise EDatabaseError.Create('Cannot pack a non-exclusive table.');
Check(DbiGetCursorProps(Table.Handle, Props));
if (Props.szTableType = szPARADOX) then
  begin
  FillChar(TableDesc, sizeof(TableDesc), 0);
  Check(DbiGetObjFromObj(hDBIObj(Table.Handle), objDATABASE, hDBIObj
(hDb)));
  StrPCopy(TableDesc.szTblName, Table.TableName);
  StrPCopy(TableDesc.szTblType, Props.szTableType);
  TableDesc.bPack := True;
  Table.Close;
  Check(DbiDoRestructure(hDb, 1, @TableDesc, nil, nil, nil, False));
  end
else
  if (Props.szTableType = szDBASE) then
  Check(DbiPackTable(Table.DBHandle, Table.Handle, nil, szDBASE, True))
  else
  raise EDatabaseError.Create('Table format unknown.');
Table.Exclusive:= False;
end;
Diego22
--- posted by geoForum on 
http://www.delphiedintorni.it

 Quale altro dataBase non richiede questa funzione ?
tutti i db prevedono qualcosa di simile.
La differenza è che sui dbf ragioni in termini di records, mentre sui
db client/server si ragiona in termini di spazio allocato sui files del
database stesso.
AS


Il record viene solo segnato come "cancellato" ma resta fisicamente al
suo posto.
L'iserimento di un nuovo record sovrascrive su una posizione segnata 
come "cancellata"? Oppure viene inserito un nuovo spazio fisico e rimane 
il record segnato come cancellato?


su paradox non so.
sui dbf accoda e non sostituisce un record cancellato con uno nuovo.
Da qui la necessità del pack sopratutto se il dbf è oggetto di
numerose operazioni di cancellazione.
Nota: io paradox lo eviterei, se possibile.
AS
Newsgroup: it.comp.lang.delphi
Titolo: Errore provider in database access

Ciao,
qualcuno mi sa spiegare che cosa genera questo errore (e ovviamente come
porre rimedio)in una query (Delete) in un database access usando
jet.oledb.4.0 ?
"Il provider corrente non supporta la restituzione di set di record multipli
da un'unica esecuzione" ?????
Grazie.

Hai forse fatto più delete sullo stesso comando?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:9769d250cfb177f4b61...@mygate.mailgate.org...


 ha scritto nel messaggio
news:3%Wib.35471$vO5.1...@twister1.libero.it...

Certi DELETE con subquery hanno un bug con alcune versioni di Jet (non
riesco a trovare il riferimento preciso però), prova  a mettere il SP7 da
www.microsoft.com/data/

 multipli da un'unica esecuzione" ?????
... non è che chiami il metodo Open della TQuery invece che ExecSQL?
        Marco Bortolani
 
infoN...@marcobortolani.it

Assolutamente no, al primo tentativo mi da' errore...
Questo errore e' tanto comune quanto insidioso: probabilmente hai usato una
adoquery per effettuare una DELETE via sql.
Il problema e' che la adoquery, per come e' concepita, dopo aver eseguito il
codice sql si aspetta che il provider gli ritorni un dataset. Ma questo non
avviene in caso di delete. Ecco perche' il componente solleva l'errore.
Prova a utilizzare l'adocommand con il metodo execute.
In ogni caso, posta il codice incriminato, ci agevole nell'aiutarti :)
-- 
Morde. 
(morde at programmer dot net)

riesco a trovare il riferimento preciso però), 
Riusciresti ad essere piu' preciso? Parli di subquery specificamente, oppure
e' piu' generalizzato?


 ha scritto nel messaggio
news:ym4jb.285152$R32.9...@news2.tin.it...


 e' piu' generalizzato?
Credo qualcosa con WHERE IN / WHERE NOT IN ma non ho più la query che dava
problemi e non riesco più a individuare l'articolo sulla knowledge base di
microsoft..

Newsgroup: it.comp.lang.delphi
Titolo: I Frame di Delphi 5 sono una figata !

Delphi 5 Rulezzzz
Paolo Zavarise
paoz...@tin.it


paoz...@tin.it
perchè che fanno di particolare?
io ho ancora d4
Kirys
--------------------------------------------------
Brayan Fix Kirys Solfory
E-Mail: 
Ki...@technologist.com
 
For Free Software go to: 
http://Kiryssoft.cjb.net
Newsgroup: it.comp.lang.delphi
Titolo: Tradurre un testo su TImage in una sequenza di "lineto()"

Ciao,
sto cercando di realizzare un software per tradurre un disegno in una sequenza di tratti (lineto()).
Per il disegno a mano libera non ci sono problemi, intercetto il mousemove e realizzo i tratti registrandone al contempo le coordinate su una lista da esportare.
 
Vorrei però aggiungere una funzionalità: la scrittura di testi sul disegno.
Ammesso che ci riesca (sto scrivendo il software) dovrò poi trovare un algoritmo per tradurre le scritte in sequenze di "lineto()".
 
Le sequenze di tratti che vado a rilevare devo poi spedirle ad un altra macchina che deve essere in grado di riprodurle.
 
Qualcuno ha delle idee per trovare come rilevare da un disegno la sequenza dei tratti necessari a riprodurlo ?
 
Grazie anticipato a tutti.

 sto cercando di realizzare un software per tradurre un disegno in una sequenza di tratti (lineto()). 
 
Cioe` stai cercando di derivare una struttura vettoriale da un disegno statico? Ti rendi conto che e` un'impresa titanica, e che in molti casi genererebbe tanti di quei "lineto()" da essere equivalenti al numero di pixel dell'immagine? Ma a che ti serve una cosa del genere?
 
 


L'idea è di creare una interfaccia per un robot che dovrebbe poi riprodurre il disegno su una superficie adatta...
Non è che si debba necessariamente seguire la mia idea, se esistesse qualcosa (librerie, ecc.) che svolgono una funzione simile mi posso tranquillamente appoggiare a queste.
 
La parte a "mano libera" non è complicata, in pratica si tratta di registrare i tratti che sto comunque registrando, l'inserimento di elementi già "costruiti" (vedi i font) sarebbe una opzione interessante per il progetto.
 
So che quasi tutti i sistemi robotici hanno la possibilità di ricevere dei file tipo CAD, ma volevo cercare di evitare una interfaccia troppo complessa.

 So che quasi tutti i sistemi robotici hanno la possibilità di ricevere dei file tipo CAD, ma volevo cercare di evitare una interfaccia troppo complessa.
 
Magari con questo ti semplifichi la vita:
 
http://it.cadsofttools.com/products/cad-vcl-enterprise/
 
 
A.


Cosa dirti ? iIntanto grazie, faccio qualche verifica sui link suggeriti...

 
https://en.wikipedia.org/wiki/Comparison_of_raster-to-vector_conversion_software
 
 
Una conversione come quella di VectorMagic e` abbastanza semplice da fare (io l'ho implementata). Il problema e` che se cerchi di applicarla ai font, che hanno livelli di dettaglio molto alti, viene fuori una schifezza.
Newsgroup: it.comp.lang.delphi
Titolo: [OT] SQL...una query un po strana...

Salve a tutti, Ho tre tabelle dove con & indico un campo chiave e con && 
indico le foreign key :
TCliente(&IdCliente, Nome,Cognome);
TAcconto(&IdAcconto,DataAcconto,ImportoAcconto);
TAccontoCli(&&IdCliente,&&IdAcconto);
TCliente e TAccontoCli stanno in relazione 1 a molti...
Ora mi servirebbe selezionare la somma degli IMPORTOACCONTO per ogni 
cliente, anche quando il cliente non ha acconti...( ovvero vorrei ottenere 
somma nulla ) ed è proprio quest'ultima richiesta che mi mette in 
difficolta...
ho provato in diversi modi ma nulla riesco a selezionare solo le somme di 
IMPORTOACCONTO in cui esistono acconti per il cliente...
Saluti,
Antonio. 


Ciao, 
dovrebbe essere sufficiente la left join, cioč:
SELECT A.NOME, A.COGNOME, SUM(C.IMPORTOACCONTO) FROM TCLIENTE A
LEFT JOIN TACCONTOCLI B
ON B.IDCLIENTE = A.IDCLIENTE
LEFT JOIN TACCONTO C
ON C.IDACCONTO = B.IDACCONTO
Dovresti ottenere delle somme nulle per i clienti che non hanno nessun
acconto.
Ciao
Cristiano
--- posted by geoForum on 
http://www.delphiedintorni.it


Questa non solo non fa cio' che dici, ma è pure organizzata male a livello
di join. La soluzione è con left OUTER join e con una condizione sulla 
somma.
basta chiedere a zio MSDN :-)
-- 
______________________
Gaetano
"Nel coltellino svizzero di Chuck Norris c'è McGyver" 


Hai ragione... 
Pardon... 
mi sono scordato la group by... ops... 
rifaccio:
SELECT A.NOME, A.COGNOME, SUM(C.IMPORTOACCONTO) FROM TCLIENTE A
LEFT JOIN TACCONTOCLI B
ON B.IDCLIENTE = A.IDCLIENTE
LEFT JOIN TACCONTO C
ON C.IDACCONTO = B.IDACCONTO
GROUP BY A.NOME, A.COGNOME
Scusate... ma era presto ed il sonno incombeva...
Ps. Ma quale DB č?!? Firebird? Interbase? SQL Server?



Grazie mille, č lei...infatti la sbagliavo anche io...

Newsgroup: it.comp.lang.delphi
Titolo: Che sistema per stampe programmabili da utente finale?

Per i classici sistemi gestionali, magazzino, vendite, ecc..  come 
realizzare le stampe dei documenti (tipo ddt, fatture, bilancio, registri 
iva, tanto per capirci) che consentano all'utente finale di modificarli o 
crearne di nuovi?
Usando gli ambienti di sviluppo Microsoft, Crystal Report e' una scelta 
molto frequente
Qual'e' l'equivalente usando Delphi?
Se ce ne fosse piu' d'uno, magari iniziamo dai free e poi vediamo gli altri
Ciao e grazie
RobertoA
 
 

 Qual'e' l'equivalente usando Delphi?
 
 
Se esiste ancora, freereport (google rulez) era agratis.
Poi ci sono FastReport, ReportBuilder e il vecchio QuickReport.
 
A.
 
 

 Qual'e' l'equivalente usando Delphi?
 
 
Se esiste ancora, freereport (google rulez) era agratis.
Poi ci sono FastReport, ReportBuilder e il vecchio QuickReport.
A.
------------------------------------
 
Molte grazie
Sto vedendo le caratteristiche di FastReport
Sembra fare un po' tutto, compreso il designer report a run-time
La professional viene a 300$ e ti danno pure i sorgenti, resta fuori solo la 
possibilita' di visualizzare report via web
Proverei inizialmente la trial di questa, a meno che non ci sia qualcosa di 
migliore a pari costi
Newsgroup: it.comp.lang.delphi
Titolo: Handle di un'applicazione appena eseguita

Volendo eseguire un'applicazione esterna, magari tramite shellexecute,
come è possibile ricavarne l'handle per poi poterla pure chiudere?
---------------------------------------------
Io queste cose tecnologiche non le capisco...
                   Lanciatemi i componenti!

 come è possibile ricavarne l'handle per poi poterla pure chiudere?
se non ricordo male proprio il valore di ritorno di ShellExecute() è
l'handle al modulo.
--
- Carlo -
c.b...@libero.it

come è possibile ricavarne l'handle per poi poterla pure chiudere?
Ce l'hai con ShellExecuteEx o CreateProcess, come handle del
processo.

Newsgroup: it.comp.lang.delphi
Titolo: D7 -  Tools per Generale Report con jpg . Quale?

Quale componente posso usare per generare report con immagini jpg caricate
da campi blob (possibilmente free)?
Grazie
--- posted by geoForum on 
http://www.delphiedintorni.it

 da campi blob (possibilmente free)?
Penso che qualsiasi tool esistente per Delphi sia in grado di soddisfare 
la tua esigenza, da *QuickReport* a *FuzzyReport*, da *ReportBuilder* a 
*RAVE Reports*.
In Delphi 7 hai a disposizione *QuickReport* (da caricare 
manualmente...cerca in questo gruppo come fare) e *RAVE Reports*.
Ciao,
   Marco.
-- 
MARCO «Alka» BREVEGLIERI
   (
http://www.marco.breveglieri.name
)
Leggi le FAQ di ICLD: 
http://icld.altervista.org
Newsgroup: it.comp.lang.delphi
Titolo: Portare in PrimoPaino MDChild attiva

come si fa a portare in primo piano una MDIChild aperta ?
mettiamo di avere un Form MDI FormX e 3 Form MdiChild,
e di avere aperto Chiuld1 e Child3 , per portare in primo piano
la Child1 non trovo il modo di riconoscere il nome.
controllate sotto, e sara' piu' chiaro.
grazie Maurizio
//ActiveMDIChild.Name mi da il nome assegnato al Form
 if ActiveMDIChild<>Nil then
 begin
  if ActiveMDIChild.Name='Form1' then Mesg:='Attivo Form1';
 .....
 end;
// per portare in primo piano il form voluto, controllo se il nome
// e' quello che cerco ... ma la variabile Nome , mi da solo il primo
//carattere .....
procedure TFormX.ToolButton1Click(Sender: TObject);
var I:Byte;
     Nome:String;
begin
 for I:=MDIChildCount-1 downto 0 do
 begin
  Nome:=ActiveMDIChild.Name[I];
  begin
   if ActiveMDIChild.Name='Form3' then MDIChildren[I].ActiveMDIChild;
  end;
 end;
end;

"Maurizio ha scritto :"
in riferimento al mio post precedente ho risolto cosi':
ma non e' che facendo  MDIChildren[I].Show;
avro' una specie di duplicazione del Form e problemi
vari ?.
speravo che MDIChildren[I].ActiveMDIChild;  mi portasse
in primo piano il Form senza ricorrere al Show.
Maurizio
procedure Tfrm_Base.ToolButton1Click(Sender: TObject);
var I:Byte;
    Nome:String;
begin
 for I:=MDIChildCount-1 downto 0 do
 begin
  Nome:=MDIChildren[I].Name;
  begin
   if Nome='frm_AnagraficaCitta' then
   begin
    //MDIChildren[I].ActiveMDIChild;
    MDIChildren[I].Show;
    exit;
   end;
  end;
 end;
end; 

 vari ?.
hai provato con MDIChildren[i].BringToFront ?
-- 
Lis
Il mio sito: 
http://lis.altervista.org
FAQ di it.comp.lang.delphi: 
http://snipurl.com/faq_icld
Entro sei mesi la gente si stancherà di stare a guardare quella scatola di
legno chiamata Tv (D.Zanuck)

Newsgroup: it.comp.lang.delphi
Titolo: combobox

Ciao a tutti. Volevo sapere come si fa per sapere se la porzione di edit di
una combobox è stata modificata. Con edit ad esempio me lo dice la proprietà
edit1.modified con combobox? Grazie anticipato a coloro che mi aiuteranno in
questo problema, ed un saluto a tutta la news.

 ha scritto nel messaggio
news:y2xUb.194472$VW.79...@news3.tin.it...


Puoi usare l'evento OnChange, Giorgio
Non e' sufficiente, perche' io potrei modificare il testo e riscriverlo
uguale, e in quel caso l'evento onchange, pur essendo innescato, non mi
garantisce che i cambiamenti ci siano effettivametne stati.
L'unica strada e' quella di salvarsi in una variabile il vecchio valore e,
all'occorrenza, confrontarlo con l'attuale.
ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 --
Ho usato l'onchange ma č giusto fare cosě? Con un pň di accorgimenti
funziona tutto. Perchč non mi garantisce che i cambiementi ci siano
effettimavamente stati? Grazie dell'aiuto comunque.
Newsgroup: it.comp.lang.delphi
Titolo: dblookupcombobox in dbgrid

ciao a tutti,
come posso visualizzare in un campo di una  dbgrid una dblookupcombobox?
grazie

> come posso visualizzare in un campo di una  dbgrid una dblookupcombobox?
io per fare questo uso la dbgrid della infopower
purtroppo quello che chiedi non è possibile con la dbgrid standard ne con
quella della RX.
Il componente che uso è a pagamento però.
ciao e buon divertimento
Tymba


    Via De Gasperi, 14 - 42019
    Scandiano (Reggio Emilia)

 correttamente le proprietà.
però... questa è interessante. la provo subito.
Tymba

Newsgroup: it.comp.lang.delphi
Titolo: Re: IB Expert e Trim

 versione di prova di IB Expert???
Questa domanda è un po' fuori luogo... ;-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 versione di prova di IB Expert???
Quando i programmi in prova scadono, o si comprano o si smette di usarli.
Gianluca.
Newsgroup: it.comp.lang.delphi
Titolo: delphi 2005 e vecchi componenti

Ciao a tutti, avrei un problema: devo installare dei componenti che ho
usato per sviluppare progetti con delphi 4/5/6, nel nuovo tool di
sviluppo delphi 2005. Diciamo che dei componenti dei quali sono in
possesso dei sorgenti, 'non ci sono grossi problemi'. Ma se ho dei
.bpl iniziano le rogne. Alcuni di questi richiedono l'utilizzo della
libreria vcl40: delphi 2005 non mi fa installare tale libreria perche
questa al suo interno si linka una libreria ToolsApi. Il messaggio di
errore che mi da è il seguente: 'Cannot load package vcl40. It
contains unit ToolsApi, which is also contained in package
designide90'. Come posso fare per installare i componenti che mi danno
questo tipo di problema?
P.S.
sono riuscito ad ovviare allo stesso problema per quei componenti di
cui ho i sorgenti, eliminando dal codice di tale componenti il
riferimento alla vcl40 e sembra che tutto fili liscio.
Grazie in anticipo

 sviluppo delphi 2005. [...]
Con i file BPL potresti avere qualche difficoltà, soprattutto se 
appartengono alla versione Delphi inferiore alla 6, siccome alcuni 
elementi riguardanti la "sfera designtime" dell'ambiente sono stati 
ridisposti in modo più congeniale.
Se invece hai a disposizione il sorgente, che funzionava anche nelle 
versioni precedenti, solitamente basta correggere alcuni blocchi 
regolati da costanti di compilazione condizionali per risolvere il 
problema abbastanza rapidamente, ricompilare e installare il package.
Ciao! :-)
-- 
Marco «Alka» Breveglieri
  (marco [@] abls [.] it)
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 capire se aquistarla o no.
Mi dispiace non essere d'aiuto, ma sono di ritorno da una 24 ore di 
programmazione non stop e...sono cotto! :-)
Se cerchi nei post vecchi troverai valanghe e valanghe di informazioni, 
flame, discussioni, riferimenti riguardo ".NET vs Win32"; ho già scritto 
parecchio proprio a riguardo di questo argomento...vai con Google. :-)


 Ciao! :-)
Grazie per la risposta Marco, ma cosa intendi per qualche difficcoltà?
Devo quindi necessariamente trovare i sorgenti di quei BPL.
P.S.
So che è un po OT, ma se in poche parole mi spiegassi quale
differenza, svantaggi e vantaggi offre la programmazione  .net da
quella win32. Ti spiego: ho la versione trial di delphi 2005 e devo
capire se aquistarla o no. Grazie ancora
Newsgroup: it.comp.lang.delphi
Titolo: RS232 e affini...

Come si fa in Delphi a gestire una porta seriale ? Occorrono componenti
dedicati o c'è qualche Api in grado di venirmi in soccorso ?
Grazie

 dedicati o c'è qualche Api in grado di venirmi in soccorso ?
API dedicate non ce ne sono, usi le stesse per la scrittura e lettura dei
file, ovvero:
CreateFile() -- Per ottenere un Handle alla porta
WriteFile()/ReadFile() -- Lettura/Scrittura Dati
CloseHandle() -- Libera l'Handle ottenuto da CreateFile
So che esistono anche dei componenti free, se non erro c'è un TComPort in
giro per la rete ...
Ti saluto! ;)
--
- Carlo -
c.b...@libero.it

>c'è qualche Api in grado di venirmi in soccorso ?
EscapeCommFunction
GetCommError
BuildCommDCB
OpenComm
SetCommState
CloseComm
ReadComm
WriteComm
FlushComm
SetCommEventMask
EnableCommNotification
Ciao
Duilio

 ha scritto nel messaggio
news:9dujin$2lp$1...@nreadA.inwind.it...


Newsgroup: it.comp.lang.delphi
Titolo: Creare DSN ODBC

Ciao a tutti,
avrei la necessità di creare una origine dati odbc
a tempo di runtime in un programma in Delphi3,
dove posso trovare delle informazioni?
Si può farlo direttamente da D3 oppure esistono
delle funzioni del sistema operativo che permettono
di crearle?
Grazie
Ciao

Se cerci su mdsn trovi una serie di funzioni API per gestire
le fonti dati ODBC, ma ti anticipo che è un casino.
Alcuni programmi per la creazione di kit di installazione, prevedono
tra le altre cose questa possibilità
Installshield lo fa, non so se programmi free dello stesso tipo
permetto questa operazione.
Bye
AS
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Grazie per il suggerimento,
ma č necessario essere abbonati a qualche servizio Microsoft
per poter accedere ad mdsn o si trova qualcosa su internet,
hai mica qualche indirizzo?
Ciao

se vai su 
microsoft.com
 trovi un link a msdn.
Io ci sono entrato senza problemi.


Newsgroup: it.comp.lang.delphi
Titolo: [d5] trasformazione orario

ciao a tutti, sto diventando matto (probabilmente ho il cervello in 
ferie)... mi confermate se è corretto il seguente ragionamento:
ho 3 variabili Ore, Minuti, Secondi e devo mettere in un unica variabile 
float il numero di ore
TotOre=Ore+(Min/60)+(Sec/120)
Simone 


Decisamente in ferie! Quando sei in ferie le ore durano 120 secondi, 
mentre le ore al lavoro hanno 3600 secondi! ;)
ciao
Giacomo

appena scoperto... scusate la demenza post-ferie :)
Simo
Newsgroup: it.comp.lang.delphi
Titolo: Formato Data

Salve,
quando si crea un alias il formato della data dovrebbe dipendere dal
numero che c'e' in BDE Administrator - Configuration - System -
Formats - Date - Mode; in particolare 
0 = m/g/a
1 = g/m/a
2 = a/m/g
ma se vario questo valore, ed in particolare SEPARATOR nella tabella
non cambia assolutamente nulla, dove sto sbagliando ?
GRAZIE 1000
faf...@tiscalinet.it

 wrote in message
3aa4f737...@news.tiscalinet.it...

Per quello che ne sò io, dipende anche dal settaggio delle date in windows,
quello che trovi in
avvio->impostazioni->pannello di controllo->impostazioni internazionali
Quì, scegli il separatore, io avevo avuto lo stesso problema, ma per la
lunghezza dell'anno che volevo di 4 e non di 2, ho settato i valori sia nel
BDE che quì e tutto ha funzionato...
magari funziona anche per il tuo problema...Fammi sapere...
CYO,
--
RaSca
http://web.tiscalinet.it/rascasoft

 Formats - Date - Mode; in particolare
Prova a forzare il tutto da delphi con
Application.UpdateFormatSettings := False;
TimeSeparator := '.';
DecimalSeparator := ',';
DateSeparator := '/';
ShortDateFormat := 'dd/mm/yyyy';
Prova a guardare nell'help di delphi "Currency and date/time formatting
variables"
--
Nicola Chinea

Newsgroup: it.comp.lang.delphi
Titolo: GO TO

Quando programmo in clipper per spostarmi direttamente su un record di un
DBF uso l'istruzione GO TO (numero record).
Con DELPHI (5 prof.) qualcuno sa indicarmi come fare. Conosco il nr. di
record del file DBF , ma non so come arrivarci senza troppi giri.
Grazie a tutti per i consigli
Marco
supp...@reporterprofessional.it



Se mi ricordo bene, dovrebbe esserci un metodo MoveBy che permette di
spostarsi di N record.
Ciao,
Massimo.
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"


Spero ti sia utile,
--
Andrea Raimondi
----------------------------------------
Redattore corso di Delphi
di  Software Planet
www.softwareplanet.net