Bonjour à tous,


J'ai créé une base de données avec des clés permettant de créer un treeviev en Delphi avec FIREBIRD 3/0.
En résumé ceci qui marche très bien sur un orddi Winows 10 qu j'appellerai "A".

VBARIABLE|Variableprecedente6libelle
exemple simplifié
N° |N°précédent|N° précédent|nom
1234|456|'SOLANUM'
et avant dans la base
456|123|"SOLANACEES"

Et un programme récursif pour créer un treeview avec la base :
Je précise : ça marche très bin sur un ordi portable "A" avec Delphi XE.3 Rio

Mias là, sur un autre ordi que j'appellerais "B" juste un message d'erreur au lancement de la création du TreeView récursif
"Erreur STACK OVERFLOW"
Rien à faire depiuis 2 semaines. Donc je viens ici, on ne sait jamais.
Soit je laisse le programme là ou ça marche, soit j'ai une réponse pour migrer vers Delphi Sydney sur un autre ordi.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
//loquaége swwapOverflow
function Recursive(Level : Integer) : Integer;
begin
  try
    Level := Level + 1;
    Result := Recursive(Level);
  except
    on E: EStackOverflow do
      Result := Level;
  end;
end;
En clair : Quels sont les paramétrages de windows 10 et Delphi pour éviter le "stack overflow" en cas de base de données/programme récursifs.

Merci d'avance si il y a quelqu'un qui a une idée
Vadim