Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

Как в disign-time е отловить факт изменения размеров формы?   Найти похожие ветки 

 
Эдуард   (2004-03-22 13:08) [0]

Господа мастера, сабж собственно. Суть проблемы в следующем:
нужно отловить дизайнтаймовое изменение размеров формы, с тем чтобы их, например подогнать к определённой линейке размеров.
Подчёркиваю, что это нужно именно в disign-time, что бы разработчик не мог задать в процессе компоновки размеры, не входящие в линейку допустимых.  
PS: Constraints не предлагать, размеры могут составлять дискретные знчения, а не интервал, напр. 200, 250, 300-320, 400.


 
BillyJeans ©   (2004-03-22 13:19) [1]

пиши свой класс - наследник TForm, и обрабатывай изменения размера...


 
Юрий Зотов ©   (2004-03-22 16:57) [2]

> Эдуард

Чтобы код работал, он должен быть откомпилирован. Значит, чтобы он работал в design-time, он должен быть откомпилирован в design-time пакет. Делаете свой наследник TForm, директиву $R из кода выбрасываете, в код добавляете все, что хотите (например, можно заместить SetBounds) и пишете процедуру Register:
RegisterCustomModule(TMyForm, TCustomModule);
Копилируете пакет, устанавливаете его в Delphi, свои рабочие формы наследуете от TMyForm. Все.

Проще и удобнее будет все это проделать, используя эксперт Сергея Орлика CFPack.



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

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.063 c
14-1082344951
BlackComb
2004-04-19 07:22
2004.04.11
Входящий и Исходящий трафик


14-1082523056
Kolyan
2004-04-21 08:50
2004.04.11
Turbo Pascal 7.0


14-1081686789
Thor
2004-04-11 16:33
2004.04.11
самоубийство.


1-1080056808
Andrew
2004-03-23 18:46
2004.04.11
Model Family Stepping???


11-1068772474
Ciber SLasH
2003-11-14 04:14
2004.04.11
Почему в KOL форма сворачивается начиная с левого угла