Jak zablokować przycisk zamykający okno
Ten artykuł został przeznaczony do usunięcia. Powody możesz znaleźć na stronie: Artykuły do usunięcia.
W skutek użycia poniższego kodu, przycisk X (umiejscowiony na belce tytułowej okien systemu Windows) będzie nieaktywny:
var m: Integer; begin m:= GetSystemMenu(Handle, False); if (m<> 0) then DeleteMenu(m, SC_CLOSE, MF_BYCOMMAND); end;
3 komentarze
Bru2s: Twoim sposobem po kliknięciu na ten X poprostu nic się nie stanie, a sposobem a_s_f ów X będzie wyszarzony :]
A tak pozatym to to już było ;] (ostatnio się coraz częsciej mówie \"ale to już było...\" ;])
A nie lepiej w OnCloseQuery dać CanClose=false; (to w BCB ale w Delphi zmieni się chyba tylko = na := )
Nie dość, że było, to jeszcze nie jest tym czego się spodziewać można po przeczytaniu tytułu :/ Powinieneś dodać jeszcze dodawanie z powrotem tego itema do menu :|
Jak włączyć/wyłączyć Close okna opisałem <url=http://www.mpa.prv.pl/cms_view_article.php?aid=38>tutaj</url> :)