| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Перетаскивание формы [D6, WinXP]
PaRL © (2002-08-13 19:50:00)Я использую WM_NCHITTEST.
В VCL это выглядит так:
protected
procedure Hit(var M : TWMNCHITTEST); message WM_NCHITTEST;
end;
implementation
...
procedure Hit(var M : TWMNCHITTEST);
begin
inherited;
if Result = HTLIENT then Result := HTCAPTION;
end;
И всё работает, но в WiAPI нет inherited и системные кнопки заблокированы. Что делать?
PaRL (2002-08-22 14:13:00) [1]
> старый прием:
> в onMouseDown любого VCLника пишишь:
Не твои слова скажешь >? :)
oduvan (2002-08-17 19:48:00) [2]WM_SYSCOMMAND - а это по твоему что VCL?
PaRL (2002-08-17 17:47:00) [3]oduvan,
Раздел WinAPI называется, если ты не в курсе.
Shark, thanks.
oduvan (2002-08-13 20:38:00) [4]старый прием:
в onMouseDown любого VCLника пишишь:
releaseCapture;
Form1.Perform(WM_SYSCOMMAND,$F012,0);
DiamondShark (2002-08-13 19:59:00) [5]DefWindowProc
| |
