Discussion :

[cvexxx]

Bonsoir à tous !

Je suis confronté à un problème depuis plusieurs jours...
J'ai créé un thread comme Delphi 7 le fait si bien et j'y rajoute dans ce thread des attributs, des méthodes et tout ce qu'il faut.

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
  connec = class(TThread)
  private
    version:integer;
    revisionMajeure:integer;
    nomUtilisateur:string;
    motDePasse:string;
    [...]
  protected
    procedure Execute; override;
  public
    function getVersion:integer;
    function getRevisionMajeure:integer;
    function getNomUtilisateur:string;
    function getMotDePasse:string;
    [...]
    constructor Create(CreateSuspended:boolean);
    destructor Destroy; override;
  end;

J'ai surchargé le constructeur "Create" et j'y ai ajouté 2 attributs dans ce constructeur.

Code :

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

1
2
3
4
5
6
7
8
constructor connec.Create(CreateSuspended:boolean);
begin
  nomUtilisateur := 'admin';
  motDePasse := 'monmdp';
  inherited Create(CreateSuspended);
  FreeOnTerminate:=False;
  Priority:=tpHigher;
end;

Lorsque j'exécute le projet dans Delphi 7, une exeption est alors levé et m'affiche une erreur de type AccessViolation ici : "nomUtilisateur := 'admin';". Si je mets en commentaire "nomUtilisateur := 'admin';", l'erreur est alors au niveau de "motDePasse := 'monmdp';" et ainsi de suite...

Si vous avez la moindre piste pour m'aider à comprendre pourquoi cela ne fonctionne pas, vous me serez d'un très grand soutien ! En tout cas, je ne vois pas d'horreur dans ce que j'ai développé mais je suis sûr que vous pouvez m'aider.

Merci d'avance

[PpPool]

Trés simple
tu hérites de la classe TThread
dans le constructeur de ta classe connect, tu dois placer ton code aprés l'appel hérité du constructeur inherited Create(CreateSuspended);

@

[cvexxx]

Même problème l'erreur apparait juste après le constructeur hérité. C'est à dire ici : "FreeOnTerminate:=False;".
Même en ne laissant que le constructeur hérité, l'erreur se produit sur lui même :s

[cvexxx]

j'ai trouvé le problème !
Ce n'était pas du tout dans le thread mais dans le programme principale... J'initialisais mal la classe et dans le thread rien ne fonctionnait.

Merci encore !