For now in IB_Parse.pas, comenting the line SuffStrings out, seems to work
for me as a temp patch

procedure SetSQLForUpdate ( var SQL: string; const SQLForUpdate: string );
var
BegPos, EndPos: longint;
begin
FindSQLForUpdate( SQL, BegPos, EndPos );
if BegPos <> ParseLineInvalid then begin
// StuffStrings( SQL, SQLForUpdate, BegPos, EndPos );
end else begin
SQL := SQL + #13#10 + SQLForUpdate;
end;
end;

----------------------------------------------------------------------------
-------------
Oops .. Helen, I posted this as wrong reply in <firebird-support> by
mistake. Forgive me ..
----------------------------------------------------------------------------
-------------

----- Original Message -----
From: "L.M. Bemmelmans" <info@...>
To: "IBObjects" <ibobjects@yahoogroups.com>
Sent: Thursday, July 24, 2003 7:42 AM
Subject: [IBO] FOR UPDATE WITH LOCK doesn't perform


| Hi,
|
| TIBOquery will not send the following command to the server:
|
| SELECT * FROM myTable WHERE id = :id FOR UPDATE WITH LOCK
|
| In stead it sends (monitor):
|
| SELECT * FROM myTable WHERE id = ? /* :id */
|
| How can I perform this query and get my record ? locked
|
| Leon
|
|
|
|
|
|
___________________________________________________________________________
| IB Objects - direct, complete, custom connectivity to Firebird or
InterBase
| without the need for BDE, ODBC or any other layer.
|
___________________________________________________________________________
| http://www.ibobjects.com - your IBO community resource for Tech Info
papers,
| keyword-searchable FAQ, community code contributions and more !
|
| Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
|
|
|