今天在FDS建模程序编写时自定义了一组鼠标响应事件,结果总是提示“Unsatisfied forward or external declaration”错误,最终发现是如下原因造成的:
类声明部分定义的procedure PanelClick(Sender:Tobjcet),在实现部分需要有类名的全称!

1 type
2 TForm1 = class(TForm)
3   ...
4 procedure PanelClick(Sender:Tobjcet); //过程声明
5
6 private
7 { Private declarations }
8 public
9 { Public declarations }
10 end;
11
12  var
13 Form1: TForm1;
14
15  implementation
16
17 {$R *.dfm}
18 procedure PanelClick(Sender:Tobjcet);  //Error,出错了!
19 ...
20
21
22
23 procedure TForm1.PanelClick(Sender:Tobjcet);  //只需加个TForm1就OK了呵呵!
24 ...
25
26

 

相关文章:

  • 2022-12-23
  • 2021-09-22
  • 2022-03-02
  • 2022-12-23
  • 2022-12-23
  • 2022-12-23
  • 2021-12-27
  • 2021-10-09
猜你喜欢
  • 2022-01-08
  • 2021-10-04
  • 2022-12-23
  • 2022-12-23
  • 2021-08-21
  • 2022-12-23
  • 2022-12-23
相关资源
相似解决方案