Q&A

  • 버튼을 누르면 다른 폼 실행하기
두개의 다른 폼을 만들었습니다.
물론 하나의 폼을 작업후 저장하고 종료시킨다음
새로운 폼을 만들었습니다.

처음에 만들었던 폼에 버튼을 만들고
그 버튼을 누르면 나중에 만든 폼이 실행되고 하려는데 안되네여
꼭 알켜주세여
1  COMMENTS
  • Profile
    머슴 2002.04.18 18:27


      Form1 :=  TForm1.Create(Self);
      Form1.show; 나  Form1.showmodal;

      이렇게 하면 됩니다....

      tip에 최영근님이 올리신 글을 퍼드릴게요  정리를 잘하셨드라고요...
      
      우선 폼 Form 부터 시작하도록 하죠.
    만약 폼을 새로 형성하고자 할때

    procedure TForm1.BitBtn1Click(Sender: TObject);
    begin
    Form2.Show;
    end;

    이렇게 하면 폼이 보여집니다.
    그러나 좀더 확실히 메모리를 관리하고 싶다면,

    procedure TForm1.BitBtn1Click(Sender: TObject);
    begin
    Form2 := TForm2.Create(Self);
    try
    Form2.Show;
    finally
    Form2.Free;
    end;
    end;


    ** 만약 모달 함수를 썼다면..

    procedure TForm1.BitBtn1Click(Sender: TObject);
    begin
    Form2.ShowModal;
    end;


    procedure TForm1.BitBtn1Click(Sender: TObject);
    bein
    Form2 := TForm2.Create(Application);
    Form2.ShowModal;
    Form2.Free;
    end;