Timer en un thread
Publicado por Sergio Jiménez (5 intervenciones) el 31/01/2007 22:51:48
Tengo el siguiente codigo y mi pregunta es ¿porque nunca se me lanza el procedimiento del timer en el thread?
threadvar
tmrThread: TTimer;
//*****************EXECUTE**********************
tmrThread := TTimer.Create(nil);
tmrThread.Enabled := false;
tmrThread.Interval := 1000;
tmrThread.OnTimer := tmrThreadTimer;
tmrThread.Enabled := true;
//***********************************************************
procedure tmrThreadTimer(Sender:TObject);
begin
ShowMessage('Algo');
end;
Gracias de antemano por su ayuda...
threadvar
tmrThread: TTimer;
//*****************EXECUTE**********************
tmrThread := TTimer.Create(nil);
tmrThread.Enabled := false;
tmrThread.Interval := 1000;
tmrThread.OnTimer := tmrThreadTimer;
tmrThread.Enabled := true;
//***********************************************************
procedure tmrThreadTimer(Sender:TObject);
begin
ShowMessage('Algo');
end;
Gracias de antemano por su ayuda...
Valora esta pregunta


0