vsscomm32 컴포넌트 사용에 대한 질문입니다

해결방법을 알려 주시면 감사하겠습니다.

1. 프로그램 사용용도

    바코드리더의 자료를 StringAlignGrid를 사용하여

   Reading Data를 DB에 Import하는 프로그램(델파이, 오라클)

2. 현상

    리더기(CASIO DT700M)에서는 잘 되었는데....

     DENSO BHT300Q에서 테스트하는 과정에서 읽어들이지 못함.

3. 확인사항

    BHT300Q의 자료중 첫번째 포인터가 파일명, 일자로 시작됨.

4. 해결요청사항

    BHT300Q의 제어코드(#6, #4)를 사용해야 할 이벤트 처리방법

    파일명이 불필요하므로 포인터를 변경하여 실 자료부터 Reading하는 이벤트 처리방법
  
5. 테스트 프로그램 소스일부

procedure TForm1.Button1Click(Sender: TObject);
begin
VSSComm321.startcomm;
StatusBar1.Panels.Items[0].Text :='Comm Open';
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
  VSSComm321.stopcomm;
  StatusBar1.Panels.Items[0].Text :='Comm Closed';
  StatusBar1.Panels.Items[1].Text :='';
  memo1.lines.clear;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
   sendstring: String;
begin
  sendstring:=#6#6;
  VSSComm321.writecommdata(pchar(sendstring),length(sendstring));
  StatusBar1.Panels.Items[1].Text :='Sending Data';

end;

procedure TForm1.VSSComm321ReceiveData(Buffer: Pointer;
  BufferLength: Word);
begin
  StatusBar1.Panels.Items[1].Text :='Receiving Data';
  memo1.lines.add(strpas(buffer));
  StatusBar1.Panels.Items[1].Text :='Received Data';
end;

6. 메일주소 : uhjpwk@daum.net