Q&A

  • (급)Edit1.text부터 Edit1000.text에 반복문을 써서 같은데이타 넣는 방법
안녕하세요. 델파이 초보입니다.



다른걸하다가 이런 문제에 부탁쳤네요.

어떻게 보면 쉬운데 어떻게 보면 어려운거 같네요.

Edit1.text부터 Edit1000.text에 반복문을 써서 같은데이타 넣는 방법이 어떻게 될까요?



edit1.text :=0;

edit2.text :=0;

....

이런 식으로 안쓰고 쓰는 방법이 있나요?

갈켜 주세요 급합니다.

그럼 수고여

2  COMMENTS
  • Profile
    inherited 2001.11.14 01:36
    홍길동 wrote:

    > 안녕하세요. 델파이 초보입니다.

    >

    > 다른걸하다가 이런 문제에 부탁쳤네요.

    > 어떻게 보면 쉬운데 어떻게 보면 어려운거 같네요.

    > Edit1.text부터 Edit1000.text에 반복문을 써서 같은데이타 넣는 방법이 어떻게 될까요?

    > 즉

    > edit1.text :=0;

    > edit2.text :=0;

    > ....

    > 이런 식으로 안쓰고 쓰는 방법이 있나요?

    > 갈켜 주세요 급합니다.

    > 그럼 수고여



    허접 답변입니다..



    for i:=1 to 1000 do

    begin

    TEdit(FindComponent('Edit'+IntToStr(i))).Text:='0';

    end;





  • Profile
    홍길동 2001.11.14 01:42
    inherited wrote:

    > 홍길동 wrote:

    > > 안녕하세요. 델파이 초보입니다.

    > >

    > > 다른걸하다가 이런 문제에 부탁쳤네요.

    > > 어떻게 보면 쉬운데 어떻게 보면 어려운거 같네요.

    > > Edit1.text부터 Edit1000.text에 반복문을 써서 같은데이타 넣는 방법이 어떻게 될까요?

    > > 즉

    > > edit1.text :=0;

    > > edit2.text :=0;

    > > ....

    > > 이런 식으로 안쓰고 쓰는 방법이 있나요?

    > > 갈켜 주세요 급합니다.

    > > 그럼 수고여

    >

    > 허접 답변입니다..

    >

    > for i:=1 to 1000 do

    > begin

    > TEdit(FindComponent('Edit'+IntToStr(i))).Text:='0';

    > end;

    >

    >