while and "funktioniert nicht"

[Versus]

Delphi-Quellcode:

label4.Caption:=edit1.Text;
label6.Caption:=edit2.Text;
Spieler1:=edit1.Text;
Spieler2:=edit2.Text;
while Spieler1 and Spieler2 ='' do
showmessage('Spieler1 und Spieler2 wollen einen Namen D:')  ;

Ich möchte folgendens; Wenn Spieler 1 und/oder Spieler 2 leer sind dann soll er eine showmessage anzeigen. Momentan sagt er Der operator ist auf diesen Operantentypen nicht anwendbar. Also 1 möchte ich wissen was ich falsch mache und wie ich Delphi und/oder sagen kann z.B. while Spieler1 and/or Spieler2 ='' do .....

Danke schonmal im Voraus!