Datenbank suchen

[ronnyz]

soweit klar

procedure TForm1.SuchenClick(Sender: TObject);
begin
with DBGrid1.DataSource.DataSet do
if not Locate('NR', '2', []) then
ShowMessage('Nichts gefunden ');
end;


bedeutet wenn 2 gesucht wird in dbgrid anzeigen wenn nicht nichts gefunden...

allerdings hab ich mich wohl nicht richtig ausgedrückt ...

weil bei der lösung muß ich ja vorher im Quelltes eingeben was gesucht wird hier z.B nr.2

ich möchte aber das der user über ein menüpunkt suchen klcikt evtl sich finddialog öffrnen er dann von mir aus die nr 99 eingibt und dan eine meldung nicht gefunden kommt oder in dbgrind den datensatz anzeigt ...