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

Вниз

вопрос про WM_WINDOWPOSCHANGING   Найти похожие ветки 

 
brother ©   (2013-04-27 07:05) [0]

procedure TForm.WndProc(var Message: TMessage);
var
 wp: PWindowPos;
begin
 case Message.Msg of
...
   WM_WINDOWPOSCHANGING: begin
     wp := PWindowPos(Pointer(message.LParam));

     Form1.Memo1.Lines.Clear;
     Form1.Memo1.Lines.Add("x" + IntToStr(wp.x));
     Form1.Memo1.Lines.Add("y" + IntToStr(wp.y));
     Form1.Memo1.Lines.Add("cx" + IntToStr(wp.cx));
     Form1.Memo1.Lines.Add("cy" + IntToStr(wp.cy));
   end;
...
 end;

 inherited WndProc(Message);
end;


в memo1 все значения всегджа равны 0, почему?


 
clickmaker ©   (2013-04-27 11:12) [1]

TForm.WndProc ?


 
brother ©   (2013-04-27 11:16) [2]

да. form1 Для отладки...


 
brother ©   (2013-04-27 11:40) [3]

> TForm.WndProc ?

TFormExt



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

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

Наверх




Память: 0.47 MB
Время: 0.006 c
1-1321963452
asafr
2011-11-22 16:04
2014.02.23
DocsVision и Delphi


2-1366979228
Сергей
2013-04-26 16:27
2014.02.23
Копирование поля Memo в SQL запрос


15-1377598805
S
2013-08-27 14:20
2014.02.23
Александр Жданов.Адаптивный робот


2-1366724200
delphistorm
2013-04-23 17:36
2014.02.23
получить значение нода в IXMLDOMNode


11-1249702092
Ruzzz
2009-08-08 07:28
2014.02.23
Создание для KOL эквивалента Layouts из Qt