Okienka Builder

Krzysztof Miller
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 10
0

Witam. Jak zrobić żeby poza tym co jest po kliknięciu w okienku "NO" robiło się po prostu Application->Terminate();

Kopiuj
void __fastcall TForm1::Zakocz1Click(TObject *Sender)
{
if(Application->MessageBoxA(
"Czy zapisac plik przed wyłączeniem aplikacji?","Potwierdź",
 MB_YESNOCANCEL | MB_ICONQUESTION)==IDYES)
 {
Form1->Zapisz1Click(MainMenu1);
Application->Terminate();
 }
}

Builder 6

tajny_agent
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 1340
3

Wyrzuć Application->Terminate() poza if?

Krzysztof Miller
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 10
0

Jak zrobić że gdy klikniemy w okienku "CANCEL" to program się nie wyłączy?

Kopiuj

void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
if(Application->MessageBoxA(
"Czy zapisac plik przed wyłączeniem aplikacji?","Potwierdź",
 MB_YESNOCANCEL | MB_ICONQUESTION)==IDYES)
 {
Form1->Zapisz1Click(MainMenu1);
 }
}

tajny_agent
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 1340
1

Sprawdź czy zwrócona wartość z MessaeBoxA jest różna od IDCANCEL.

_13th_Dragon
  • Rejestracja: dni
  • Ostatnio: dni
2
Kopiuj
Word ret=Application->MessageBoxA("Czy zapisac plik przed wyłączeniem aplikacji?","Potwierdź", MB_YESNOCANCEL | MB_ICONQUESTION);
if(ret==IDYES) Form1->Zapisz1Click(MainMenu1);
else if(ret==IDCancel) Action=caNone;

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.