
Code: Select all
procedure TForm6.Button3Click(Sender: TObject);
var conn: TUniConnection;
asd: TUniTable;
begin
conn := TUniConnection.Create(self);
conn.ProviderName := 'SQLite';
conn.Database := 'test.db';
conn.Connect;
asd := TUniTable.Create(self);
asd.Connection := conn;
asd.TableName := 'testest';
asd.SpecificOptions.Values['QueryRecCount'] := 'True';
asd.Execute;
showmessage(inttostr(asd.RecordCount));
end;

If this is a bug, can i get a fixed version? I can send you my mail address from which i bought the components, if needed.
Greetings,
Peter[/code]