빈폼위에 다음과 같은 두개의 오브젝트만 달랑 있다고 칩시다.
bitbtn1:Tbitbtn
memo1:Tmemo
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
memo1.lines.add('안녕하세요?');
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
bitbtn1click(sender);
bitbtn1click(sender);
bitbtn1click(sender);
end;
말씀하신 바로 그 방법이 맞습니다.FormCreate Event에다가 다른 이
벤트를 연결하면 되는데 이런 방법은 주의해서 사용하지 않으면 의외
의 에러를 내는 경우가 있습니다
어떤 경우냐 하면요
여러개의 폼이 있는 프로그램이 있다고 가정할때
프로젝트 파일에서는 그 여러개의 폼을 프로그램 구동시에 일단 다
Create하고나서 show 또는 Showmodal로 자신을 호출할때 그야말로
이미 만들어놓은 폼을 보여주는 역할을 하기도 합니다
그럴땐 나타나지도 않은 폼의 이벤트가 이미 실행되어서 프로그램 로
딩 시간이 쓸데없이 길어지기도 하지요.
주의해서 사용하시기 바랍니다.
도움이 되셨길 바랍니다.
|