Вниз
Скачать: CL | DM;

Создание объектов в РанТайме...   Найти похожие ветки 

← →
nv_ ©   (2004-04-20 17:48) [0]

Доброе время суток, уважаемые мастера.
У меня следующий вопрос: Как корректно создавать n-ое, нет n мало, m-ое ;))) колличество объектов в рантайме?
Конкретная задача поставлена так: загружать из инифайла данные о нужных таблицах, и в рантайме создавать компонет TTable, загрузить в него данные.
Моя проблема: Не знаю как правлильно создать m  этих самых таблиц, никогда еще не надо было всё делfть в рантайме.


← →
WondeRu ©   (2004-04-20 17:56) [1]

создавай список TList для таблиц, затем в цикле создавай

var
ATable : TTable;
i : INteger;
begin


for i := 0 to N - 1 do
begin
 ATable := TTable.create(nil);
 ATable.DataBase := ...

 List1.add(ATable);
end;


думаю заработает


← →
Плохиш   (2004-04-20 17:56) [2]

for i:= 0 to m do
 with TTable.Create(self) do
 begin
 ....
 end;


← →
WebErr ©   (2004-04-20 17:56) [3]


Tablitsa: array[1..m] of TTablitsa;
...
for i := 1 to m do
 Tablitsa[i] := TTablitsa.Create(...);

Примерно так! :))))


← →
WebErr ©   (2004-04-20 17:58) [4]

Ну и в том же цикле

if not Assigned(Tablitsa[i]) then
 PlohoVsyo(...);


← →
LM2   (2004-04-20 18:12) [5]

Лучше создавать компоненты В TObjectList, их потом удалять не надо!



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

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



Память: 0.46 MB
Время: 0.026 c
8-1076756002
NEOMEN
2004-02-14 13:53
2004.04.11
Взаимодействие Flash и Delphi


1-1082802340
csr
2004-04-24 14:25
2004.04.11
Своя надпись на TListView


14-1079624431
nastojashij Kamerad
2004-03-18 18:40
2004.04.11
KAMERAD: "Я DELFI ПОЧЕНИЛ"!


14-1079411613
просто юзер
2004-03-16 07:33
2004.04.11
заработок в инете - реально ли это?


3-1079263216
serrrrr
2004-03-14 14:20
2004.04.11
Firebird 1.5




   Наверх