|
@@ -715,7 +715,7 @@ end;
|
|
|
|
|
|
constructor TSQLite.Create(Aowner: tComponent);
|
|
constructor TSQLite.Create(Aowner: tComponent);
|
|
begin
|
|
begin
|
|
-inherited create(owner);
|
|
|
|
|
|
+inherited create(Aowner);
|
|
fLstName := TStringList.Create;
|
|
fLstName := TStringList.Create;
|
|
fLstVal := TStringList.Create;
|
|
fLstVal := TStringList.Create;
|
|
fDoSql:=false;
|
|
fDoSql:=false;
|