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

PaNEL   Найти похожие ветки 

← →
diks ©   (2003-01-22 17:48) [0]

Помогите как сделать чтобы при наведении на форму(Form2) панель(panel4) медленно опускалась?

---

← →
Delirium^.Tremens ©   (2003-01-22 17:51) [1]

Drunken Dolphin #1
Апплодисменты!

---

← →
Chubais ©   (2003-01-22 17:55) [2]

))))))))))))))

---

← →
MBo ©   (2003-01-22 17:55) [3]

Bewelwidth менять и другие Bewel***

---

← →
MBo ©   (2003-01-22 17:56) [4]

Так она вдавится ;))

---

← →
KDenis ©   (2003-01-22 17:58) [5]

Меняй свойство Top

---

← →
diks ©   (2003-01-22 18:04) [6]

чтобы сама при наведении потихоньку ползла вниз!

---

← →
KDenis ©   (2003-01-22 18:14) [7]

Для особо одарённых:
procedure TForm2.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
panel4.Top:=panel4.Top+1;
sleep(100);
if panel4.Top+panel4.Width>form2.Width
then panel4.Top:=0
end;

---

← →
Chubais ©   (2003-01-22 18:24) [8]

KDenis © (22.01.03 18:14)
ну дык если мыш остановить, и панель остановится
а строчки, учитывая постановку задачи,
if panel4.Top+panel4.Width>form2.Width
then panel4.Top:=0
из области магии...мне непонятны...

---

← →
KDenis ©   (2003-01-22 19:23) [9]

Да, ты прав, это магия...
if panel4.Top+panel4.Width>form2.Width
then panel4.Top:=0
Если нижний край panel4 выходит за пределы form2, то ставим panel4 в верхней части form2

---

← →
KDenis ©   (2003-01-22 19:26) [10]

<<ну дык если мыш остановить, и панель остановится>>
Я дал только наводку, а дальше сам разберётся...
(например использовать таймер)

---

← →
Anatoly Podgoretsky ©   (2003-01-22 19:51) [11]

А с чего ты решил, что про мышку речь, может про тень

---

← →
uw ©   (2003-01-22 22:36) [12]

Я подозреваю, он хочет, чтобы панель ползла в чужой программе!

---

← →
Mihey   (2003-01-22 23:35) [13]

Опускай её!

---

← →
Chubais ©   (2003-01-23 11:16) [14]

KDenis © (22.01.03 19:23)
ты б хоть смотрел иногда чо пишешь...

---

← →
diks ©   (2003-01-24 11:55) [15]

Не мог посмотреть что пишу меня не было!
Спасибо за ответ!

---

← →
Chubais ©   (2003-01-24 12:11) [16]

> diks © (24.01.03 11:55)
> Не мог посмотреть что пишу меня не было!

АААААААААААААААААААААААААААААААААА!!!!!!!!!!!!!!!!!!!!!!!!!!

---

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

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



Память: 0.47 MB
Время: 0.01 c