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

Вниз

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

 
brat2 ©   (2004-07-31 12:13) [0]

Я создаю свою панель в рантайме.
Цель: добавить в нее ряд компонентов в цикле. Например: рич, сплит, рич, сплит и т.д.

Однако несмотря на корядок вставки по коду, компоненты сбиваются в кучу - поля в одну, сплиты в другую.

Выравнивание (align) у всех деляю например alLeft.

Самое обидное, что в дизайнтайме все получается, но я привык писать руками.

В чем секрет ?

А еще фишка: в панель в ее конструкторе вставляю THeaderControl (Align := alTop;).  Затем по событию вставляю еще панель (выравнивание то же)... Дак она лезет выше нидера - что за дела ???


 
Sun bittern ©   (2004-07-31 12:57) [1]

Все работает, код свой приведите.

 var
   I: Integer;
   R: TRichEdit;
   S: TSplitter;
begin
 for I := 2 to 8 do
 begin
   if I mod 2 = 0 then
   begin
     R := TRichEdit.Create(Self);
     R.Align := alLeft;
     R.Parent := Panel1;
   end else
   begin
     S := TSplitter.Create(Self);
     S.Align := alLeft;
     S.Parent := Panel1;
   end;
 end;
end;


 
GuAV ©   (2004-07-31 20:54) [2]


> А еще фишка: в панель в ее конструкторе вставляю THeaderControl
> (Align := alTop;).  Затем по событию вставляю еще панель
> (выравнивание то же)... Дак она лезет выше нидера - что
> за дела ???

Попробуй присвоить еще панели св-во Top:=1; .Перед заданием парента, ессно.



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

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

Наверх




Память: 0.47 MB
Время: 0.049 c
1-1091261600
brat2
2004-07-31 12:13
2004.08.15
компоненты лезут без очереди!!!


6-1086947219
m2003
2004-06-11 13:46
2004.08.15
Почта на Делфи


6-1087299366
Razor
2004-06-15 15:36
2004.08.15
Атрибуты файла по HTTP (IdHTTP)


8-1085916829
gyry
2004-05-30 15:33
2004.08.15
книги по работе з файлами мультимедиа


1-1091101700
sohat
2004-07-29 15:48
2004.08.15
Отловить событие с клавиатуры или мыши в неактивном приложении?