[marcoszorrilla]

Podría quedar algo como esto:

var
  archivo:text;
begin
   system.assign(archivo,'LPT1');o el puerto donde este la impresora
   system.Rewrite(archivo);
   write(archivo,chr(29)+chr(86)+'m'+'n');
  system.close(achivo);
end;

Un Saludo.