[질문]
왕초보 입니다.
어찌어찌 해서 비밀번호 확인 창을 띄웠는데
Password.pas의 FormCreat가 작동이 안되는데 왜 그럴까요?
마찬가지로 Main.pass의 FormCreat도 작동 안되구요.


Formstyle은 Main.pass는 fsMDIForm 이고
            Password.pass는 fsNomal입니다.

아래는 소스입니다

program happy;

uses
  Forms, Controls, Dialogs ,
  main in 'main.pas' {MainF},
  Password in 'Password.pas' {PassF};

{$R *.RES}

begin
  Application.Initialize;
  with TPassF.Create(Application) do  begin
    if ShowModal = mrOK then  begin
      Application.CreateForm(TMainF, MainF);
      Hide;
      Free;
      Application.Run;
      end
    else
      MessageDlg('프로그램을 종료합니다.', mtError, [mbOK], 0);
  end;
end.



unit Password;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;

type
  TPassF = class(TForm)
    Edit1: TEdit;
    Label1: TLabel;
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);

    procedure FormCreate(Sender: TObject);

  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  PassF: TPassF;

implementation

{$R *.DFM}
====================================    요 부분이 컴파일하면 실행이 안됨
procedure TPassF.FormCreate(Sender: TObject);
Begin
  PassF.Left:=0;
  PassF.Top:=10;
end;



procedure TPassF.Button1Click(Sender: TObject);
begin
  modalResult := mrOK
end;

procedure TPassF.Button2Click(Sender: TObject);
begin
modalResult := mrcancel;
end;

end.