Вниз
Скачать: CL | DM;

Окна как у Winamp   Найти похожие ветки 

← →
kyn66 ©   (2007-10-17 16:17) [0]

Подскажите, каким образом сделать, чтобы снизу основной формы было приклеено другое окно типа как у winampa эквалайзер. И нужно чтобы приперетаскивании за шапку основной формы - нижняя следовала тоже следом, ну приклеилась снизу и все


← →
tesseract ©   (2007-10-17 16:36) [1]

Изучай сообщения окон, OnResize должен срабатывать.


← →
kyn66 ©   (2007-10-17 16:42) [2]

OnResize как раз и не срабатывает, т.к. размер у формы остается постоянным, надо событие на ее передвижение, а такого не обозреваю


← →
Efir   (2007-10-17 16:44) [3]

Смотри сообщение WMMoving, возникающее при перетаскивании формы.

private
   procedure WMMoving(var Msg:TWMMoving);message WM_MOVING;

procedure TForm1.WMMoving(var Msg: TWMMoving);
begin
 Form2.Left:=Left;
 Form2.Top:=Top+Height;
end;


← →
kyn66 ©   (2007-10-17 16:57) [4]

>> Efir
Огромное спасибо! То что нужно!


← →
Eraser ©   (2007-10-17 17:04) [5]


> kyn66 ©   (17.10.07 16:17) 

в JEDI VCL есть компонентик хороший.


← →
Palladin ©   (2007-10-17 18:08) [6]

в D7 у формы уже появилось свойство Snap или AutoSnap что то подобное


← →
Eraser ©   (2007-10-17 18:28) [7]

оно только для краев десктопа действует.



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

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



Память: 0.46 MB
Время: 0.011 c
15-1197795244
Kostafey
2007-12-16 11:54
2008.01.20
С днем рождения ! 16 декабря


15-1197965975
@!!ex
2007-12-18 11:19
2008.01.20
Установка компонентов на Turbo Delphi Explorer


9-1165965583
Vladimir1984
2006-12-13 02:19
2008.01.20
Как выставить на поверхности Карты высот числовые зачения?


6-1179133249
Санек2007
2007-05-14 13:00
2008.01.20
Загрузка изображения с сайта


15-1197523988
shlst
2007-12-13 08:33
2008.01.20
Ваша миссия, которая сама вас нашла :)




   Наверх