Bonjour à tous,
Je crois que mon problème vient de ma façon d'appréhender la conception objet.
J'ai une unitée toute simple qui réalise des calculs de distances, implémenter comme ceci:
Dans une autre unité, j'utilise cette unité et je déclare : FTableauSection : TTableauSection, puis je fais appel à ma fonction par:
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
16 type TTableauSection = class(TObject) private NbreSectionsneutres,taille:integer; pkDebutLigne,pkFinLigne:double; public function CalculSectionNeutre(numero_simu : integer) : integer; end; ---- function TTableauSection.CalculSectionNeutre(numero_simu : integer) : integer; begin DataModule1.Query_SIM_TOPO.Open; NbreSectionsneutres := 0; ------ end;
Mon problème, c'est que lorsque je fait une exectution pas à pas et que mon programme arrive sur " NbreSectionsneutres := 0;" alors il saute directement à une autre partie de mon programme...
Code : Sélectionner tout - Visualiser dans une fenêtre à part num := FTableauSection.CalculSectionNeutre(1);
Quelqu'un saurait-il d'où cela peut provenir? Toutes les suggestions sont les biens venus.
Merci, @+.
Partager