diff options
| author | michael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2010-11-02 09:46:07 +0000 |
|---|---|---|
| committer | michael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2010-11-02 09:46:07 +0000 |
| commit | 10abad2852f2d8b8885186638bbf9ef7b7f9d9cc (patch) | |
| tree | f42099879c3a139ced6fbc9f23da9210d23dd00a /packages/fcl-db | |
| parent | ca744d6e2c4a49da9471ce53248a3e3909f57e47 (diff) | |
| download | fpc-10abad2852f2d8b8885186638bbf9ef7b7f9d9cc.tar.gz | |
* Fixed SetInsertSQL/SetDeleteSQL
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@16295 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fcl-db')
| -rw-r--r-- | packages/fcl-db/src/sqldb/sqldb.pp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/packages/fcl-db/src/sqldb/sqldb.pp b/packages/fcl-db/src/sqldb/sqldb.pp index 56686500be..0403c44ac3 100644 --- a/packages/fcl-db/src/sqldb/sqldb.pp +++ b/packages/fcl-db/src/sqldb/sqldb.pp @@ -1606,12 +1606,12 @@ end; procedure TCustomSQLQuery.SetDeleteSQL(const AValue: TStringlist); begin - FDeleteQry.Assign(AValue); + FDeleteSQL.Assign(AValue); end; procedure TCustomSQLQuery.SetInsertSQL(const AValue: TStringlist); begin - FInsertQry.Assign(AValue); + FInsertSQL.Assign(AValue); end; Procedure TCustomSQLQuery.SetDataSource(AVAlue : TDatasource); |