Скачать: CL | DM;

Динамически создать 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;

---

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

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.008 c