안녕하세요... 댁스터입니다...
폼을 코드로만 동적으로 생성시키는 방법은 일반 컨트롤의 동적생성과 같습니다.
다음코드를 참고하세요..
procedure TForm1.Button1Click(Sender: TObject);
var
MyForm: TForm;
begin
MyForm := TForm.Create(Self);
with MyForm do begin
Parent := Self;
Left := 100;
Top := 100;
Width := 300;
Height := 230;
Visible := true;
end;
end;
요기서... Parent 속성을 Self로 주는데.... 그렇게 되면 메인 폼의 자식윈도우로 생
성이 됩니다... Parent := self; <-- 요 코드를 지워 버리면 원하시는 기능을 구현
할 수 있을 것입니다... 나머지 코드는 쉬우니까 금방 아실 꺼고요...
그럼...참고하세요..
THEXDER
|