Q&A

  • 질문 : 컴포넌트 제어.
유치한 질문인지 모르겠습니다만 부탁드립니다.



에디트 (이름이 숫자로 됨)가 많을 경우, 텍스트를 초기화 할 경우 for문과 findcomponent 이용하여 간단하게 코딩되지만, 에디트의 이름을 기능및 용도에 맞게

지정한 경우에도 위와 유사하게 간단히 처리하는 방법이 있는지 궁금합니다.



2  COMMENTS
  • Profile
    홍성락 2001.12.05 05:30
    prosit wrote:

    > 유치한 질문인지 모르겠습니다만 부탁드립니다.

    >

    > 에디트 (이름이 숫자로 됨)가 많을 경우, 텍스트를 초기화 할 경우 for문과 findcomponent 이용하여 간단하게 코딩되지만, 에디트의 이름을 기능및 용도에 맞게

    > 지정한 경우에도 위와 유사하게 간단히 처리하는 방법이 있는지 궁금합니다.

    ///////////////////////////////

    아래것을 참조하세요

    procedure TForm1.Button1Click(Sender: TObject);

    var

    i : integer;

    ChildControl: TControl;

    begin

    for i := 0 to Form1.ControlCount-1 do begin

    ChildControl := Form1.Controls[i];

    if (ChildControl.ClassType = TEdit) then

    TEdit(ChildControl).Clear;

    end;

    end;

  • Profile
    prosit 2001.12.05 08:05
    이런게 있군요.

    저는 언제 이런 실력이 쌓일지...



    진심으로 감사드립니다. 꾸벅.