读书人

怎样在程序中遍历某form有taborder的控

发布时间: 2012-03-21 13:33:14 作者: rapoo

怎样在程序中遍历某form有taborder的控件?
怎样在程序中遍历某form有taborder的控件?(即label,query那些不用遍历)且将该控件的taborder保存到ini文件中,并且可以修改,在程序启动时从ini文件读入该控件的taborder?

[解决办法]
uses TypInfo;

procedure TForm1.FormCreate(Sender: TObject);
var
I: Integer;
begin
for I := 0 to ComponentCount - 1 do
begin
if IsPublishedProp(Components[I], 'TabOrder ') then
Memo1.Lines.Add(Components[I].Name);
end;
end;

读书人网 >.NET

热点推荐