Re-bonjour,
Desole le titre n'est pas tres explicite. Voici mon problème:
J'ai une classe que j'ai déclaré en TList:
Et ensuite je voudrais creer des procedure permettant l'ajout, la suppression d'element dans mon TList (en reprenant les outils du TList).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 type TLigne = class(TList) public procedure AjouteObjet(TypeObjet:integer);
Voici ma procedure a l'heure actuelle:
Je pense que j'ai un probleme dans ma logique objet, alors si quelqu'un a une idée ou une critique, je suis preneur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 procedure TLigne.AjouteObjet(TypeObjet:integer); var aObjet:TObjet; //un objet a moi. begin aObjet:=TObjet.Create(aObjet.GetParentComponent,TypeObjet); TLigne.Add(aObjet); //le probleme est là, je sais pourquoi mais je vois pas comment faire. aObjet.Free; end;
Merci à tous.
@+.
Partager