Moin Phlux,
ich hab' da einen Workaround für Dich:
Statt die StartSearch Prozedur über OnActivate o.ä. zu starten, starte sie mit einem Timer.
Delphi-Quellcode:
procedure TDlgSearch.Timer1Timer(Sender: TObject);
begin
Timer1.Enabled := false;
StartSearch;
ModalResult := mrOK;
end;
Auf was Du das Interval einstellst musst Du mal ausprobieren.