我已经建好了一个控件数组lbaFunc[0..4]
有人说写
procedure LabelMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
end;然后在TForm的public里面声名,
最后
lbaFunc[i].OnMouseMove := LabelMouseMove;
就ok了,但是编译的时候在声名那里出问题:[Error] unitfrmMain.pas(16): Unsatisfied forward or external declaration: 'TfrmMain.LabelMouseMove'
请高人指教!
有人说写
procedure LabelMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
end;然后在TForm的public里面声名,
最后
lbaFunc[i].OnMouseMove := LabelMouseMove;
就ok了,但是编译的时候在声名那里出问题:[Error] unitfrmMain.pas(16): Unsatisfied forward or external declaration: 'TfrmMain.LabelMouseMove'
请高人指教!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货