Discussion :

[gobelet]

Bonjour,
j'ai simplifié le problème au maximum donc voila :

Je cherche a créer un objet A avec en variable de classe un string str1 et un objet B.

Cet objet B aurais pour variable de classe un string str2.

Dans le constructeur de A je fait donc appel au constructeur de B mais au moment d'initialiser str2 j'ai une exception de violation d'accès qui se déclenche.

Mais si je fait appel au constructeur de B en dehors du constructeur de B il n'y a pas de soucis.

Etant nouveau en delphi je me dit qu'une subtilité de delphi a du m'échapper, mais je ne vois vraiment pas d ou cela peut venir.

Merci

[Linkin]

Tu dois sûrement faire quelque chose du genre:

Code :

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

1
2
3
4
5
6
 
var
  b:TMonObjetB
begin
  b.Create;
end;

Au lieu de

Code :

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

1
2
3
4
5
6
 
var
  b:TMonObjetB
begin
  b := TMonObjetB.Create;
end;

[gobelet]

Non je ne pense pas et voici le code de mes deux classe simplifié

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
17
18
19
type
  TRequeteSql = class
  private
    Ftxt:string;
    Flstparams:TList;
  public
    constructor Create(chaine:String; Params:IXMLParamsType);
  protected
  published
    property txt:string read Ftxt write Ftxt;
    property lstparams:TList read Flstparams write Flstparams;
  end;
 
implementation
 
constructor TRequeteSql.Create(chaine:string; Params:IXMLParamsType);
begin
    Ftxt:='toto';  // a cette ligne ici, j'ai une violation d'accès
end;

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
17
18
19
20
21
22
 
type
   TRequete = class
    RequeteSQL:TRequeteSql;
  private
    Fid:string;
  public
    constructor Create(Requete:IXMLRequeteType);
  protected
  published
    property id:string read Fid write Fid;
  end;
 
implementation
 
constructor TRequete.Create(Requete:IXMLRequeteType);
begin
  Fid:=Requete.Id;
  RequeteSQL:=RequeteSQL.Create(Requete.Sql.Txt,Requete.Sql.Params);
end;
 
end.

[ShaiLeTroll]

@gobelet, tu confonds [CODE ] et [QUOTE ]
C'est le # pour le Code, et le ballon pour la citation

Sinon lit bien ton code car Linkin a presque trouvé ton erreur
Surement une faute de frappe dans ton cas et non une mauvaise utilisation du Create

la bonne version est

Code :

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

RequeteSQL := TRequeteSQL.Create(Requete.Sql.Txt,Requete.Sql.Params);