2 Edit Felder auf Leer prüfen, wie mach ich das?

[Chris11978]

Hallo zusammen,

ich hoffe ihr könnt mir helfen. Bin in Sachen Delphi ein absoluter Neuling.

Es geht um folgendes:

Auf einer Form habe ich 2 Edit Felder, einen Button und 2 Label.

Jetzt soll man bei den 2 Edit Feldern etwas eingeben und über den Button bearbeitet an die Label ausgeben. Soweit so gut, es funktioniert bis dahin.

Ich habe allerdings das Problem, daß ich beim Klick auf den Button eine Prüfung laufen lassen will, die die 2 Edit Felder auf Inhalt prüfen und eine Fehler Meldung ausgeben, wenn eines der Felder leer ist und die Aktion darf nicht ausgeführt werden.

Das jedes Feld seperat geprüft wird, habe ich hinbekommen. Das bringt mir aber nichts, weil der Code trotzdem abgearbeitet wird, sobald in einem Feld etwas drin steht und mir keine Meldung erscheint und der Wert aus einem der Edit Felder in den Labeln angezeigt wird.

Wie bekomme ich hin, daß beide Felder gleichzeitig geprüft werden?

Danke euch schonmal im Voraus.

Gruß
Chris

[Vampyr09]

Delphi-Quellcode:

procedure ButtonClick
begin
  If Edit1.text = '' then
  showmessage('Edit1 leer');

  If Edit2.text = '' then
  showmessage('Edit2 leer');
end;

:edit:

Kannst auch machen:

Delphi-Quellcode:

begin
  If (Edit1.text = '') and/or (edit2.text = '') then
    showmessage('da fehlt aber was ;)');
end;

[Blackheart]

and

[taaktaak]

Neeeeeeeeeeeeee, OR

[cran7]

Zitat:

Zitat von Blackheart

and

or muss dabei sein, sonst würde es ja wieder gehn wenn einen edit feld leer is, un das will er ja net :)

[Chris11978]

Hallo zusammen,

erstmal vielen Dank für die schnellen Antwort, konnte es leider noch nicht versuchen.
Musste meinen PC nach Festplatten und Mainboard Crash neu einrichten.
Werde mich aber nochmal melden, sobald ich das probiert habe.

Wünsche an alle Schöne, Streßfreie Feiertage

Grüße aus dem kalten Süden

Chris