Italian community of Lazarus and Free Pascal

Programmazione => Generale => Topic aperto da: ffabio - Febbraio 26, 2013, 02:58:03 pm

Titolo: timer
Inserito da: ffabio - Febbraio 26, 2013, 02:58:03 pm

Ciao a tutti

qualcuno ha qualche idea di come funzioni il timer ??

ogni tot secondi vorrei far rieseguire una query . come si fa ???


grazie ragazzi

Titolo: Re:timer
Inserito da: nomorelogic - Febbraio 26, 2013, 03:18:50 pm

è una query pesante?

Titolo: Re:timer
Inserito da: ffabio - Febbraio 26, 2013, 03:28:06 pm

no non tantissimo , tra l altro è indicizzata per cui non ti preoccupe

 :D

Titolo: Re:timer
Inserito da: nomorelogic - Febbraio 27, 2013, 11:43:05 am

se è così prova semplicemente con un componente Timer
però devi sapere che finquando la query sarà in esecuzione la gui sembrerà bloccata

se poi è comunque troppo pesante puoi provare a eseguire la query con un TProcess

Titolo: Re:timer
Inserito da: ffabio - Febbraio 27, 2013, 04:08:56 pm

ha qualche esempio ???

Titolo: Re:timer
Inserito da: bonmario - Febbraio 27, 2013, 06:20:54 pm

E' più semplice di quanto possa sembrare:
- aggiungi al tuo form il componente TTimer (è sotto System),
- nella proprietà "Interval" imposto ogni quanti millisecondi deve fare il suo lavoro
- se vuoi, nella proprietà "Enabled" metti "False" e poi la imposti a true quando vuoi far partire il timer
- nell'evento "OnTimer" gli metti le operazioni che devono essere eseguite

Ciao, Mario

Titolo: Re:timer
Inserito da: nomorelogic - Febbraio 27, 2013, 07:43:20 pm

ora non ho esempi a portata di mano ma come dice bonmario non è complicato
prepara una procedura che faccia l'interrogazione
metti un TTimer sul form ed imposta l'intervallo a 10000 (es: 10 secondi) ed impostalo ad enabled
nell'evento Ontimer metti il richiamo della procedura