Affectation de string.

Bonjour,


Je suis actuellement en train de programmer un logiciel en Delphi et j'ai un souci que je n'arrive pas à résoudre. J'ai déclaré un nouveau type ObjetUn avec parmi ses champs, un champ FContenu de type string. Pour créer une nouvelle instance d'ObjetUn, je vais chercher dans une base de données les informations nécessaires et je les passe au constructeur. Cependant, au moment de l'affectation de la nouvelle valeur de Fcontenu, j'ai le message "Access violation at address ..." qui apparaît.

Voici le code :

Code:

---

1 2 3 4 5 6 7 8 9

type TFluxRSS = class FidObj: Integer; FdateObj: TDateTime; Fcontenu: string;   public constructor Create(idObj: integer; dateObj: TDateTime; contenu: string);   end;

---

et le constructeur :

Code:

---

1 2 3 4 5 6

constructor ObjetUn.Create(idObj: integer; dateObj: TDateTime; contenu: string); begin FidObj := idObj; FdateObj := dateObj; Fcontenu := contenu; //La ligne qui pose problème end;

---

Et le constructeur est appelé de la manière suivante :

Code:

---

1 2 3 4

Titre := Query.FieldByName('titre').AsString; DatePubli := Query.FieldByName('date_publication').AsDateTime; IdInfo := Query.FieldByName('id_info').AsInteger; ObjetUn.Create(IdInfo, DatePubli, Titre);

---

Sachant que j'ai essayé en remplaçant Titre par un string quelconque, en utilisant un setContenu dans le constructeur, rien n'y fait.

Merci d'avance.

Salut;

ton query est fermé faut ajouter :

Code:

---

Query.Open;

---

Salut

Je vois d'une part une classe qui s'appelle TFluxRSS, puis d'autre part un constructeur d'une autre classe ObjetUn.

Est-ce une erreur de copier/coller ?

Ensuite la création de ton objet n'est pas correcte:

Code:

---

ObjetUn.Create(IdInfo, DatePubli, Titre);

---

Ce devrait être:

Code:

---

1 2 3 4 5 6 7

var ObjetUn: TFluxRSS; begin ObjetUn := TFluxRSS.Create(IdInfo, DatePubli, Titre); //... end;

---

@+ Claudius

Citation:

---

Envoyé par Just-Soft

Salut;

ton query est fermé faut ajouter :

Code:

---

Query.Open;

---

---

Non, il était bien ouvert, mais j'ai essayé de garder que ce qui semblait poser problème dans le code.

Citation:

---

Envoyé par Cl@udius

Salut

Je vois d'une part une classe qui s'appelle TFluxRSS, puis d'autre part un constructeur d'une autre classe ObjetUn.

Est-ce une erreur de copier/coller ?

---

Oui, là aussi, une petite erreur de c/c. J'avais voulu simplifier le code mais j'aurais peut-être pas du :roll:

Citation:

---

Envoyé par Cl@udius

Ensuite la création de ton objet n'est pas correcte:

Code:

---

ObjetUn.Create(IdInfo, DatePubli, Titre);

---

Ce devrait être:

Code:

---

1 2 3 4 5 6 7

var ObjetUn: TFluxRSS; begin ObjetUn := TFluxRSS.Create(IdInfo, DatePubli, Titre); //... end;

---

@+ Claudius

---

Effectivement, le problème était là. Je m'étais entêté à croire que le problème venait de l'affectation de 'contenu' et omis de regarder plus en amont.

Merci :king: