In DBGrid suchen

[sx2008]

Delphi-Quellcode:

if not ADOQuery_Station_Auftrag.Locate('Auftrag',Edit_Auftragsnummer.Text,[loPartialKey,loCaseInsensitive]) then
begin
  ShowMessageFmt('<%s> wurde nicht gefunden', [Edit_Auftragsnummer.Text]);
  // oder auch als nicht so aufdringliche Rückmeldung
  StatusBar1.SimpleText := Format('<%s> wurde nicht gefunden', [Edit_Auftragsnummer.Text]);
end;