[Delphi] Zamykanie(

0

Jeśli w procedurze "OnClose" ustawiam Aplication.MessageBox('xxx','xxx', mbYesNo+xxx);
To co bym nie nacisnął się zamknie. Więc jeżeli się naciśnie YES(tak) to
program sie zakończy. Jeśli NO(nie) to też.
A jaką procedure trzeba wpisać żeby po naciśniećiu przycisku NO(nie) nastąpił powrót do programu ?
[browar]

0

Wez w procedurze OnCloseQuery wpisz cos takieg;

var
odp : integer;
begin
odp := Application.MessageBox('Czy zamknac program','Jakis tytul',MB_YESNO+MB_ICONQUESTION);
if odp = idno then
canclose := false
else
canclose := true;

No i to wystarczy :)

0

Wielkie dzięki PEDROS !!
:-) [cya]

0

to jest we wszystkich FAQ [nuda]

0

to jest we wszystkich FAQ [nuda]

I na dodatek w artykułach na 4programmers...

0

O sorry.
Nie wiedziałem.
Jeśli was to bardzo uraziło to przepraszam.
I jeszcze raz dzięki PEDROS'owi za odpowiedz.

0

ehh no nikogo nie uraziles, ale chyba dla samego Ciebie byloby lepiej zajzec do FAQ/artykulu i miec od razu pelna odpowiedz niz czekac na nia na forum, nie?

0

No tak. Tylko że odpowiedź pedrosa jest dla mnie wystarczająca, bo o to mi chodziło.

0

no tak. tyle ze taki pedros musial poswiecic swoj czas :) zeby odpowiedziec Ci na cos, co jest juz wyjasnione doglebnie na tym samym serwisie. Ok zakonczmy temat, rozumiesz chyba o co chodzi [niewinnosc]

0

Jedno pytanie, jedna odpowiedz, podziękowanie.
Po co cała ta reszta postów, tylko tracę czas na zaglądanie tu.

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0