차수연 wrote:

> 안녕하세요! 저는 지금막 델파이 프로그램에 입문한 초급프로그래머인데요...

> 많은 선배님들의 조언을 부탁드립니다.

> 처음 LogIn -> Splash -> Main화면순입니다. 정말 급한데요.....

> 많이 알려주세요....

>



참고로 프로젝트 파일에 ShowModal을 쓰면 델파이가 에러메세지를 냅니다.

이건 맨위의 uses에 Controls를 첨가해 주어야만 됩니다.



function CheckUser:Boolean

begin

Result:= False;

frmPassword:= TfrmPassword.Create(Application);

try

if frmPassword.ShowModal=mrOk then Result:= True;

finally

frmPassword.Free;

end;

end;



...프로젝트 초기화 하는 부분



if CheckUser then

begin

//스플래쉬 화면을 만든다.

//메인폼을 만든다.

//스플래쉬 화면을 제거한다.

end;



프로젝트파일에 패스워드 체크하는 부분을 위처럼 작성해 보세요.



그리고 패스워드 확인폼에서 패스워드가 정확할 때는

Self.ModalResult:= mrOk

아닐 때는 Self.ModalResult:= mrCancel

이런 식으로 주시면 패스워드가 정확한 경우에만 메인화면이 뜨게 됩니다.



참고가 되셨으면 합니다. 즐프하시길~.

차수연 wrote:

> 안녕하세요! 저는 지금막 델파이 프로그램에 입문한 초급프로그래머인데요...

> 많은 선배님들의 조언을 부탁드립니다.

> 처음 LogIn -> Splash -> Main화면순입니다. 정말 급한데요.....

> 많이 알려주세요....

>



.dpr 화일을 직접 수정해 주어야 합니다.



begin

FmLogin := TFmLogin.Create(Application);

FmLogin.ShowModal; // ---> 로그인 화면

FmLogin.Free;



FmSplash := TFmSplash.Create(Application);

FmSplash.Show; // ---> 스플래시 화면

FmSplash.Update; // ---> 화면의 내용을 갱신

Application.Initialize;

Application.CreateForm(TFmMain, FmMain);

// 기타 다른 폼 생성...

FmSplash.Hide;

FmSplash.Free;

Application.Run; end.



좋은 코딩 하세요...