Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/delphi/8.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Delphi 是否可以在FMX中为TGlyph设置working OnClick事件?_Delphi_Firemonkey_Delphi Xe8 - Fatal编程技术网

Delphi 是否可以在FMX中为TGlyph设置working OnClick事件?

Delphi 是否可以在FMX中为TGlyph设置working OnClick事件?,delphi,firemonkey,delphi-xe8,Delphi,Firemonkey,Delphi Xe8,我只是在FMX表单上放了一个TGlyph实例,并测试了这段代码 procedure TForm1.FormCreate(Sender: TObject); begin Glyph1.OnClick:=myClick; end; procedure TForm1.myClick(Sender: TObject); begin ShowMessage('test'); end; 单击图示符时没有发生任何事情。我知道在Designer IDE中没有针对TGlyph的OnClick事件。

我只是在FMX表单上放了一个TGlyph实例,并测试了这段代码

procedure TForm1.FormCreate(Sender: TObject);
begin
  Glyph1.OnClick:=myClick;  
end;

procedure TForm1.myClick(Sender: TObject);
begin
  ShowMessage('test');
end;
单击图示符时没有发生任何事情。我知道在Designer IDE中没有针对TGlyph的OnClick事件。但是这个TGlyph来自于具有OnClick的TControl。我知道我可以用TImage代替TGlyph,但我只是好奇而已。

你必须设置

Glyph1.HitTest := true;
要使其工作。

您必须设置

Glyph1.HitTest := true;
让它工作