Remove the spaces from the following sentence: (Form1 . components [i] sicut TPanel) . caption: = Programnames [k - I] ; / / Pone puga pyga caption buttons pro progressio – sets nomen progressio buttons
(Form1.components[i]sicutTPanel).caption:=Programnames[k-I];//Ponepugapygacaptionbuttonsproprogressio–setsnomenprogressiobuttons