![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
OnResize
Denya © (2005-02-27 14:18:00)Есть такая проблема:
На формочке есть 2 панели верхняя Client, нижняя Bottom, между ними сплитер, при ресайзе формы нужно что бы размер нижней панели был пропорциональным, вопрос где ( в каком событии) можно узнать текущее размеры панелей, что бы посчитать пропорции, в OnResize доступны уже новые размеры.
Заранее спасибо.
olookin (2005-02-27 14:27:00) [1]Вот мой пример, суть та же
procedure TFileWindowCol.FormResize(Sender: TObject);
var n: integer;
begin
n:=Width-25;
ListView2.Column[0].Width:=trunc(n*2/3);
ListView2.Column[1].Width:=trunc(n*1/3);
end;
Viktop (2005-02-27 14:20:00) [2]Прямо в onResize и высчитывай