for i := 0 to 9 do TButton(Form1.FindComponent('btnMacro' + IntToStr(i + 1))).Caption := Macrolist[i].Name; Antônio -------------- next part -------------- An HTML attachment was scrubbed... URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20130608/106d500c/attachment-0003.html>