Как наваять в TTable свою собственную таблицу?

← →
7Up © (2002-11-15 12:51) [0]

Привет мастерам!

Во-первых, TTable, существует у меня в виде свойства класса, надо ли ему отдельный Create писать?

Во-вторых, как в этот TTable загонять данные? Желательно чтобы данные вводились кортежами.

Я писал так

{Cоздание класса с TTable}

var
i:integer;
F:Array of Ansistring;

for i:=0 to Length(F)-1 do
begin
with FieldDefs.AddFieldDefs do
begin
Name:=F[i];
FieldType:=ftString;
end;
Append // и здесь выскакивает ошибка EDatabaseError

......
end;

Заранее спасибо.

← →
Prooksius © (2002-11-15 13:23) [1]

Во-первых: да надо.
Можно расшифровать это:

> {Cоздание класса с TTable}

Что конкретно пишет в этой ошибке:

> Append // и здесь выскакивает ошибка EDatabaseError

← →
7Up © (2002-11-18 08:46) [2]

Извиняюсь сократил объяснения...
{Создание класса с TTable}

type
SomeClass=class
Table:TTable;
...
end;

var
SomeClass1:TSomeClass;

Implementation

SomeClass1:=TSomeClass.Create;
...

Ошибка выскакивает типа
"Cannot perform this operation on closed dataset"

← →
Reindeer Moss Eater (2002-11-18 09:01) [3]

В конструкторе TSomeClass вызывается какой-то из методов TTable, в то время, как сам TTable еще неактивен

После конструкции
for i:=0 to Length(F)-1 do begin with FieldDefs.AddFieldDefs do begin Name:=F[i]; FieldType:=ftString; end;
нужно писать
Create
Open
тк ты создаешь новую таблицу, и только потом делать
Append

Как наваять в TTable свою собственную таблицу? Найти похожие ветки