Bonjour à tous,
Toujours dans le cadre de la migration d'un programme fait avec Delphi XE2 et interbase de l'époque vers Delphi 10.4 community et interbase 2020.

J'ai l'erreur suivante :
EIBInterbaseError : invalid transaction handle (expecting explicit transaction start)
lorsque le code suivant s'exécute :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 IBQuery5.Close;
 for i:=1 to 16 do begin
  Tires.Clear; Paquet.Clear;
 
  With Form3 do begin
   IBQuery5.Sql.clear;
   IBQuery5.Params.Clear;
   IBquery5.Params.CreateParam(ftinteger,'categorie', ptUnknown);
   IBQuery5.ParamByName('categorie').AsInteger := i;
   Requete:='select count(*) FROM DONNE where CAT =:categorie';
   IBQuery5.Sql.Add(Requete);
   IBQuery5.Open;                <== Ligne qui provoque l'erreur. 
   Nbre:=Form3.IBQuery5.Fields[0].AsInteger;  
   ........
   ........
Merci de vos suggestions
JL