Jump to content

solution for print Report form Fmx fast Report or Pdf Files to bluetooth printer


artemis

Recommended Posts

Я бы не советовал использовать bluetooth. Проблема в том, что через время он теряет соединение и его снова нужно подключать. Поэтому я использую подключение ethernet. Он более стабилен.

От FastReport тоже отказался, отправляю принтеру команды ESP на прямую. Вот код для сетевого принтера:

var tcpClient:=TIdTCPClient.Create(nil);
      tcpClient.ConnectTimeout:=10000;
      try
        tcpClient.Connect(ip,9100);
        tcpClient.Socket.Write(27);tcpClient.Socket.Write(116); tcpClient.Socket.Write(17); //select character code table
        var i:integer;
        for I := 0 to Pred(chk.Count) do
          tcpClient.Socket.WriteLn(chk.Strings[i],IndyTextEncoding(866));
        tcpClient.Socket.Write(27);tcpClient.Socket.Write(74); tcpClient.Socket.Write(255); // print and feed paper
        tcpClient.Socket.Write(27);tcpClient.Socket.Write(74); tcpClient.Socket.Write(255);
        tcpClient.Socket.Write(29);tcpClient.Socket.Write(86); tcpClient.Socket.Write(1); //select cut mode
        tcpClient.Disconnect();
      except
       on e:Exception do
        TThread.Synchronize(nil, procedure begin TfgToast.Show(e.Message); end);
      end;
      freeAndNil(tcpClient);

Если нужен bluetooth, напишите, могу поискать, то что я раньше использовал.

 

  • Thanks 1
Link to comment
Share on other sites

  • 4 weeks later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...