文件名称:如何得到对象或者类的所有属性名?-afe4403说明书
文件大小:5.68MB
文件格式:PDF
更新时间:2024-06-22 08:00:15
Delphi
(2) 如何得到对象或者类的所有属性名? var I, J: Integer; PropList: PPropList; begin J := GetPropList(ListBox1, PropList); {取得 ListBox1 所有属性放到 PropList 中} for I := Low(PropList^) to J-1 do begin ListBox1.Items.Add(’第’ + IntToStr(PropList[I]^.NameIndex) + ’个:’ + PropList[I]^.Name); end; end;