Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.02.14;
Скачать: CL | DM;

Вниз

виндовая мессага.   Найти похожие ветки 

 
vivus ©   (2001-12-18 10:47) [0]

Помогите, кто знает: Какие параметры надо подставить в параметры SendMessage(), чтобы таскать форму за любое место. Это возможно -сам делал, но потерял параметры... Помогите!


 
gek   (2001-12-18 10:54) [1]

Ну пишешь примерно так

tmyform = class(tform)
...........
private
prosedure WMNCHitTest(var Msg:TWMNCHitTest);message wm_NCHitTest;
.....
end;

procedure myform.WMNCHitTest(var Msg:TWMNCHitTest);
begin
inherited;
if msg.result = htClient then msg.result:=htClient;
end;


 
vivus ©   (2001-12-18 10:58) [2]

спасибо большое. Учту. Но это не совсем то, что я хотел. Существовал более
простой метод (как действие), а именно посылка ядру через SendMessage.


 
Shark   (2001-12-18 15:23) [3]

Извиняюсь надо писать:

procedure TMyForm.WMNCHITTEST(var Msg: TWMNCHitTest);
begin
inherited;
Msg.Result:=htCaption;
end;



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

Текущий архив: 2002.02.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
1-42763
DEPROL
2002-01-31 09:38
2002.02.14
Install Delphi5 for Win2k


6-42816
Knish
2001-11-24 18:53
2002.02.14
А как можно сделать, чтоб программа запускалась только на сервере?


3-42651
Dim
2002-01-18 12:28
2002.02.14
Запрос отказывается работать?


14-42844
Oleg Gashev
2001-12-24 22:43
2002.02.14
С Новым Годом!!!


14-42849
fliz
2001-12-25 10:32
2002.02.14
Кто какие елки ставить будет - натуральные или исскуственные ?