Još jedno pitanje:
Program iz Timera starta nekoliko procedura. Kad završi sve što se poziva iz Timera, program se završava.
Problem:
Kako prekinuti izvršavanje programa nakon određenog vremena ako procedure iz Timera nisu gotove, tj. još uvijek se vrte?
Pokušao sam pokrenuti drugi Timer i u njemu kontrolirati proteklo vrijeme, pa terminirati program, ali ne radi. Probao sam:
fmMain.Close;
Application.Terminate;
Niti jedna naredba ne zaustavlja program.
Timer2 se ne starta ako ne pozovem Application.ProcessMessage;
Želio bih da se bez ikakovog uvijeta, nakon x sati program zaustavi. Moguće je povziv SQL-a ili beskonačna petlja (: tako da Application.ProcessMessage se ne pokrene, pa i program ostane visjeti.