Q&A

  • 클래스는 배열을 만들수 없습니까?
예를 들면

var
    myClasses: array of TMyClass; {빈 클래스 입니다}

begin
    setLength(myClasses, 10);
    for i:=0 to 9 do
    begin
        myClasses[i]:=TMyClass.Create;
    end;
end;

이렇게 하면 ... 에러가 납니다...
클래스를 배열처럼 쓰는 방법이 없을까요?
이 게시물을
1  COMMENTS
  • Profile
    미소나눔 • 2002.10.28 20:21
    클래스도 배열에 넣어 이용할수 있습니다. 님처럼 하면 되는뎅...

    TClassArray = Class(TObject)
        private
        public
            procedure a;
        end;

    var
      Form1: TForm1;

    implementation

    {$R *.DFM}

    procedure TForm1.Button1Click(Sender: TObject);
    var
        i : integer;
        ClassArray : Array of TClassArray;
    begin
        SetLength(ClassArray, 10);

        for i:=0 to High(ClassArray) do  begin
            ClassArray[i]:=TClassArray.Create;
        end;

        ClassArray[0].a ;
    end;

    { TClassArray }

    procedure TClassArray.a;
    begin
        ShowMessage('class member');
    end;

    end.

    즐푸하세용...
←First Page
833 834 835 836 837 838 839 840 841 842
Last Page→
한델 로그인 하기