Bedingung, falls query kein ergebnis liefert?

[mafiaente]

hallo,
ich habe eine abfrage gesartet, in der man name un email eingeben muss un dies dann mit der kundendatenbank abgeglichen wird! wenn ich richtigen name mit zugehöriger email eingebe klappt auch alles! wenn ich aber ewtas eingebe, was nicht in der datenbank vorkommt, stürzt das programm ab! wie kann ich das abfangen!
es soll eine showmessage kommen "Kein Eintrag vorhanden" falls bei der suche nichts gefunden wurde ich hoffe mir kann geholfen werden! hier der quelltext bisher:

Delphi-Quellcode:

Query2.close;
Query2.sql.Clear;
Query2.Sql.Add('SELECT * FROM db\kd_daten WHERE Name = '+#39+edit2.text+#39+' AND Email = '+#39+edit10.text+#39);
query2.open;

[mkinzler]

Der Fehler liegt nicht an dem geposttetn Code, dieser Funktioniert auch bei keinem Suchergebnis, sondern im Folgecode.

[hoika]

Hallo,

benutze

if not Query2.IsEmpty


Heiko

[mafiaente]

ok habs jetz auch mit
IF Query2.EOF THEN showmessage('Kein Eintrag gefunden!') hinbekommen! trotzdem vielen dank!

- closed -