| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
не работают сплиттеры
ekto © (2008-11-26 15:57:00)Всем добрый день!
код:
var
i: Integer;
Frame: TMyFrame;
spl: TSpitter;
begin
for i := 0 to 5 do
begin
Frame := TMyFrame.Create(self);
Frame.Parent := ScrollBox1;
Frame.Align := alTop;
spl := TSplitter.Create(self);
spl.Color := clRed;
spl.Align := alTop;
spl.Parent := ScrollBox1;
end;
end;
TMyFrame - фрейм, есно. Так вот, все добавляется(правда сплиттер цвет менять когда желает, когда нет или поменяется цвет не по все длине - не поймешь), но! Сплиттерами я ничего раздвинуть не могу. Почему? Как сделать, чтобы заработало?
ekto (2008-11-26 16:21:00) [1]
> clickmaker © (26.11.08 16:04) [1]
спс, попробую, как доберусь до дельфи
clickmaker (2008-11-26 16:04:00) [2]чтобы раздвигать, нужно, чтобы хотя бы одна панель имела алигн отличный от всех остальных
н-р, alLeft | alClient
| |
