예제를 올립니다 참고하세요.



procedure TForm1.Edit1Change(Sender: TObject);

var

labelname : Tlabel;

begin

labelname := Tlabel.create(form1);

labelname.parent := form1;

labelname.Left := 10;

labelname.Top := 90;

labelname.Caption := Edit1.Text;

end;



이세영 wrote:

>

> 안녕하세요..

> 프로그램 실행 중에 레이블 컴포넌트를 생성해 폼에

> 나타나게 하려고 하는데 어떻게 해야 되나요?

>

> 예를 들어 '우리나라'라는 글자를 폼에 나오게 하려는데

> '우리나라' 글자를 하나의 레이블 caption에 모두 넣는게

> 아니라 4개의 레이블을 프로그램 실행 중에 하나씩 생성해

> '우','리','나','라'로 총 4개의 레이블이 생성되어 각

> caption에 한자씩 넣어 보여주는 겁니다.

>

> 동적으로 레이블 컴포넌트를 생성해 나타내는 방법 좀

> 가르쳐 주세요.. 아직 한번도 못해 봤습니다...

> 그럼 아시는분 있으시면 답장 부탁합니다. 꾸벅..

>