Как запретить меню формы

← →
Merry (2004-05-11 18:15) [0]

Создаю форму, при клике на иконке в заголовке выпадает меню.
Как его запретить? (только не надо предлагать убрать иконку СОВСЕМ :) )
Извините, если вопрос не по теме, просто я думала, что вдруг
в KOL это реализовано по-другому (потом ещё раз спрашивать :) )

← →
Falcon © (2004-05-11 18:57) [1]

Поставь у KOLForm borderStyle например fbsDialog. Если это подходит :)

← →
Delphi5.01 © (2004-05-11 19:18) [2]

Vradli, nado chtob ikonka ostavalas a vot s fbsDialog ikonka ischezaet! :-(((

← →
z007 (2004-05-11 21:15) [3]

Можно нарисовать заголовок формы вручную?
или написать соответствующую реакцию на вызов этого меню.

Сделать DeleteMenu для этого окна.

← →
GuAV (2004-05-12 01:30) [5]

В 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 - аналогично, учитывая специфмку обработки сообщений.

Как запретить меню формы Найти похожие ветки