안녕하세요. 최용일입니다.



동적 생성하실때 Parent를 정해주세요...



......

AdditionalFields[i].Parent := Self;

......



^^ 항상 즐코하세요...



namush wrote:

> 델파이 왕처버임다. ㅜ_ㅜ 답변 꼭 부탁드려요.

> 다음과 같은 소스로 쓰여진 숫자만큼 에딧박스를 생성시키려고 했는데요..

> 뭐가 잘못됐는지.. 버튼을 눌러도 암것도 안 나타납니다.

> 버튼을 한번 누르면 아무것도 안 나타나고, 다시 함 누르면, 이미 같은 이름의 컴포넌트가 있다고 나옵니다. ㅜ_ㅜ

> 머 visible:=true;같은것두 해봤지만.. 씰데엄는 짓이었구요. -_-;;;

>

> 여기 게시판 죽 훑어봤는데.. 모르겠네요. ㅜ_ㅡ

>

> ================================================================

> procedure Tfrm_add.addClick(Sender: TObject);

> var

> ea,i:integer;

> AdditionalFields:Array of TEdit;

>

> begin

> ea:=strtoint(addfield_ea.text);

> SetLength(AdditionalFields,ea);

>

> for i:=0 to ea-1 do

> begin

> AdditionalFields[i]:=TEdit.Create(self);

> AdditionalFields[i].name:='AdditionalFields'+inttostr(i);

> AdditionalFields[i].text:='추가된 항목';

> AdditionalFields[i].width:=145;

> AdditionalFields[i].height:=21;

> if (i mod 2)=0 then

> AdditionalFields[i].left:=32

> else

> AdditionalFields[i].left:=192;

> AdditionalFields[i].top:=296+(24*(i div 2));

> end;

> end;