uGUI中Slider控件的onclick事件怎么调出来

2025-04-26 23:29:16

推荐回答（2个）

回答1：

label的onClick事件对应的只有Sender:Tobject 一个参数
你的 LabOnClick(Sender:Tobject,msgStr:String);

怎么也是对不起来的。所以不行

要么 1 重写一个label
2 我惯用的偷懒办法
newLabel.OnClick:=LabOnClick(Sender);
然后每个label的hint不一样每次点击
就获取其中的hint

procedure TForm1.LabOnClick(Sender: TObject);
begin
showmessage(Tlabel(Sender).Hint);
end;
实际上我动态创建很多控件，经常拿tag来区分的
比如说
设备1 ID是3 newLabel.tag:=3;
设备2 ID是9 newLabel.tag:=9;
事件发生后就根据 Tlabel(Sender).tag 我就知道是哪个设备被点击了
不用String字段

回答2：

很遗憾，vs2008中没有内置Slider控件，想实现滚动的效果，你只能自己写一个或者试试hscrollbar