![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как запретить меню формы
Merry © (2004-05-11 18:15:00)Создаю форму, при клике на иконке в заголовке выпадает меню.
Как его запретить? (только не надо предлагать убрать иконку СОВСЕМ :) )
Извините, если вопрос не по теме, просто я думала, что вдруг
в KOL это реализовано по-другому (потом ещё раз спрашивать :) )
GuAV (2004-05-12 01:30:00) [1]В VCL я делал
procedure WM_NCHitTest(var M: TMessage); message WM_NCHITTEST;
.
.
.
procedure TForm1.WM_NCHitTest(var M: TMessage);
begin
inherited;
if M.Result=HTSYSMENU then M.Result:=HTNOWHERE; //HTCAPTION; HTCLOSE;
end;
В KOL - аналогично, учитывая специфмку обработки сообщений.
Dimaxx (2004-05-11 22:25:00) [2]Сделать DeleteMenu для этого окна.
z007 (2004-05-11 21:15:00) [3]Можно нарисовать заголовок формы вручную?
или написать соответствующую реакцию на вызов этого меню.
Delphi5.01 (2004-05-11 19:18:00) [4]Vradli, nado chtob ikonka ostavalas a vot s fbsDialog ikonka ischezaet! :-(((
Falcon (2004-05-11 18:57:00) [5]Поставь у KOLForm borderStyle например fbsDialog. Если это подходит :)