Przycisk zamykający okienka [X]

0

Witam!
Właśnie mam takie małe pytanie, a mianowicie:
Jak zrobić aby przycisk zamykający okienko był nieaktywny. Nie chodzi mi o wyłączenie całkowite tych ikon (BorderIcons) lecz o spowodowanie aby ten button był szary czyli np.: ENABLED := FALSE. Ma zostać tylko ten jeden, bez mini i maksymalizacji (to jest proste :)) lecz ma on być nieaktywny.
Wiele programów ma w ten sposób zrobione i jestem ciekaw jak to można zdjełać.

Proszę o pomoc
Pozdrowionka [cya]

0

Kliknij na Formę, w okienku Object Inspector, rozwiń BORDER ICONS, zmień pierwszą opcję BI SYSTEM MENU, na false, wtedy nie będziesz miał żadnej ikonki na pasku tytułu.

0

Nie wiem jak sie robi na szaro, ale jesli ma byc nieaktywny zdefiniuj zdarzenie formy OnCloseQuery.

0

Na szaro nie będzie a w zdarzeniu OnCloseQuery daj CanClose:=False; wtedy nie zamkniejsz aplikacji tym przyciskiem.

0

Ale wy mu wszyscy dajecie rady a on nadal chce inaczej :) Ale na jego szczescie ten post zostal wybrany przez Pedrosa ktory juz spieszy z pomoca ;p Ale co glupoty ostatnio pisze :) Ale kodzik mam, wez wrzuc to w OnCreate

var
hMenuHandle: Integer;
begin
hMenuHandle := GetSystemMenu(Handle, False);
if (hMenuHandle 0) then
DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);

0

Dzieki
Jeszcze nie sprawdzilem, ale o to chyba mi chodzilo

nara

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