Q&A

  • 주민번호check 모듈..

안녕하세요.

주민번호 check 모듈을 이용하여 button1을 클릭하였을때

edit1 box 에 입력된 주민번호를 check하는 예제 delphi 프로그램을

참고할수 있었으면해서요..

(예전 질답계시판에 주민번호 check 함수는 있지만 button을 클릭
하고서 edit box 의 입력된 내용을 검사할수있는 부분의 프로그램)
...  그럼 좋은 하루되세요..
2  COMMENTS
  • Profile
    염상철 2002.03.16 00:57
    이렇게 해보는 건 어떠신지여..
    버튼클릭 이벤트에....

    with Qry_select do
    begin
           sql.clear;
           sql.add('select count(*) from table where 주민field=:jm ');
           parambyname('jm'):=trim(edit1.text)
           if count(*)>0 then begin  <--여기서 자료가 있으면..1 이상이 나오져..없으면 0 이 나오고...
           Application.Messagbox('이미 등록된 주민번호입니다.','입력오류',mb_ok);
           exit;
           end
           else begin
    // 이부분에 저장하는 소스 삽입...
           end;
    end;

           이런식으로 하면 될꺼 같은데...
    함 해보세염..
    안되면...다른 방법더 있으니까...알려주세여..
    이것이 최적인거 같긴 한데..
    짧은 프로그램 실력으론......^^;;;;;;


  • Profile
    머슴 2002.03.15 20:54



    현재 주민번호Check모듈에 관한 소스를 가지고 계시면

    가장 쉽게는 그 소스를 button 이벤트중에서 Click이벤트에

    넣으면 안되나요....

    내가 질문을 잘못이해하고 있는 것인가....? 아니면 죄송하고요...