Форум: "Начинающим";
Текущий архив: 2008.02.03;
Скачать: [xml.tar.bz2];

Вниз

динамическое создание фреймов.   Найти похожие ветки 

← →
Golikov   (2008-01-04 20:34) [0]

ситуация такая:
необходимо динамически создавать фреймы. делаю так:
кидаю на форму Фреймбар.затем :

for i:=0 to datamodule1.ADOTable1.RecordCount -1 do begin
sFrameBar1.Items.Insert(i);
sFrameBar1.Items[i].Caption:=datamodule1.ADOTable1.fieldbyname("Pole1").AsString ;
datamodule1.ADOTable1.Next ;
end;

фреймы я создаю также динамически, но как их "прикрутить" к items[i] ?????

---

← →
Golikov   (2008-01-05 02:49) [1]

неужели ни кто не знает ?

---

← →
turbouser ©   (2008-01-05 03:37) [2]

> Golikov   (05.01.08 02:49) [1]
>
> неужели ни кто не знает ?

Что значит "прикрутить" ? И что такое sFrameBar1 ?

---

← →
{RASkov} ©   (2008-01-05 10:27) [3]

> [0] Golikov   (04.01.08 20:34)
> необходимо динамически создавать фреймы. делаю так:


> for i:=0 to datamodule1.ADOTable1.RecordCount -1 do begin
> sFrameBar1.Items.Insert(i);
> sFrameBar1.Items[i].Caption:=datamodule1.ADOTable1.fieldbyname("Pole1").AsString  ;
> datamodule1.ADOTable1.Next ;
> end;

И какой строкой здесь, стесняюсь спросить, создаются фрэймы? :)

> фреймы я создаю также динамически,

Так же это как??? :(

---

← →
golikov   (2008-01-05 13:48) [4]


var
frame:array of TFrame;
i:integer;
begin
for i:=0 to 25 do begin
frame[i]:=tframe.Create(sframebar1);
frame[i].parent:=sframebar1;
frame[i].Width :=20;
frame[i].Height :=250;
end;

sFramebar это компанент Alphacontrols;
в нем создаются так назывыаемые заголовки фреймов(items),так вот их надо связать с созданными фреймами. понятно ?

---

← →
MsGuns ©   (2008-01-05 14:40) [5]

1. TObjectList/TList

2. TCollection

3. Array of Pointer

4. В классе фрэйма прикрутить поле int, куда записывать при создании индекс фрэйма (ту самую "i").
Для поиска нужного фрэма перебирать все, проверяя это поле на соответствия искомому i
(ИМХО - самый корявый способ)

---

← →
golikov   (2008-01-05 17:58) [6]

(ИМХО - самый корявый способ)
ну подскажите не корявый.

---

← →
MsGuns ©   (2008-01-06 00:52) [7]

>golikov   (05.01.08 17:58) [6]
>ну подскажите не корявый.

В порядке приоритета (см. [5]):

1.
2.
3.

---

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

Форум: "Начинающим";
Текущий архив: 2008.02.03;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.037 c