Discussion :

[PadawanDuDelphi]

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:

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;

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

num := FTableauSection.CalculSectionNeutre(1);

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...

Quelqu'un saurait-il d'où cela peut provenir? Toutes les suggestions sont les biens venus.

Merci, @+.

[Bruno@Chrysis]

En général quand c'est comme ca c'est que la ligne en question n'est pas compilée (surement car elle ne sert pas).

Bruno

[edam]

as tu appelé creat de l'objet avant l'utilisation??

[PadawanDuDelphi]

as tu appelé creat de l'objet avant l'utilisation??

Exact !! Je me sens vraiment idiot sur le coup, mais bon...

en tout cas merci pour tout.

@+.