I am facing a random access violation (program exits silently or after showing "Access violation") after running Query.Refresh
What is embarrassing most is that I failed to reproduce it with a minimal program.
It occurs in file 'source\dbc\ZDbcCache.pas' at line
Code: Select all
function TZRowAccessor.GetInt(ColumnIndex: Integer; out IsNull: Boolean): Integer;
var
Data: PPointer;
PW: PWideChar;
PA: PAnsiChar absolute PW;
Len: NativeUint;
begin
{$IFNDEF DISABLE_CHECKING}
CheckColumnConvertion(ColumnIndex, stInteger);
{$ENDIF}
Result := 0;
{$R-}
-----> if FBuffer.Columns[FColumnOffsets[ColumnIndex{$IFNDEF GENERIC_INDEX} - 1{$ENDIF}]] = bIsNotNull then begin
Code: Select all
SELECT id,name FROM foo WHERE name IN (SELECT label FROM bar);
Any help could be appreciated.
Thank you.
- RDBM: Postgres 14
- OS: Windows 11
- IDE: CT 7.7