me.Parent에 보여져야하는 콘트롤의 이름을 입력하세요..


cosmos 님이 쓰신 글 :
: 저는 아주 단순하게 동적생성을 할려고 하는데요....
: 다른것이 아니고 워드 같은거 보면은 새창하면 기존창 가만히 있고 다시 창하나
: 나오는데 그걸 구현하고 싶어서 해보는 중에  폼은 계속 mdi 부모폼 밑으로 만들어
: 지는데 새창에 들어갈 RichEdit가 생성이 안되는 상황이 생겼습니다...
: 생성이 된건지 안된건지 .... ㅜㅜ
: 새로 생성된 폼에 RichEdit가 안보입니다.....
: 제 생각에는 폼 만들고 RichEdit만들고 등등 하면은 될꺼 같은데 구현이 쉽지가 않네요
: 
:
: 코드에서 잘못된부분이 있는것인지....
: 확인좀 해주세요... 조언도 해주시고요....^^;
:
: procedure Tmainform.ToolButton1Click(Sender: TObject);
: var
:   selform: TForm;
:   me:TRichEdit;
: begin
:   wincount:=wincount+1;  <-전역변수
:   selform:=TForm.CreateNew(Self);  <-mdi자식폼 생성중
:   selform.Name:='Form' + inttostr(wincount); <-이름 지정
:   selform.FormStyle:=fsMDIChild; <-폼형식
:   selform.WindowState := wsNormal; <-창 위치
:   selform.Caption:='새창'+inttostr(wincount); <-캡션
:   selform.Show; <-창보이기
:
:   me := TRichEdit.Create(FindComponent('Form'+inttostr(wincount)));
: <-mdi 자식폼에서 이름이 위에 바로 생성된 form1이라는 폼위에서 생성하라는.....
: 한번 새창 생성시 폼이름은 form1 두번째는  form2등등으로 나갑니다
:
:   me.Name:='RichEdit' + inttostr(wincount);
:   me.Width:=selform.Width;
:   me.Height:=selform.Height;
: end;
:
: 이렇게 된 코드 입니다... 문제가 어디있는건지 알수 가 없네요...