procedureTForm1.SetPanelPostion(APanel:TPanel;AColumn,AIndex:integer);variRow,iColumn:integer;beginiRow:=AIndexdivAColumn;iColumn:=AIndexmodAColumn;APanel.Left:=iSpace+(iWidth+iSpace)*iColumn;APanel.Top:=iSpace+(iHeight+iSpace)*iRow;end;