Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как на форме кнопку CLOSE (крестик) сделать неактивной? [D5, Win95/98]


Olegas ©   (2002-06-13 18:58:00) 

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


Dennn_is   (2002-06-14 13:10:00) [1]

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


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

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

end;


Song   (2002-06-13 19:23:00) [2]

DeleteMenu()


Наверх

Титульная страница Поиск, карта сайта Написать письмо