Hello,
soit:
puis:Code:
1
2
3
4
5
6 //dans def de TMaClasse: private index:integer; constructor create; property monIndex:integer read index write index;
// plus loin...Code:
1
2
3
4
5
6 constructor TMaClasse.create; begin inherited; // NB: avec ou sans inherited ne change rien au pb... monIndex:=-1; end;
Et bien le message indique que monIndex vaut 0 et non -1 !! :evilred::evilred::evilred:Code:
1
2 titi:=TMaClasse.create; showmesage(intToStr(titi.monIndex));
J'arrive pas à lui faire entendre raison... :(
Merci aux âmes charitables.