Q&A

  • 컴포넌트 프로퍼티..
안녕하세요..

같은 컴포넌트가 50개가 있습니다. (물론 이름만 틀리고요 ^^)

이벤트발생시 프로퍼티 를 변경해주고 싶은데요 (변경되는 부분도 같습니다)

컴포넌트가 몇개 안되면 문제가 안되는데, 문제는 50개라서... 이벤트를 다 걸어줘야

하는지 아님 방법이 따로 있는지...알려주세요

1  COMMENTS
  • Profile
    nilriri™ 2003.06.13 19:50
    샬롬~

    비슷한 류의 질답이 아주 많은데..^^; 검색을 해보심이..

    procedure TForm1.Button1Click(Sender: TObject);
    var
       i : integer;
    begin
       for i := 0 to self.ControlCount - 1 do
       begin
          if self.Controls[i].ClassType = TEdit then
          begin
             TEdit(self.Controls[i]).Color := clBlue;
          end;
       end;
    end;

    물론 해당 컴포넌트가 모두 판넬이나 기타 컨테이너 컨트롤 안에 배치되어 있으면..self대신에 해당 컴포넌트를 사용하셔서 그 컴포넌트 안에 있는 컨트롤들만 대상으로 작업하실 수 도있습니다..

    즐프~