Q&A

  • 폼 실행되지 전에 패스워드 물어보기...
말 그대로 입니다.



어떻게 하면 될까엽???



아시는분은 꼭 갈켜주셍~~~

3  COMMENTS
  • Profile
    윤종필 2000.10.08 07:31
    프로젝트 파일에서 *.dpr 에서 어플리케이션이 실행되기전에 패스워드를 물어봐서 맞으면 실행시키고 틀리면 그만두면 됩니다.

    아래 소스 참고 하세요.



    function AllowAccess: Boolean;

    begin

    if 암호를 물어보고 then 맞으면 Result := True

    틀리면 Result := False;

    end;

    end;



    begin

    Application.Initialize;

    Application.CreateForm(TFormMain, FormMain);

    // 여기서 위의 암호를 물어보는 함수를 불러온뒤 True 면

    // 어플리케이션을 실행하고 아니면 그냥 끝낸다.

    if AllowAccess then Application.Run;

    end;



    end.



  • Profile
    이광형 2000.10.07 22:13
    안녕하세요...

    여러가지 방법이 이겠지만...

    메인폼이 생성된 후에 폼을 Visible 속성을 false 로 해주고 암호가 맞으면 true 로 설정해 주면 안될까여...^^



    또 메인폼의 위치를 left -1000, top -1000정도를 주면 화면에서 사라지게 되니까 그때 암호를 물어 봐도 되겠지요^^



    실제로 제가 두번째 방법을 써봤는데... 눈 속임
  • Profile
    바보감자 2000.10.07 21:50
    왕초보 wrote:

    > 말 그대로 입니다.

    >

    > 어떻게 하면 될까엽???

    >

    > 아시는분은 꼭 갈켜주셍~~~

    ^^

    안녕하세요

    바보감자 입니다.. ^^

    저두 그런건 안해보았지만

    도움이 될꺼라 생각해서 이러케 글을 올립니다. ^^

    스플레쉬 폼이라는거 아시죠.?

    프로그램 실행 되기 전에먼저 실행되는 간단한 또하나의 폼이죠.

    예를 들어 잠시 기다리십시오 라던지

    그런 폼을 하나 만드셔서

    if 문 하나로 암호 처리 하면 되지 않을까요..

    ^^;;

    도움이 돼셨느지 몰겠네요..

    아무 책에나 스플래쉬 폼에 대한거 나와있으니까..

    함 참조 해보세요 ^^;;

    그럼 즐코 하시구요











    즐코 즈을코 즐코 즈을코 ~~~ 바보감자