Прошу прощения за беспокойство, но никак не могу найти функции работы с dbf. Требуется из qwery создать файл и перенести туда qwery, чтобы потом открыть этот файл в 1С. Когда использую метод insert все пишется почему то, в первую ячейку! кто работал с dbf подскажите!
Вот иходник:
Код:
tWast:=TTable.Create(nil);
tWast.TableType:=ttDBase;
tWast.TableName:='DIMON.DBF';
tWast.FieldDefs.Add('DATE',ftString,50,FALSE);
tWast.FieldDefs.Add('MASSA',ftstring,50,FALSE);
tWast.FieldDefs.Add('NOM',ftString,50,FALSE);
tWast.CreateTable;
tWast.Active := true;
for i:=1 to 3 do
begin
tWast.Insert;
twast.FieldByName('DATE').AsString:='3';
twast.FieldByName('MASSA').AsString:='2';
twast.FieldByName('NOM').AsString:='1';
tWast.Post;
end;
tWast.Free;
Admin: Теги и еще раз теги!