Hi!
Also ich würds in etwa so lösen:
Delphi-Quellcode:
myCommandText := 'SELECT * FROM kunden WHERE KDNR = '''+Edit2.Text+''';';
ADOConnection1.Connected := True;
if not ADODataSet1.Active then
ADODataSet1.open;
with ADODataSet1 do
begin
DisableControls; // damit nix ruckelt (Bei mehr DS in einem Grid z.B)
CommandText := mycommandtext;
Requery;
EnableControls;
end;
Dazu bauste noch ne RecordCount Variable ein und prüfst vorher ab ob > = 0 und gibst ne entsprechende Meldung aus.
Gruss
raeschnix
P.S Wo ist die Formatierung hin in der Vorschau ???
[edit=r_kerber]Delphi-Tags gesetzt. Mfg, r_kerber[/edit]