Q&A

  • TObjectList에 관해서...
판넬또는 이미지를 동적으로 생성할려고 합니다.

저는 배열을 사용하고 있는데 SetLength라는 함수를 사용하여 갯수를 미리

지정합니다. 그런데 객체의 갯수를 알수없게되었습니다. 그래서

TObjectList나 TList를 사용할려고 합니다.

제 생각이 맞나요?

맞다면 TObjectList에 객체를 생성해서 입력하는 방법을 좀 가르쳐 주세요.

부탁드립니다.

2  COMMENTS
  • Profile
    최용일 2001.02.24 02:44
    안녕하세요. 최용일입니다



    Add메소드를 이용해서 넣어주시면 됩니다...



    procedure TForm1.Button1Click(Sender: TObject);

    var

    ObjList: TObjectList;

    Button: TButton;

    begin

    ObjList := TObjectList.Create;

    ObjList.Add(TButton.Create(Self));

    TButton(ObjList.Items[0]).Caption := 'Button1';



    Button := TButton.Create(Self);

    Button.Caption := 'Button2';

    ObjList.Add(Button);



    ...



    ObjList.Free;

    end;



    ^^ 항상 즐코하세요...



    호야 wrote:

    > 판넬또는 이미지를 동적으로 생성할려고 합니다.

    > 저는 배열을 사용하고 있는데 SetLength라는 함수를 사용하여 갯수를 미리

    > 지정합니다. 그런데 객체의 갯수를 알수없게되었습니다. 그래서

    > TObjectList나 TList를 사용할려고 합니다.

    > 제 생각이 맞나요?

    > 맞다면 TObjectList에 객체를 생성해서 입력하는 방법을 좀 가르쳐 주세요.

    > 부탁드립니다.

  • Profile
    호야 2001.02.24 03:10
    최용일 wrote:

    > 안녕하세요. 최용일입니다

    >

    > Add메소드를 이용해서 넣어주시면 됩니다...

    >

    > procedure TForm1.Button1Click(Sender: TObject);

    > var

    > ObjList: TObjectList;

    > Button: TButton;

    > begin

    > ObjList := TObjectList.Create;

    > ObjList.Add(TButton.Create(Self));

    > TButton(ObjList.Items[0]).Caption := 'Button1';

    >

    > Button := TButton.Create(Self);

    > Button.Caption := 'Button2';

    > ObjList.Add(Button);

    >

    > ...

    >

    > ObjList.Free;

    > end;

    >

    > ^^ 항상 즐코하세요...

    >

    > 호야 wrote:

    > > 판넬또는 이미지를 동적으로 생성할려고 합니다.

    > > 저는 배열을 사용하고 있는데 SetLength라는 함수를 사용하여 갯수를 미리

    > > 지정합니다. 그런데 객체의 갯수를 알수없게되었습니다. 그래서

    > > TObjectList나 TList를 사용할려고 합니다.

    > > 제 생각이 맞나요?

    > > 맞다면 TObjectList에 객체를 생성해서 입력하는 방법을 좀 가르쳐 주세요.

    > > 부탁드립니다.