Bonjour,
Problème surprenant en déclarant une méthode : malgré une définition identique en sections interface et implémentation, on me signale que :
Un extrait de code :[dcc32 Erreur] Unit1.pas(283): E2037 La déclaration de 'ReturnRisk' diffère de la déclaration précédente
[dcc32 Erreur] Unit1.pas(84): E2065 Déclaration forward ou external non satisfaite : 'TForm1.ReturnRisk'
Soit la raison, retorse, m'en échappe, soit c'est (plus) évident mais... m'échappe quand même !
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 TForm1 = class(TForm) EdgeBrowser1: TEdgeBrowser; //... procedure WMCopyData(var Message: TMessage); message WM_COPYDATA; procedure ReturnRisk(const PatientToSend: TParamPatient); private { Déclarations privées } FMiniature: TBitmap; //... procedure Log(aPhrase: string); public { Déclarations publiques } end; procedure TForm1.ReturnRisk(const PatientToSend: TParamPatient); begin end;
Partager