Invalid Field Size with dbexpsda 2.0.4.
Posted: Wed 08 Dec 2004 15:29
When I upgrade my dbexpress driver from version 1.8.4 to version 2.0.4 I start receiving the message above in a query that previously worked well....The code follows...
procedure TMyTable.GetRecords(const Cmd:AnsiString);
var
Options : TGetRecordOptions;
RecsOut : integer;
DataSet : TCustomSQLDataSet;
begin
Options := [grMetaData,grReset];
DataSet := nil;
SQLConnection.Execute(Cmd,nil,@DataSet);
try
if DataSet nil then begin
FProvider.DataSet := DataSet;
FProvider.Options := FProvider.Options + [poRetainServerOrder];
Data := FProvider.GetRecords(-1, RecsOut, Byte(Options));
end;
finally
if DataSet nil then
DataSet.Close;
DataSet.Free;
end;
end;
Cmd is a query that contains a field of type int...i receive invalid field size in this field
procedure TMyTable.GetRecords(const Cmd:AnsiString);
var
Options : TGetRecordOptions;
RecsOut : integer;
DataSet : TCustomSQLDataSet;
begin
Options := [grMetaData,grReset];
DataSet := nil;
SQLConnection.Execute(Cmd,nil,@DataSet);
try
if DataSet nil then begin
FProvider.DataSet := DataSet;
FProvider.Options := FProvider.Options + [poRetainServerOrder];
Data := FProvider.GetRecords(-1, RecsOut, Byte(Options));
end;
finally
if DataSet nil then
DataSet.Close;
DataSet.Free;
end;
end;
Cmd is a query that contains a field of type int...i receive invalid field size in this field