CodeNet / Языки программирования / Delphi & Kylix / FAQ - Часто задаваемые вопросы / Пишем инсталятор.

FAQ - Затенить кнопку закрыть в заголовке формы

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

PROCEDURE TFORM1.FORMCREATE(SENDER: TOBJECT); 
VAR HMENUHANDLE:HMENU; 
BEGIN 
 HMENUHANDLE := GETSYSTEMMENU(HANDLE, FALSE); 
 IF (HMENUHANDLE &LT;&GT; 0) THEN 
  DELETEMENU(HMENUHANDLE, SC_CLOSE, MF_BYCOMMAND); 
END;

Остальные Вопросы

Ваш аккаунт

Последние темы форума

Почтовая рассылка

FAQ - Затенить кнопку закрыть в заголовке формы

Оставить комментарий

Комментарий: можно использовать BB-коды Максимальная длина комментария - 4000 символов.	CodeNet ВКонтакте Facebook Twitter Google Яндекс Чтобы оставить комментарий, необходимо авторизоваться. Можно ввести логин и пароль, или авторизоваться через социальные сети.