Текущий архив: 2008.12.14;
Скачать: CL | DM;

Вниз

Работа с BorderIcons..   Найти похожие ветки 

← →
AlexDan ©   (2008-11-04 08:34) [0]

Подскажите как выключить кнопку "закрыть форму" не убирая её (например с изменением цвета, где-то такое видел)..

---

← →
Palladin ©   (2008-11-04 09:46) [1]

procedure TForm.OnCreate;
Var
 hm:HMENU;
 mii:MENUITEMINFO;
begin
 hm:=GetSystemMenu(Self.Handle,False);
 ZeroMemory(@mii,SizeOf(mii));
 mii.cbSize:=SizeOf(mii);
 mii.fMask:=MIIM_STATE;
 mii.fState:=MFS_DISABLED;
 SetMenuItemInfo(hm,SC_CLOSE,False,mii);
end;


---

← →
AlexDan ©   (2008-11-04 09:53) [2]

ага, спасибо большое.

---

← →
AlexDan ©   (2008-11-04 09:55) [3]

работает замечательно).

---

Страницы: 1 вся ветка

Текущий архив: 2008.12.14;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.015 c