![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как на форме кнопку 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()