Текущий архив: 2003.01.09;
Скачать: CL | DM;
Вниз
Недвигающееся окно Найти похожие ветки
← →
UNIVERSAL (2002-11-22 10:50) [0]Доброе время суток, господа программисты. Подскажите, плз, как сделать окно(форму) , которое нельзя переместить с помощью API(без хуков)?
← →
Song © (2002-11-22 11:06) [1]...
procedure IsWindowMoving(Var Msg:TMessage); message WM_MOVING;
...
procedure TForm1.IsWindowMoving(Var Msg:TMessage);
Begin
PRect(Msg.LParam).Left:=Left;
PRect(Msg.LParam).Top:=Top;
PRect(Msg.LParam).Right:=Left+Width;
PRect(Msg.LParam).Bottom:=Top+Height;
End;
← →
UNIVERSAL (2002-11-22 11:20) [2]Спасибо, но хочется именно с помощью API, дело в том что это надо сделать вообще-то в Access.
Страницы: 1 вся ветка
Текущий архив: 2003.01.09;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.014 c
