Salut tout le monde.
J'ai une méthode d'une classe qui surcharge celle de sa mère donc je mets override, mais qui est surchargée dans sa fille, donc je mets virtual.
J'ai essayé dans les 2 sens et il me dit :
Qu'est ce qui cloche dans ce que je fais, est-ce du à ce que D7 ne le gère plus ?[Erreur] mrModeleFichier.pas( 28 ): Définition de champ non autorisée après des méthodes ou propriétés
PS: pour info et pour ne pas croire que j'ai fait une autre erreur dans la classe, voici sa déclaration :
Merci d'avance, parce que la je tourne en rond.[/url]
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 TmrModeleFichier = class(TmrModele) private FCheminFichier: string; FPremLigneImport: Integer; FLigneLibelle: Integer; // vaut -1 si aucune ligne de libellé protected procedure SetNom(const Value: string); override; public constructor Create(const aOwner: TComponent); overload; procedure Sauver(NomFichier: string); virtual; override; published property CheminFichier: string read FCheminFichier write FCheminFichier; property PremLigneImport: Integer read FPremLigneImport write FPremLigneImport; property LigneLibelle: Integer read FLigneLibelle write FLigneLibelle; end;
Partager