fix: disable paging with 50 rows on Interbase/Firebird

See https://www.heidisql.com/forum.php?t=44710
This commit is contained in:
Ansgar Becker
2026-01-22 07:24:01 +01:00
parent 549e2629f4
commit 271d0623f9

View File

@@ -4122,6 +4122,9 @@ begin
SetLength(FLastRawResults, 0);
FdQuery := TFDQuery.Create(Self);
FdQuery.Connection := FFDHandle;
// Disable paging with 50 rows
FdQuery.FetchOptions.Mode := fmAll;
FdQuery.FetchOptions.RecsMax := -1;
// Todo: suppress mouse cursor updates
try
FdQuery.ResourceOptions.CmdExecTimeout := Parameters.QueryTimeout;