hallo, wie kann ich erreichen, das wenn man bei meiner anwendung auf das x drückt (zum schließen) ein hinweisfenster erscheint und nach nachdem es geschlossen wurde, wird das programm beendet? Mit OnClose kommt eine fehlermeldung.
Announcement
Collapse
No announcement yet.
beenden un meldung
Collapse
X
-
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Neue Seite 1</title>
</head>
<body>
<p><i>>> nein, klappt nicht.</i></p>
<p>Glaub ich nicht. Wie hast Du das denn hingekriegt ? Mit dem Beispiel, das
jeder in der Hilfe nachlesen kann, klappt es aber bei mir:</p>
<pre>void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool &CanClose)
{
if (MessageDlg("Formular schließen?", mtConfirmation, TMsgDlgButtons() << mbOK << mbCancel,0) == mrCancel)
CanClose = false;
}</pre>
</body>
</html>Günther
Comment
-
<html>
<head>
<meta http-equiv="Content-Language" content="de">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Neue Seite 1</title>
</head>
<body>
<pre>void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool &CanClose)
{
if(BeendenDialog->ShowModal()==mrCancel)
CanClose = false;
}
void __fastcall TBeendenDialog::OkButtonClick(TObject *Sender)
{
ModalResult=mrOk;
}
void __fastcall TBeendenDialog::CancelButtonClick(TObject *Sender)
{
ModalResult=mrCancel;
}</pre>
</body>
</html>Günther
Comment
Comment