Moin moin !
Mit dem folgenden Code versuche ich eine Filterbedingung für einen
Datenbankzugriff zusammenstellen.
__Try
____PatNr := StrToInt(EditPatientenauswahl.Text);
____t := 'PatNr = ' + EditPatientenauswahl.Text;
__except
____on E: EConvertError do begin
______t := 'Nachname = ''' + EditPatientenauswahl.Text + '''';
____end;
__end;
Der Anwender soll in das Edit-Feld eintweder die Patientennummer oder den Patientennamen eingeben.
Wird eine Nummer eingegeben klappt alles; bei Eingabe eines Namens bricht die Anwendung ab, mit einer Fehlermeldung vom Typ EConvertError.
Ich hatte es eigentlich so verstanden, daß ich mit der obigen Konstruktion
genau diesen Fehler abfange.
Wäre super, wenn mich 'mal jemand von dem Schlauch runterschubsen könnte,
auf dem ich stehe.
Danke und Gruß
Hauke Gintner
Mit dem folgenden Code versuche ich eine Filterbedingung für einen
Datenbankzugriff zusammenstellen.
__Try
____PatNr := StrToInt(EditPatientenauswahl.Text);
____t := 'PatNr = ' + EditPatientenauswahl.Text;
__except
____on E: EConvertError do begin
______t := 'Nachname = ''' + EditPatientenauswahl.Text + '''';
____end;
__end;
Der Anwender soll in das Edit-Feld eintweder die Patientennummer oder den Patientennamen eingeben.
Wird eine Nummer eingegeben klappt alles; bei Eingabe eines Namens bricht die Anwendung ab, mit einer Fehlermeldung vom Typ EConvertError.
Ich hatte es eigentlich so verstanden, daß ich mit der obigen Konstruktion
genau diesen Fehler abfange.
Wäre super, wenn mich 'mal jemand von dem Schlauch runterschubsen könnte,
auf dem ich stehe.
Danke und Gruß
Hauke Gintner
Comment