哦,你是做客显的哪个吧,ok,我发给你和串口通讯的辕马,再给个例子你。
这里用到的函数 SEND232DATA等在我发送的那个文件里定义。
//这个是一个串口的触摸屏,这个函数是打开串口的
Function  IRS_OPEN:integer;
var
  str:array[0..8] of char;
begin
  if gComID>=0 then exit;
  lstrcpy(str,'COM1');
  gComID := OpenCommPort(str);
  result:=gComID;
  if gComID<0 then begin
     result:=gComID;
     exit;
  end;END;//关闭串口
Procedure IRS_CLOSE;
begin
  CloseCommPort;
  gComID := -1;
end;//先向串口发送指令,再接收。发送的数据和接收的是数据格式是设备定义的。
function IRS_GETPOS(var x:integer; var y:integer):integer;
var
  str,recestr:array [0..255] of char;
  err,recelen:integer;begin
  x:=-1;
  y:=-1;
  str := #35;                       //set average coordinate mode
  err:=Send232Data(str,1);
  if err<0 then begin
     result:=err;
     exit;
  end;  recelen := 4;
  err:=Rece232Data(recestr,recelen);      //receive data
  if err<0 then begin
     result:=err;
     exit;
  end;
  result:=err;
  x:=round(((ord(recestr[1])) * screen.width) / XWIDTH) ;
  y:=round(((ord(recestr[2])) * screen.height) / YHEIGHT);           //get x,y coordinate
end;我觉得你的问题好象是你不知道和客显通讯的数据格式

解决方案 »

  1.   

    是的,就是向串口发命令,谢谢你了,我刚学的delphi这位大侠,谢谢你了!
       我以前用的pb,一时转不过来!再次感谢!L)
      

  2.   

    好像是的(不知道和客显通讯的数据格式):PB我是的能行的,在D6上不行的,
    说明书是这样写的:大意:ESC+ P的格式
        我在PB中式这样的:
    filewrite(file_handle,'ESC'+char(27) + char(1) + "P" + char(49) +char(23)+EXPRESS)
      

  3.   

    在PB中单引号内表示的是字符串吗?如果是那么
    就是 'ESC'+#27#1+'P'+#49#23+EXPRESS