Warum wandelst du auch um ??? Warum erschien der rote Kasten nicht ?
Wenn das Form2 erscheinen soll, wenn beides leer ist, dann geht das so:
Delphi-Quellcode:
procedure TPasswordDlg.Button1Click(Sender: TObject);
begin
if (username.text = '') or (passwort.text = '') then
Form2.ShowModal;
end;
Oder mit Variablen:
Delphi-Quellcode:
procedure TPasswordDlg.Button1Click(Sender: TObject);
var
user, pass: String;
begin
user := username.text;
pass := passwort.text;
if (user = '') or (pass = '') then
Form2.ShowModal;
end;