Solve your biggest tech problems alongside global tech experts with 1:1 help.
In the main-thread I have a procedure "AppMessage" (Application.Onmessage := "AppMessage". During the 30 seconds (sleep) this procedure is never called. I think I didn't understand something with threading??
TPdaSyncThread = class(TThread) private procedure doProcess; protected procedure Execute; override; public constructor Create(... myParams); end; constructor TPdaSyncThread.Create(... myParams); begin FreeOnTerminate := True; inherited Create(False); .... end; procedure TPdaSyncThread.doProcess; begin Sleep(30000); //just to "simulate" calling the function that will return after a timeout end; procedure TPdaSyncThread.Execute; begin while not Terminated do begin Synchronize(self,doProcess); end; end;
Join the community of 500,000 technology professionals and ask your questions.