Q&A

  • 컴포넌트의 개수 알아내기..
지금 A라는 컴포넌트를 만들고 있습니다..!



즉 A라는 컴포넌트는 타이머처럼 실행시에는 보여지는게 아니구요!!

디자인할때 폼에 여러개 놓습니다!



폼에서 ComponentCount 속성을 이용해서 A라는 컴포넌트 개수를 알아내는게 아니고

A컴포넌트소스안에서 알아내고 싶은데요..!



즉 A.GetCount 이런식으로 하면..

폼에 디자인된 A컴포넌트의 개수를 알아내는것입니다!

이게 가능한지요..? ^^



그럼 이만...

2  COMMENTS
  • Profile
    Ziker 2001.07.05 00:20
    안녕하세요 지커(김성규)입니다...



    자답을 하셨네요.. 축하 드립니다..

    다음과 같은 방법을 쓰셔두 됩니다.



    아래는 TButton 클래스가 몇개나 되는지 검사하는 겁니다.





    procedure TForm1.Button1Click(Sender: TObject);

    Var

    iCnt, iLoop : Integer;



    Begin

    iCnt := 0;

    For iLoop:= 0 to ComponentCount-1 do

    If Components[iLoop].ClassType = TButton then

    iCnt := iCnt + 1;



    ShowMessage(IntToStr(iCnt));



    end;



    =========================================

    여기서 Components 및 ComponentCount 는 Form1 의 프라퍼티 임으로

    Form2 나 다른 컴포넌트에서도 사용 가능합니다.





    김동민 wrote:

    > 지금 A라는 컴포넌트를 만들고 있습니다..!

    >

    > 즉 A라는 컴포넌트는 타이머처럼 실행시에는 보여지는게 아니구요!!

    > 디자인할때 폼에 여러개 놓습니다!

    >

    > 폼에서 ComponentCount 속성을 이용해서 A라는 컴포넌트 개수를 알아내는게 아니고

    > A컴포넌트소스안에서 알아내고 싶은데요..!

    >

    > 즉 A.GetCount 이런식으로 하면..

    > 폼에 디자인된 A컴포넌트의 개수를 알아내는것입니다!

    > 이게 가능한지요..? ^^

    >

    > 그럼 이만...

  • Profile
    김동민 2001.07.05 00:07
    파라미터로 폼을 넘겨줘서 해결했어요..^^

    그럼 이만...



    김동민 wrote:

    > 지금 A라는 컴포넌트를 만들고 있습니다..!

    >

    > 즉 A라는 컴포넌트는 타이머처럼 실행시에는 보여지는게 아니구요!!

    > 디자인할때 폼에 여러개 놓습니다!

    >

    > 폼에서 ComponentCount 속성을 이용해서 A라는 컴포넌트 개수를 알아내는게 아니고

    > A컴포넌트소스안에서 알아내고 싶은데요..!

    >

    > 즉 A.GetCount 이런식으로 하면..

    > 폼에 디자인된 A컴포넌트의 개수를 알아내는것입니다!

    > 이게 가능한지요..? ^^

    >

    > 그럼 이만...