no es mio el codigo de URaw, solo lo uso. Te pongo una funcion
Código Delphi
[-]
procedure Enviar_ticket(s : string);
var
xPrn: TRawPrint;
i : integer;
begin
xPrn := TRawPrint.Create;
xPrn.PrinterName := impres_tick;
xPrn.Document := 'envio';
if xPrn.Open = False then
raise exception.Create('Error en impresora.');
xPrn.Write(s);
xPrn.Write(#13#10#65#27#57);
xPrn.Close;
xPrn.Free;
end;