Q&A

  • '-' 마이나스 값과 ''공백값을 처리
안녕하세요 델초보입니다

현재 지가요.프로그람을 짜는디요.....ABC의[29]번째 값에 - 또는 공백''이 들어오면 처리해

주는 부분인디요...





if (Pos('-',ABC.Values[29]) > 0)or(Pos('''',ABC.Values[29]) > 0) then

begin

panel1.Caption := 'NA';

panel1.Font.Color := clRed;

end

else

begin

try

fValue := StrToFloat(awos.Values[29]);

panel1.Caption := FloatToStr(fValue);

except

panel1.Caption := 'NA';

panel1.Font.Color := clRed;

end;

end;



여기서 공백이 들어오면....else 다음에 begin으로 넘어가는데..이유가 멀까유

바로...공백이 나오면.셋째줄의 panel1에 NA를 뿌려야 하는디...좀 갈켜주서유..

감사하구만유...

1  COMMENTS
  • Profile
    Ziker 2001.09.22 02:32
    안녕하세요



    Pos('''',ABC.Values[29]) > 0)



    이 부분이 잘못 된거 같은데요.. 우선 공백은 '''' 가 아니라 ' ' 으로 처리

    하시면 되구요. 참고로 ''''은 결과가 ' 입니다.



    그럼.. 참고가 되었으면 하네요..











    델초 wrote:

    > 안녕하세요 델초보입니다

    > 현재 지가요.프로그람을 짜는디요.....ABC의[29]번째 값에 - 또는 공백''이 들어오면 처리해

    > 주는 부분인디요...

    >

    >

    > if (Pos('-',ABC.Values[29]) > 0)or(Pos('''',ABC.Values[29]) > 0) then

    > begin

    > panel1.Caption := 'NA';

    > panel1.Font.Color := clRed;

    > end

    > else

    > begin

    > try

    > fValue := StrToFloat(awos.Values[29]);

    > panel1.Caption := FloatToStr(fValue);

    > except

    > panel1.Caption := 'NA';

    > panel1.Font.Color := clRed;

    > end;

    > end;

    >

    > 여기서 공백이 들어오면....else 다음에 begin으로 넘어가는데..이유가 멀까유

    > 바로...공백이 나오면.셋째줄의 panel1에 NA를 뿌려야 하는디...좀 갈켜주서유..

    > 감사하구만유...