Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.06.11;
Скачать: CL | DM;

Вниз

экспорт в *.dbf   Найти похожие ветки 

 
WellSlava   (2006-04-19 10:05) [0]

Мне небходимо набор данных (DataSet или DBGrid) записать в таблицу dbf, предварительно ее создав из структуры DataSet-а.
Подскажите, пожалуйста, может есть какие-то компоненты для этого?


 
Stanislav ©   (2006-04-19 11:23) [1]

а insert into ?


 
Stanislav ©   (2006-04-19 11:23) [2]

или select into?


 
solenko ©   (2006-04-19 12:25) [3]


var t: TTable;
i: integer;
begin
 t:= TZTable.Create(self);
 t.TableName := "dbf_name.dbf";
 for i:=0 to myDataSet.FieldDefs.Count - 1 do
 begin
   t.FieldDefs.Add(myDataSet.FieldDefs.Items[i].Name,   myDataSet.FieldDefs.Items[i].DataType, myDataSet.FieldDefs.Items[i].Size);
 end;
 t.CreateTable;
 myDataset.First;
 t.Open;
 while not(myDataSet.Eof) do
 begin
   t.Append;
   for i:=0 to myDataset.Fields.Count -1 do
   begin
     t.Fields[i].AsVariant := myDataset.Fields[i].AsVariant;
   end;
   t.Post;
   myDataset.Next;
 end;
end;



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

Текущий архив: 2006.06.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.028 c
15-1148094593
bara-igor
2006-05-20 07:09
2006.06.11
Юникоды Delphi


2-1148412478
chizra
2006-05-23 23:27
2006.06.11
ошибка при записи в файл функцией FileWrite...


3-1145426749
WellSlava
2006-04-19 10:05
2006.06.11
экспорт в *.dbf


15-1147704023
Константинов
2006-05-15 18:40
2006.06.11
Вопрос Москвичам


15-1147976042
Seldon
2006-05-18 22:14
2006.06.11
плагин к XChat