Скачать: CL | DM;

как на форме кнопку CLOSE (крестик) сделать неактивной?   Найти похожие ветки 

← →
Olegas   (2002-06-13 18:58) [0]

Помогите пожалуйста, очень нужно сделать кнопку CLOSE (крестик) неактивной (но не убирать)!!! Подскажите, может кто знает!!!

---

← →
Song ©   (2002-06-13 19:23) [1]

DeleteMenu()

---

← →
Dennn_is   (2002-06-14 13:10) [2]

Следующий текст убирает команду закрыть из системного меню
и одновременно делает серой кнопку закрыть в заголовке
формы:


procedure TForm1.FormCreate(Sender: TObject);
var hMenuHandle:HMENU;
begin

hMenuHandle := GetSystemMenu(Handle, FALSE);
IF (hMenuHandle <> 0) THEN
DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);

end;


---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c