Question

我正在尝试将数据发送到嵌入平板电脑的冲击式打印机。这就是单位的样子link here。我已经尝试过来自winsoft的Comport for android，我在打印机上没有取得任何进展，我在FMXexpress中使用了示例代码here

这是我的代码：

unit uSample;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
  FMX.Controls.Presentation, FMX.ScrollBox, FMX.Memo, Winsoft.Android.ComPort,
  FMX.Edit, FMX.StdCtrls;

type
  TForm1 = class(TForm)
    AComPort1: TAComPort;
    Memo1: TMemo;
    Timer1: TTimer;
    Button1: TButton;
    Edit1: TEdit;
    procedure Memo1KeyDown(Sender: TObject; var Key: Word; var KeyChar: Char;
      Shift: TShiftState);
    procedure Timer1Timer(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.fmx}

procedure TForm1.Button1Click(Sender: TObject);
begin
     AComPort1.Active := False;
     AComPort1.DeviceName := Edit1.Text;
     AComPort1.Active := True;
end;

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word; var KeyChar: Char;
  Shift: TShiftState);
begin
     AComPort1.WriteByte(Ord(KeyChar));
     ShowMessage('Down');
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var Text: string;
begin

end;

end.

Memo1KeyDown部分只显示消息“Down”，它应该将数据发送到打印机并打印一些数据。

提前感谢您的帮助。

Answer 1

我与一个似乎正在提供该设备的人保持联系。他们要求获得设备的人向他们请求SDK，这将允许更多信息。

Android平板电脑到使用delphi进行串口通信

1 个答案: