Скачать: CL | DM;

вопрос про местоположение формы   Найти похожие ветки 

← →
Adios ©   (2007-08-24 14:45) [0]

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

---

← →
Сергей М. ©   (2007-08-24 14:54) [1]

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


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

---

← →
Vlad Oshin ©   (2007-08-24 14:55) [2]

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

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

---

← →
Adios ©   (2007-08-24 14:58) [3]

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

---

← →
sniknik ©   (2007-08-24 15:04) [4]

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

---

← →
sniknik ©   (2007-08-24 15:07) [5]

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

---

← →
clickmaker ©   (2007-08-24 15:08) [6]

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

---

← →
Adios ©   (2007-08-24 15:10) [7]

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

---

← →
Adios ©   (2007-08-24 15:12) [8]

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

---

← →
sniknik ©   (2007-08-24 15:13) [9]

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

---

← →
THandle ©   (2007-08-24 15:17) [10]

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

---

← →
THandle ©   (2007-08-24 15:22) [11]

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

---

← →
THandle ©   (2007-08-24 15:25) [12]

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

---

← →
THandle ©   (2007-08-24 15:27) [13]

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

---

← →
THandle ©   (2007-08-24 15:29) [14]

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

---

← →
engine ©   (2007-08-24 15:32) [15]

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

Это эхо

---

← →
THandle ©   (2007-08-24 15:35) [16]

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

---

← →
THandle ©   (2007-08-24 15:38) [17]

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

---

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

Скачать: CL | DM;



Память: 0.48 MB
Время: -0.98 c