Skip to content
Permalink
Browse files

Make mysql_fetch_field() available. Helps in debugging #697.

  • Loading branch information...
ansgarbecker committed Jul 8, 2019
1 parent 2a91a13 commit a2497536835b999f0637014259742b482a9b408d
Showing with 2 additions and 0 deletions.
  1. +2 −0 source/dbstructures.pas
@@ -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;
@@ -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');

0 comments on commit a249753

Please sign in to comment.
You can’t perform that action at this time.