formshow이벤트에 아래와 같이 코딩하세요



form2.showmodal;

if form2.modalresult = 1 then

showmessage('확인입니다')

else

showmessage('취소입니다');

end;



로그인 폼에서 modalresult값을 넘겨주시면 됩니다.



이런식으루......



//확인

if password=edit1.text then

modalresult:=1

else

modalresult := 2;



//취소

modalresult :=2;









원령 wrote:

> 안녕하세요.. 넘 안되서 이렇게 글을 올립니다.

>

> 현재 MDI폼으로 작업을 하고 있구요...

> MDI폼이 Creat될때 먼저 사용자 로그인화면을 띄워서

> 사용자와 패스워드가 맞으면 실행되게 할려 합니다..

> 현재 소스을 아래와같이 코딩했는데 잘안됩니다..

>

> if (Ename = EdtName.Text) and (Sname = EdtPass.Text) then

> begin

> Application.CreatForm(TfrmJh00 , FrmJh00) ; // 메인폼

> FrmPass.Close ; //로그인폼 닫기.

> end ;

> 확인을 해도 전혀 메인폼이 뜨질 않습니다.

>

> 로그인하는 폼은 현재 메인폼의 Creat이벤트에

>

> Application.CreatForm(TfrmPass , FrmPass) ; // 패스워드폼 호출

> 이렇게 되어있읍니다..

>

> 고수님들의 답변기다리겠읍니다... ^^

>

>

원령 wrote:

> 안녕하세요.. 넘 안되서 이렇게 글을 올립니다.

>

> 현재 MDI폼으로 작업을 하고 있구요...

> MDI폼이 Creat될때 먼저 사용자 로그인화면을 띄워서

> 사용자와 패스워드가 맞으면 실행되게 할려 합니다..

> 현재 소스을 아래와같이 코딩했는데 잘안됩니다..

>

> if (Ename = EdtName.Text) and (Sname = EdtPass.Text) then

> begin

> Application.CreatForm(TfrmJh00 , FrmJh00) ; // 메인폼

> FrmPass.Close ; //로그인폼 닫기.

> end ;

> 확인을 해도 전혀 메인폼이 뜨질 않습니다.

>

> 로그인하는 폼은 현재 메인폼의 Creat이벤트에

>

> Application.CreatForm(TfrmPass , FrmPass) ; // 패스워드폼 호출

> 이렇게 되어있읍니다..

>

> 고수님들의 답변기다리겠읍니다... ^^

>

>





이렇게 한번 해보세요..

먼저 메뉴에 프로젝트에 옵션에 가셔서 오토 크리에이트 항목에 로그인 하는 폼을 가져다 놓으시구요..그 로그인하는 폼에 크리에이트 이벤트에다가 show; 를 해주시구요..

그럼 될꺼에요..근데 한가지... 로그인 화면 뒤에 메인 폼이 뜬다는거에요..

그러니깐 그 메인폼에 메뉴를 종료. 이외엔 활성 시키면 안되겠죠?

그렇게 해보세요..

> 이렇게 한번 해보세요..

> 먼저 메뉴에 프로젝트에 옵션에 가셔서 오토 크리에이트 항목에 로그인 하는 폼을 가져다 놓으시구요..그 로그인하는 폼에 크리에이트 이벤트에다가 show; 를 해주시구요..

> 그럼 될꺼에요..근데 한가지... 로그인 화면 뒤에 메인 폼이 뜬다는거에요..

> 그러니깐 그 메인폼에 메뉴를 종료. 이외엔 활성 시키면 안되겠죠?

> 그렇게 해보세요..

>



감사 ... 네~~ ^^ 메뉴를 패드워드를 치고 들어올때만 보이게 해서

성공 했읍니다.. 감사합니다...