Page 1 of 1

TVirtualTable.LoadFromFile does not work

Posted: Fri 10 Dec 2010 15:45
by carlonarcisi
I'm using postgres data 2.0

The problem is really very very simple.
At runtime I load 21,000 records into a table TVirtualTable,
SaveToFile C: \ XXX,
I close the program ..
Start program .. load data with LoadFromFile .. and It raise an exception in

VirtualTable at APPEND command Line 1521

for j := 0 to RecordCount - 1 do begin
Append;
try
for i := 0 to LocFieldDefs.Count - 1 do begin
Field := FieldArr;

Best Regard
Carlo Narcisi

Posted: Mon 13 Dec 2010 09:25
by AlexP
Hello,

Unfortunately, I can not can not reproduce the problem.
I have tested it on the following code:

Insert:
var
i: Integer;
begin
VirtualTable1.Open;
for i:=0 to 21000 do
begin
VirtualTable1.Append;
VirtualTable1['ID']:= i;
VirtualTable1['TEXT']:= 'Text_'+IntToStr(i);
VirtualTable1['DATE']:= date;
VirtualTable1.post;
end;
VirtualTable1.SaveToFile('e:\1.txt');

Load:

VirtualTable1.Open;
VirtualTable1.LoadFromFile('e:\64080.txt');

the fields were created manually.

Please try executing this code.