Editfeld überprüfen

[ninja]

hallo,
ich hab probleme den code für eine überprüfung mehrerer editfelder hinzubekommen.
kann mir vieleicht einer auf die sprünge helfen?
das sieht so aus
Button wird gedrückt:

Delphi-Quellcode:

If Edit1.Text = '' Then
        Showmessage ('Message!');
If Edit2.Text = '' Then
        Showmessage ('Message!');
If Edit3.Text = '' Then
        Showmessage ('Message!');
If Edit4.Text = '' Then
        Showmessage ('Message!');
//hier gehts dann weiter, es soll aber nur weiter gehen wenn alle felder mit zeichen gefüllt sind.

das funktioniert auch. (kann man das nicht auch vereinfachen????)
mein problem ist das ich erst, wenn alle editfelder gefüllt sind, mit der procedure weiter arbeiten möchte, allerdings weis ich nicht wie man diese abfragen hinbekommt, dachte erst mit "if not Edit1.Text = '' Then" , aber es müssten alle editfelder miteinmal abgefragt werden.
hat vieleicht einer einer einen lösungsansatz?