paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 10:49:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

fcl-db: odbc: make TODBCCursor.STMTHandle and ODBCSuccess public

Browse Source 
git-svn-id: trunk@49056 -
(cherry picked from commit 1ad9091763)
This commit is contained in:
ondrej 2021-03-26 07:19:17 +00:00 committed by marcoonthegit
parent a4866c5c65
commit bfe83a3a87
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fcl-db/src/sqldb/odbc/odbcconn.pas
View File

@ -32,6 +32,8 @@ type
FParamIndex:TParamBinding; // maps the i-th parameter in the query to the TParams passed to PrepareStatement
FParamBuf:array of pointer; // buffers that can be used to bind the i-th parameter in the query
public
property STMTHandle:SQLHSTMT read FSTMTHandle;
constructor Create(Connection:TODBCConnection);
destructor Destroy; override;
end;
@ -142,6 +144,8 @@ type
Class Function Description : String; override;
end;
function ODBCSuccess(const Res:SQLRETURN):boolean;
implementation
uses