| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
форму трясет при движении
Максим © (2008-01-25 19:29:00)почему форму трясет?
в form1ondown:
X := search.Left - search.ScreenToClient(Mouse.CursorPos).X;
Y := search.Top - search.ScreenToClient(Mouse.CursorPos).Y;
Repeat
search.Left := X + ScreenToClient(Mouse.CursorPos).X;
search.Top := Y + ScreenToClient(Mouse.CursorPos).Y;
Application.ProcessMessages;
Sleep(10);
Until ((GetAsyncKeyState(VK_LBUTTON) And $8000) = 0);
{RASkov} (2008-01-25 19:40:00) [21]> [0] Максим (25.01.08 19:29)
> почему форму трясет?
Это нормальто)
С таким кодом это нормально....
Ты лучше скажи тебе что нужно-то, форму перемещать за клиенскую часть?
> [1] Kolan © (25.01.08 19:39)
Попробую угадать.... это наверное self т.е. его форма, которую трясет :)
Kolan (2008-01-25 19:39:00) [22]что такое search?
| |
Страницы: 