Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];

Вниз

Как наваять в 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 еще неактивен


 
Lord Warlock   (2002-11-18 09:15) [4]

После конструкции
for i:=0 to Length(F)-1 do
begin
with FieldDefs.AddFieldDefs do
begin
Name:=F[i];
FieldType:=ftString;
end;

нужно писать
Create
Open

тк ты создаешь новую таблицу, и только потом делать
Append



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

Форум: "Базы";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
1-14678
Dristl
2002-11-25 21:56
2002.12.05
Подскажите, пожалуйста, можно ли запретить выделение в TEdit?


8-14692
frum
2002-08-15 09:42
2002.12.05
Zoomer - ЛУПА


1-14538
Jul
2002-11-26 18:21
2002.12.05
(v & 0xC0) >> 6)


7-14834
BOI
2002-10-03 13:44
2002.12.05
Как поймать окончание копирования файла


1-14611
litex
2002-11-24 20:56
2002.12.05
Как изменить шрифт установленный по умолчанию ...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский