Thema: Delphi MESSAGEBOX

Einzelnen Beitrag anzeigen

Änabanäna

Registriert seit: 4. Mai 2011
Ort: Schleswig
3 Beiträge
 
Delphi 6 Personal
 
#15

Aw: Messagebox

  Alt 4. Mai 2011, 16:45
Guten Tag,
ich brauch dringend Hilfe zur MessageBox! Und zwar hab ich versucht, dass sich eine MessageBox öffnet, wenn man den richtigen Namen in ein edit-Feld schreibt und anschließend auf einen Button klickt.
Eine MessageBox hab ich schon und die funktioniert auch, nur bei der anderen funktioniert das nicht.
Hier mein Quelltext:
Code:
procedure TForm1.btn_ausrechnenClick(Sender: TObject);
begin
if edt_ergebnis.Text ='' then exit;
begin
Application.MessageBox('Eingabe ungültig','Achtung!',MB_OK);
exit;
end;
begin
if edt_name.Text ='Heidi' then exit;
begin
Application.MessageBox('Du passt am besten mit Peter zusammen','Glückwunsch',MB_OK);
exit;
end;
Bei der letzten MessageBox passiert gar nichts.

Vorweg, ich hab keine Ahnung von Delphi und muss das für die Schule machen!
Schon mal Danke im Vorraus
Anna-Lena
  Mit Zitat antworten Zitat