Vielleicht ein Timer der alle X MSec überprüft ob FNext = True ist, kannst ja in das OnTimer schreiben:
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
If FNext then
begin
// was auch immer, wenn FNEXT = True ist
end else If not FNext then
begin
// wenn FNEXT = False ist...
end;
end;
versuchs mal so
David F.