为窗体上所有的Label控件(动态生成的)设置同一个popmenu,其中一个菜单项是属性,点击时出现一个窗体来显示对应Label控件的left,top,width,height等属性,
现在问题是:比如有Label1,Label2,在Label1点右键->属性,显示的是Label的属性,
再在Label2上点右键,显示Label2的属性。但是如果再点Label1,显示的还是Label2的属性
??也就是说,判断不了点击的是哪一个Label??
请教该如何做?
相关代码如下:
procedure TMainFormBill.PropertyLabelClick(Sender: TObject);
begin
 FormLabelProperty.EditLabelCaption.Text := FormLabel.ALabel.Caption;
 FormLabelProperty.EditLabelLeft.Text := IntToStr(FormLabel.ALabel.Left);
 FormLabelProperty.EditLabelTop.Text := IntToStr(FormLabel.ALabel.Top);
 FormLabelProperty.EditLabelWidth.Text := IntToStr(FormLabel.ALabel.Width);
 FormLabelProperty.EditLabelHeight.Text := IntToStr(FormLabel.ALabel.Height);
 FormLabelProperty.ShowModal;
end;