Discussion :

[Jean-Jacques Engels]

Hi,

Est-il possible de passer en paramètre à la procédure Create du Constructor plusieurs paramètres ? Ex :

Code :

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

1
2
3
4
5
6
Type
  MyPanel = class(TPanel)
  ...
  Public
    Constructor Create(Owner: TComponent; UneVariable: Integer); Override;
  ...

Dans l'état, ci-dessus, Delphi me signale que "La déclaration de 'Create' diffère de la création précédente"

Comment faire alors ?

Merci .

JJE

[seabs]

Bonjour,

Il convient de supprimer "override" de la déclaration. Le code doit s'établir ainsi :

Code :

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

1
2
3
4
5
6
Type
  MyPanel = class(TPanel)
  ...
  Public
    Constructor Create(Owner: TComponent; UneVariable: Integer);
  ...

L'aide Delphi indique comment utiliser override qui ne doit être employé que pour surcharger un méthode.

Pour surcharger une méthode, redéclarez-la avec la directive override. Une déclaration override doit correspondre à la déclaration de l'ancêtre dans l'ordre et le type des paramètres, ainsi que dans le type éventuel du résultat.

Bon courage

[Cl@udius]

Salut

Il convient de supprimer "override" de la déclaration.

Effectivement, avec l'override tu auras une erreur à la compilation te signifiant que la déclaration diffère de la précédente (soit de la classe ancêtre).

A la place d'override tu peux utiliser reintroduce précisant au compilateur que tu vas redéfinir la méthode.

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
interface
 
type
  TMyPanel = class(TPanel)
  public
    constructor Create(AOwner: TComponent; AParam: Integer); reintroduce;
  end;
 
implementation
 
constructor TMyPanel.Create(AOwner: TComponent; AParam: Integer);
begin
  inherited Create(AOwner);
  // Et la suite ...
end;

@+ Claudius

[Jean-Jacques Engels]

Yesss !

Merci pour vos réponses.

Je préfère la solution de Cl@udius qui me permet de conserver l'instruction inherited Create(AOwner); dans le constructeur.



JJE