Recibo X con impresora Hasar SMH/P-330

[santiago14]

Para completar, aclaro que es "abrir_fiscal", simplemente junté los comandos para abrir la fiscal combinándolo con un archivo .ini donde tengo algunos datos de la impresora.

Código Delphi [-]
procedure TFrmPpal.abrir_fiscal(archivo_ini:string);
var
  ini:TIniFile;
  puerto:string;
begin
  try
  //Recuperamos los datos desde el archivo .ini
    ini:=abrirINI(archivo_ini);
    puerto:=leerINI(INI, 'fiscal', 'puerto');
    cerrarINI(ini);
  //Es la parte de impresión
    Hasar1.Puerto:=StrToInt(puerto);
    Hasar1.Modelo:=MODELO_P330;
    hasar1.Baudios:=9600;
  except
    raise;
  end;
end;