Bon Drucker ansteuern

[onkelmehli]

Hallo,
also ich benutze folgendes mit dem TM-U220 und das funktioniert wunderbar:

Delphi-Quellcode:

procedure DruckeAufLPT(Datenliste: TStringList);
var
  f: TextFile;
  s: String;
  i: Integer;
begin
  try
    try
      AssignFile(f, 'LPT1');
      Rewrite(f);
      for i:= 0 to datenliste.Count - 1 do
      begin
        s:= datenliste[i];
        Write(f,s);
      end;
    except
      raise;
    end;
  finally
    closefile(f);
  end;
end;

wobei man natürlich den Port (LPT1) noch als Übergabeparameter implementieren kann.

Gruß
Matthias