Discussion :

[peter27x]

Hello,

soit:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
//dans def de TMaClasse:
private
  index:integer;
  constructor create;
property monIndex:integer read index write index;

puis:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
constructor TMaClasse.create;
begin
  inherited; // NB: avec ou sans inherited ne change rien au pb...
  monIndex:=-1;
end;

// plus loin...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
titi:=TMaClasse.create;
showmesage(intToStr(titi.monIndex));

Et bien le message indique que monIndex vaut 0 et non -1 !!

J'arrive pas à lui faire entendre raison...

Merci aux âmes charitables.