Q&A

  • [급질문]RS -232 통신장비로 받은 데이타 처리방법 부탁
안녕하셔요!!

밤은 깊어가구.. 컴앞에 오래 앉아서 허리는 아프구 ㅠ.ㅠ

다름이 아니오라

통신용 컴포넌트는 TComPort component 을 쓰구 있는중에 고민거리가 생겼습니다.



procedure TForm1.ComPortRxChar(Sender: TObject; Count: Integer);

var

Str: String;

begin

ComPort.ReadStr(Str, Count);

Memo.Text := Memo.Text + Str;

end;



요기까지는 데모프로그램이라 실행은 잘 되었습니다



Edit 에 입력된 값으루 DB를 검색하려고 하는데

Edit 에 Memo.text 값을 넣었더니 --->> ( Edit.text:=Memo.text; )

메모박스에 보여진 값에 콩나물 모양하구 까만네모안에하얀원형 의 문자가 뒤에 붙어서같이보이더군여 (아마두 CR,LF 값이 아닐까여...)

RS -232 통신장비에서 들어오는 데이타는 4자리문자(0001,0002,0003... 등등)로 일정합니다

제가 해결하고자 하는것은

Edit에 뿌려진 문자중에서 4자리만 짤라내는방법과

짤라낸 4자리로 DB검색하는 작업을 Edit의 어느 이벤트에서 처리해야 하는건지 궁금합니다

하루종일 이곳에서 방법
1  COMMENTS
  • Profile
    깨구락지 2001.12.28 18:15
    특수문자의 제거는 trim 함수를 사용하시구요,

    원하는 길이만큼의 스트링을 얻으려 한다면 copy 함수를 사용하십시오.

    데이타의 입력과 동시에 검색을 하려 한다면 edit의 이벤트에서가 아니라

    통신컴포넌트에서 처리하는것이 좋습니다.(아래의 프러시져가 되겠군요.)



    깨굴~



    막대기 wrote:

    > 안녕하셔요!!

    > 밤은 깊어가구.. 컴앞에 오래 앉아서 허리는 아프구 ㅠ.ㅠ

    > 다름이 아니오라

    > 통신용 컴포넌트는 TComPort component 을 쓰구 있는중에 고민거리가 생겼습니다.

    >

    > procedure TForm1.ComPortRxChar(Sender: TObject; Count: Integer);

    > var

    > Str: String;

    > begin

    > ComPort.ReadStr(Str, Count);

    > Memo.Text := Memo.Text + Str;

    > end;

    >

    > 요기까지는 데모프로그램이라 실행은 잘 되었습니다

    >

    > Edit 에 입력된 값으루 DB를 검색하려고 하는데

    > Edit 에 Memo.text 값을 넣었더니 --->> ( Edit.text:=Memo.text; )

    > 메모박스에 보여진 값에 콩나물 모양하구 까만네모안에하얀원형 의 문자가 뒤에 붙어서같이보이더군여 (아마두 CR,LF 값이 아닐까여...)

    > RS -232 통신장비에서 들어오는 데이타는 4자리문자(0001,0002,0003... 등등)로 일정합니다

    > 제가 해결하고자 하는것은

    > Edit에 뿌려진 문자중에서 4자리만 짤라내는방법과

    > 짤라낸 4자리로 DB검색하는 작업을 Edit의 어느 이벤트에서 처리해야 하는건지 궁금합니다

    > 하루종일 이곳에서 방법