Autor Téma: TIBCQuery - vždy iný výsledok (RecordCount)  (Přečteno 426 krát)

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
TIBCQuery - vždy iný výsledok (RecordCount)
« kdy: 21-09-2022, 15:10:53 »

Správne - DB Manažér
28 - 27 - 27
Prvé použitie
25 - 27 - 25
Druhé použitie
25 - 27 - 27
V oboch prípadoch je zdrojový text rovnaký a parametre sú zhodné !!!
Kód: [Vybrat]
  FqryService.ParamByName('PERIOD').AsDate := FAllDates[K];
  FqryService.ParamByName('FKFOCS').AsInteger := oGlobVar.IdFoc;
  TFDFunction.QryOpen(FqryService, nil);
FqryService.RecordCount
.
class procedure TFDFunction.QryOpen(const Query: TIBCQuery; FieldList: TList<TField>);
begin
  if Query.Active then
    Query.Refresh
  else
    Query.Open;
.
  Query.First;
end;
Nerozumiem tomu a hlavne neviem s tým pohnúť.
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:TIBCQuery - vždy iný výsledok (RecordCount)
« Odpověď #1 kdy: 21-09-2022, 15:32:11 »
Po pridaní tohto textu
Kód: [Vybrat]
  FqryService.Close;
  FqryService.SQL.Text := '';
  FqryService.SQL.Text := ServiceText;
a vždy výsledku 25 som úplne mimo.
Do kelu, teraz mi to došlo. Oni tam majú default nastavené Fetched = 25.
Nikde som nenašiel možnosť nastaviť to na FetchAll - vie niekto poradiť ako sa to dá? Programovo. Najlepšie v Connection či Transaction.
Aha   FqryService.FetchAll := True;
« Poslední změna: 21-09-2022, 15:36:02 od Stanislav Hruška »
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.