Q&A

  • 판넬안에 있는 콤포넌트가 판넬인지를 알고 싶습니다.
판넬안에 있는 콤포넌트가 판넬이면 칼라를 바꿀려고 하는데 판넬인지를

검사할려고 합니다.

밑에 소스가 맞는지 궁금하구요. If문을 어떻게 해야할지 모르겠네요.

가르쳐 주세요.수고하세요

For i := 0 To (SltPop.PopupComponent As TPanel).Controlcount-1 Do

Begin

If ((SltPop.PopupComponent As TPanel).controls[i]. = TPanel) Then

Begin

((Sltpop.PopupComponent As TPanel).Controls[i] As TPanel).Color := clGray;

End;

End;

1  COMMENTS
  • Profile
    김일영 2001.10.18 22:34
    아래와 같이 하면 될 것 같습니다.

    헬프에서 Is 연산자에 대해 찾아보세요.



    with SltPop.PopupComponent As TPanel do

    for i := 0 to ControlCount - 1 do

    if Controls[i] Is TPanel then TPanel(Controls[i]).Color := clGray;