我试图在鼠标悬停时改变Lazarus上面板的颜色。
我尝试在Lazarus上运行此代码:
unit test;
{$mode objfpc}{$H+}
interface
uses
[...]
type
{ Tvendas_menu }
Tvendas_menu = class(TForm)
[...]
procedure StartMouseEnter(Sender: TObject);
[...]
private
{ private declarations }
public
{ public declarations }
end;
var
[...]
implementation
[...]
procedure Tvendas_menu.StartMouseEnter(Sender: TObject);
begin
Start.Color := $00E7E7E7;
end;
[...]
但是在编译程序时会显示以下错误代码:
错误:未找到标识符"开始"
我确定"开始"是Object Inspector和.lfm文件中面板的名称。
我尝试改变"开始"到另一个名字,但错误仍然发生。
谢谢!