Главная страница
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.01 c
14-42870
BWG
2001-12-24 14:47
2002.02.14
Требуется написать терминалку


1-42737
ctapik-net
2002-01-30 19:38
2002.02.14
Вот хочется узнать, как подключают контекстную справку с файлом chm?


3-42645
Mik
2002-01-15 23:11
2002.02.14
Как подступиться к Access-овской базе без BDE?


3-42652
Voi
2002-01-20 10:24
2002.02.14
Вот задача №2 или продолжение вопроса


3-42670
Mikhail
2002-01-18 21:42
2002.02.14
Ответте хоть ради смеха...