- 博客(1)
- 收藏
- 关注
转载 获取控件名称代码
procedure TForm1.Button1Click(Sender: TObject);var i: integer;begin ShowMessage(TComponent(Sender).Name); for i := 0 to ComponentCount-1 do ShowMessage(Components[i].Name);end;
2008-04-13 13:47:00
348
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人