아래의 내용은 MaskEdit를 잘라서 사용한것인데요.
비교 검색을 하면, Maskedit에 아무것도 안들어 있었는데도, "- -" 들어 가 있는것으로 나옵니다.
그것을 제외 할려고 자릿수까지 잡아서 비교를 했는데도 계속 들어가네요.
어떻게 비교를 해야 되죠. ???
고수님들 부탁 드리겠습니다.
수고하세요.
if copy(MaskEdit1.text, 1,4) = '' then
begin
showmessage('년도를 입력하세요.');
MaskEdit1.Setfocus;
end
else
if copy(MaskEdit1.text, 6,2) ='' then
begin
showmessage('월을 입력 하세요.');
MaskEdit1.Setfocus;
end
else
if copy(MaskEdit1.text, 9,2) = '' then
begin
showmessage('일을 입력하세요.');
MaskEdit1.Setfocus;
end;
> 아래의 내용은 MaskEdit를 잘라서 사용한것인데요.
> 비교 검색을 하면, Maskedit에 아무것도 안들어 있었는데도, "- -" 들어 가 있는것으로 나옵니다.
> 그것을 제외 할려고 자릿수까지 잡아서 비교를 했는데도 계속 들어가네요.
> 어떻게 비교를 해야 되죠. ???
> 고수님들 부탁 드리겠습니다.
> 수고하세요.
>
> if copy(MaskEdit1.text, 1,4) = '' then
> begin
> showmessage('년도를 입력하세요.');
> MaskEdit1.Setfocus;
> end
> else
> if copy(MaskEdit1.text, 6,2) ='' then
> begin
> showmessage('월을 입력 하세요.');
> MaskEdit1.Setfocus;
> end
> else
> if copy(MaskEdit1.text, 9,2) = '' then
> begin
> showmessage('일을 입력하세요.');
> MaskEdit1.Setfocus;
> end;
>
MaskEdit의 EditMask속성을 !9999-!99-99;0;_ 로 바꾸시면 될겁니다.
화면에 '____-__-__'에서 '_'가 안보이게 하려면 '!9999-!99-99;0; '뒤에 스페이스키
이렇게 하시면 됩니다.