Hmm, wo/wie wird Time_Search aufgerufen?
Aber generell war es wohl etwas anders gedacht:
Delphi-Quellcode:
private
FTimeSearchAbort : Boolean
end;
//..
procedure TfrmLogView.btnabortClick(Sender: TObject);
begin
FTimeSearchAbort:=true
end;
// vor Aufruf von TimeSearch (wo?) FTimeSearchAbort:= false setzen
procedure TfrmLogView.Time_search(FOriginal: TStringlist);
begin
// hier an geeigneter Stelle z.B. Schleife o.Ä.
// auf FTimeSearchAbort reagieren
end;