앞에서 29825 번에 소울해커님이 간단히
만드신 프로그램을 수정해봤는데요.
에러를 내면서 죽더군요....

소울해커님이 동적생성시  스크롤박스에서 불규칙하게 생성되던 문제를 해결해주셨는데요,
동적으로 에디트창 뿐만 아니라 체크박스, 리스트박스 등 등의 여러개의 객체를 같이 생성시켰더니
죽더군요....

동적으로 에디트창 뿐만 아니라 체크박스를
같이 생성시키고자 다음과 같이  수정했습니다.

//전역으로 선언  
Cnt: Integer = 0 ;
MyEdit: Array of TEdit;
MyCom : Array of TCheckBox ;

procedure TForm1.Button1Click(Sender: TObject);
begin
     Cnt := Cnt + 1;
    
     SetLength(MyEdit, Cnt + 1);

     MyCom[Cnt] :=TCheckBox.Create(ScrollBox1);
     MyEdit[Cnt] := TEdit.Create(ScrollBox1);
  
     if Cnt = 1 then begin
       MyCom[Cnt].SetBounds(0,0,17,17) ;
        MyEdit[Cnt].SetBounds(30, 0, 34, Height) ;
     end else begin
        MyCom[Cnt].SetBounds(0,MYCom[Cnt-1].Top+32,17,17) ;
        MyEdit[Cnt].SetBounds(30, MyEdit[Cnt - 1].Top + 32, 34, Height);
     end ;

     MyEdit[Cnt].Parent := ScrollBox1;
     MyEdit[Cnt].Visible := True;

    MyCom[Cnt].Parent := ScrollBox1;
     MyCom[Cnt].Visible := True;

    
end;

위와 같은 방식으로 하면 한개 생성할 때와 여러개 생성할 때의 차이점이 있나요?