Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Вниз

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

← →
3d[Power]   (2001-12-21 11:19) [1]

procedure TForm1.WMNCHitTest(var M: TWMNCHitTest);
begin inherited;
if M.Result = htCaption then
M.Result := htClient;
end;

Это занеси в type tform1:
private
procedure WMNCHitTest(var M: TWMNCHitTest); message wm_NCHitTest;

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.008 c