Einzelnen Beitrag anzeigen

Spike2k3

Registriert seit: 20. Aug 2003
73 Beiträge
 
Delphi 7 Enterprise
 
#1

Messageboxbuttondefinition

  Alt 23. Aug 2003, 23:15
Weisst jemand zufällig auch wie man bei ner Messagebox die Buttonclicks definiert?
Means, wenn auf 'ja' dann blub, wenn auf 'nein' dann blüp.
Das bekomm ich nämlich nicht hin
Delphi-Quellcode:
procedure TForm1.Hintergrundndern1Click(Sender: TObject);
Begin
  with Application do
  begin
    messagebox('Na, Sarah Michelle Gellar','NOOOOOB',MB_YESNO);
    //wenn ich nu auf ja klicke, soll das *zeile hierunter* passieren
ShellExecute(0, 'open', 'about:blank', nil, nil, SW_SHOW);
//wenn ich auf nein klicke, dann soll die box einfach verschwinden
end;

  end;
  Mit Zitat antworten Zitat