Windows Fenster mit Ok und abbrechen?

[ehem. Benutzer]

Wie erstelle ich ein Windows Fenster mit den Buttons "OK" und "Abbrechen" bzw. "ja" und "nein"
und oben ein von mir festgelegter Text?
Gibt es da einen Befehl für, oder muss ich da eine neue Form machen?




MfG

[Meflin]

messagedlg könnte dir weiterhelfen

[Mystic]

Schau mal in der Delphi-Hilfe nach MessageBox.

[Luckie]

Alternativ: [msdn]"MessageBox"[/msdn]

[ehem. Benutzer]

Aus der Delphi Hilfe werd dich bei diesem Thema irgendwie nicht schlau,
trotzdem danke.


P.S. ich will beim beenden meines Programms nachfragen ob es gespeichert werden soll und
dies will ich mit ja und nein machen.



MfG

[Luckie]

Zitat:

Aus der Delphi Hilfe werd dich bei diesem Thema irgendwie nicht schlau,

Also in meiner Hilfe ist zum MessageDlg sogar ein Beispiel dabei. :roll:

[Mystic]

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  // filename = Name der gerade geöffeneten Datei
  case Application.MessageBox('Änderungen an "' + filename + '" speichern?','MeinProgramm',MB_YESNOCANCEL or MB_ICONQUESTION) of
    IDYES: begin
             CanClose := True;
             // Hier Datei speichern
           end;
    IDNO:  begin
             CanClose := True;
             // Hier Datei nicht speichern
           end;
    else   CanClose := False; // Abbrechen gedrückt, Programm wird nicht beendet
  end;
end;

edit: [/delphi] vergessen.

[ehem. Benutzer]

Delphi meckert bei "filename"

Delphi-Quellcode:

case Application.MessageBox('Änderungen an "' + filename + '"

"filename" sei ein undefinierter Bezeichner, stimmt ja auch, er wurde ja nicht
deklariert oder ist nicht richtig festgelegt...



MfG

[idontwantaname]

filename ist nur ne variable, die luckie in seinem sample gepostet hat, eigentlich völlig unwichtig, nur halt, falls du sowas wie nen texteditor machst, das filename der name der gerade geöffneten datei ist.

[ehem. Benutzer]

Ja ich mache einen Texteditor, nur will Delphi das Programm nicht compilieren da
"filename" Delphi stört.



MfG