MESSAGEBOX

[DeddyH]

So, nochmal das Ganze. Da wir Dein Projekt ja nicht kennen rate ich mal:

Delphi-Quellcode:

procedure TForm1.btn_ausrechnenClick(Sender: TObject);
begin
  if edt_name.Text = '' then
    Application.MessageBox('Eingabe ungültig', 'Achtung!', MB_OK)
  else if edt_name.Text = 'Heidi' then
    Application.MessageBox('Du passt am besten mit Peter zusammen', 'Glückwunsch', MB_OK);
end;

Vermutlich soll ja in beiden Fällen das Edit für den Namen ausgewertet werden, oder etwa nicht?