Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Make mysql_fetch_field() available. Helps in debugging #697.
  • Loading branch information
ansgarbecker committed Jul 8, 2019
1 parent 2a91a13 commit a249753
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions source/dbstructures.pas
Expand Up @@ -345,6 +345,7 @@ TMySQLLib = class(TDbLib)
mysql_errno: function(Handle: PMYSQL): Cardinal; stdcall;
mysql_error: function(Handle: PMYSQL): PAnsiChar; stdcall;
mysql_fetch_field_direct: function(Result: PMYSQL_RES; FieldNo: Cardinal): PMYSQL_FIELD; stdcall;
mysql_fetch_field: function(Result: PMYSQL_RES): PMYSQL_FIELD; stdcall;
mysql_fetch_lengths: function(Result: PMYSQL_RES): PLongInt; stdcall;
mysql_fetch_row: function(Result: PMYSQL_RES): PMYSQL_ROW; stdcall;
mysql_free_result: procedure(Result: PMYSQL_RES); stdcall;
Expand Down Expand Up @@ -7722,6 +7723,7 @@ procedure TMySQLLib.AssignProcedures;
AssignProc(@mysql_errno, 'mysql_errno');
AssignProc(@mysql_error, 'mysql_error');
AssignProc(@mysql_fetch_field_direct, 'mysql_fetch_field_direct');
AssignProc(@mysql_fetch_field, 'mysql_fetch_field');
AssignProc(@mysql_fetch_lengths, 'mysql_fetch_lengths');
AssignProc(@mysql_fetch_row, 'mysql_fetch_row');
AssignProc(@mysql_free_result, 'mysql_free_result');
Expand Down

0 comments on commit a249753

Please sign in to comment.