Q&A

  • 성별이.....잘....
이렇게 했거덩요...근데...

만약 주민번호가 123421-1234567 라면...주민번호를 앞에 여섯자리중 마지막 자리1을 보구..남이라구 나오는데여...고쳐보려고 노력했지만 잘 안돼내여..

아무래두..에디트마스크가______-_______이렇게생겨서 그런가????



if MaskEdit1.GetTextLen >= 7 then

begin

if copy(MaskEdit1.Text, 8, 1) = '1' then

Edit4.Text:='남'

else if copy(MaskEdit1.Text, 8, 1) = '2' then

Edit4.text:='여'



end;

1  COMMENTS
  • Profile
    맥임다 2000.08.10 02:56
    한미르 wrote:

    > 이렇게 했거덩요...근데...

    > 만약 주민번호가 123421-1234567 라면...주민번호를 앞에 여섯자리중 마지막 자리1을 보구..남이라구 나오는데여...고쳐보려고 노력했지만 잘 안돼내여..

    > 아무래두..에디트마스크가______-_______이렇게생겨서 그런가????

    >

    > if MaskEdit1.GetTextLen >= 7 then

    > begin

    > if copy(MaskEdit1.Text, 8, 1) = '1' then

    > Edit4.Text:='남'

    > else if copy(MaskEdit1.Text, 8, 1) = '2' then

    > Edit4.text:='여'

    >

    > end;





    마스크 에디터를 지저해 주는 윈도에서 input mask 에서 에디트 마스크를 저장해주죠..

    그 밑에 보면 SAVE Literal Characters 체크박스에 체크가 되었있나 확인해 보시죠..