현재 ABC.Values 값으로 5byte씩으로 데이타가 옵니다.

예) '12345','12345','12345',........

그런데 이 데이타중.....(' ') 이라는 5byte짜리 스페이스값이옴니다.

그러면 아래 프로그램에서 처럼. 하면..스페이스 값을 읽어들이지를 못함다

어떻게 바꿔야 하는지......갈켜주서요...

감사합니다.





iValue := 0;

if (Pos('-',ABC.Values[19]) > 0)or(StrToInt(ABC.Values[19]) < 0)

or(StrToInt(ABC.Values[19]) > 360)or (Pos(' '),ABC.Values[19]) > 0) then

begin

Panel1.Caption := 'NA';

Panel1.Font.Color := clRed;

end

else

begin

try

iValue := Round(StrToInt(awos.Values[19]));

Panel1.Caption := IntToStr(iValue);

except

Panel1.Caption := 'NA';

Panel1.Font.Color := clRed;

end;

end;





ABC.Values값에서...(-)값, 0도 이하거다 360이상이거나, 5byte값의 스페이스가 들어오면 무저건 NA로 만들고 그외의 것은 값을 넣슴다...





참고로 이것은 DB가 아님다.

UDP 소켓을 사용한.....일반 TEXT 전송문이거든요...

STX.....DATA....CRC값의 종류

그중....DATA 값을 가지고 노는것임다.