hiMoveWindow писал(а):
procedure THIMoveWindow._work_doMove;
var wnd:HWND;
begin
wnd := ReadInteger(_Data,_data_Handle,0);
ReleaseCapture;
SendMessage(wnd,WM_SYSCOMMAND, $F012, 0);
end;


Ответов: 8960
Рейтинг: 824
|
|||
kamakama,
hiMoveWindow писал(а): procedure THIMoveWindow._work_doMove;
var wnd:HWND; begin wnd := ReadInteger(_Data,_data_Handle,0); ReleaseCapture; SendMessage(wnd,WM_SYSCOMMAND, $F012, 0); end; ![]() ![]() |
|||
карма: 19 |
| ||
файлы: 1 | code_16551.txt [1.5KB] [135] |