firebird/firebird-mirror
firebird/firebird-mirror
8
0
Fork 1
mirror of https://github.com/FirebirdSQL/firebird.git synced 2025-02-02 09:20:39 +01:00
Code Issues

Be sure to actually use the tpb we have just declared.

Browse Source
This commit is contained in:
Paul Reeves 2020-08-19 10:00:01 +02:00
parent 1d1284567a
commit f222127d4f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
examples/object_pascal/03.select.pas
View File

@ -221,7 +221,7 @@ Begin
tpb.insertTag(status, isc_tpb_read); tpb.insertTag(status, isc_tpb_read);
// start transaction // start transaction
tra := att.startTransaction(status, 0, nil); tra := att.startTransaction(status, tpb.getBufferLength( status ), tpb.getBuffer( status ));
// prepare statement // prepare statement
stmt := att.prepare(status, tra, 0, 'Select last_name, first_name, phone_ext from phone_list ' + stmt := att.prepare(status, tra, 0, 'Select last_name, first_name, phone_ext from phone_list ' +