16,748
社区成员
发帖
与我相关
我的任务
分享
TForm1 = class(TForm)
private
function GetNumberName(index1 :Integer):String;
{ Private declarations }
public
property NumberName[index1 :Integer]:String read GetNumberName;
{ Public declarations }
end;
function TForm1.GetNumberName(index1: Integer): String;
begin
result:=IntToStr(index1);
end;