Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

вопрос про местоположение формы [D7, XP]


Adios ©   (2007-08-24 14:45:00) 

у меня стоит процедура перетаскивания формы за любое место при зажатой мыши, но когда я пытаюсь отпустить её и свойство формы TOP получается (например -150) то программа сбрасывает это свойство на 0, как можно избежать этого?


THandle   (2007-08-24 15:38:00) [1]

Удалено модератором


THandle   (2007-08-24 15:35:00) [2]

Удалено модератором


engine   (2007-08-24 15:32:00) [3]

> [14] THandle ©   (24.08.07 15:29)

Это эхо


THandle   (2007-08-24 15:29:00) [4]

Что же это такое? кто мой пост копирует?


THandle   (2007-08-24 15:27:00) [5]

Удалено модератором


THandle   (2007-08-24 15:25:00) [6]

Удалено модератором


THandle   (2007-08-24 15:22:00) [7]

> sniknik [9]
Пока отошел уже опередили:(


THandle   (2007-08-24 15:17:00) [8]

ReleaseCapture;
perform(WM_SYSCOMMAND,$F012,0);


sniknik   (2007-08-24 15:13:00) [9]

> а зачем SC_MOVE плюс два?
это просто подгонка к $f012, номеру команды.


Adios   (2007-08-24 15:12:00) [10]

clickmaker (а зачем SC_MOVE плюс два?) понятия не имею, так написано в книге


Adios   (2007-08-24 15:10:00) [11]

SC_MOVE я так понял метод шапки приложения, тогда понятно где ошибка, но как её тогда исправить?, может можно заменить его чем-нибудь?


clickmaker   (2007-08-24 15:08:00) [12]

а зачем SC_MOVE плюс два?


sniknik   (2007-08-24 15:07:00) [13]

ну вот точно... пока писал. [3] это команда "тяги за заголовок", обрабатывается системой и как ей угодно.


sniknik   (2007-08-24 15:04:00) [14]

> ставится как положено ..
потому что ставится, т.е. прямое присваивание, а у него видать используется метод у которого свои ограничения.
ну например переопределена команда "тяги за заголовок", ну и как мышкой за заголовок затянуть форму за -150 если мышка останавливается на границе? вот оно даже и не рассматривается. хотя 0 это както неправильно, мышкой чуть чуть можно и в минус затянуть... т.е. должно "сбрасываться" не в 0 а во чтото меньшее -10 например... но... у него может быть и другой метод, или другая операцонка.


Adios   (2007-08-24 14:58:00) [15]

ReleaseCapture;
 Perform  (WM_SYSCOMMAND,SC_MOVE+2,0);
ошибка здесь?


Vlad Oshin   (2007-08-24 14:55:00) [16]

procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Top:=-150;
end;

ставится как положено ..


Сергей М.   (2007-08-24 14:54:00) [17]


> как можно избежать этого?


Исправить ошибки в программе, которая "сбрасывает это свойство на 0"


Наверх

Титульная страница Поиск, карта сайта Написать письмо