Динамически создать TTabSheet с TImage на нем.

← →
Cowboy © (2002-07-08 17:56) [0]

Доброго времени суток! Подскажите...!? Есть база. Сколько записей в базе, столько же и TabSheet с Image должно быть(причем может быть как одна запись, так и десять). Я делаю динамический массив...
DDD : array of TTabSheet; PPP : array of TImage; ... SetLength(DDD,n); SetLength(PPP,n); //где n - это кол-во записей в базе for i := 0 to n - 1 do begin DDD[i] := TTAbSheet.Create(nil); PPP[i] := TImage.Create(nil);
Присваиваю им Left, Top и т.д. , но они у меня не создаются... :(((
Помогите плз...

← →
Skier © (2002-07-08 18:00) [1]

>Cowboy

- Нужно задавать Parent
DDD[i].Parent := PageControl;
PPP[i].Parent := DDD[i];

- Для TTabSheet нужно задавать PageControl
DDD[i].PageControl:= PageControl;

Динамически создать TTabSheet с TImage на нем. Найти похожие ветки