Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo Hace 2 Semanas
tulio tulio is offline
Miembro
 
Registrado: may 2003
Ubicación: Argentina
Posts: 303
Poder: 22
tulio Va por buen camino
Hola Compañeros, a ver si alguno que renego con los impresores Hasar 2da generacion me puede decir como llamo a estas funciones, porque me dan error

Graciasss!!!!

Código Delphi [-]
Procedure TFormu_Factura.BitBtn1Click(Sender: TObject);
 var
  imprime:boolean;
  Jhasar: variant;///ImpresoraFiscalRG3561;
  Puerto:Integer;
  Destino:WideString;
  respabrir: RespuestaAbrirDocumento;
  estilo:AtributosDeTexto;
  respcierre:RespuestaCerrarDocumento;
  tiempo: OleVariant;
  bloque:RespuestaObtenerPrimerBloqueReporteElectronico;

 begin
  If MEssageDLg('CONFIRMA  GENERAR ARCHIVO ? ',mtconfirmation, [Mbno,Mbok],0)=mrok then
    Begin
      Jhasar := CreateComObject(CLASS_ImpresoraFiscalRG3561) as _ImpresoraFiscalRG3561;
      Puerto:=5000;
      Destino:='127.0.0.1';
      tiempo := 15000;
      Jhasar.Conectar(destino,puerto,tiempo,tiempo);
 32 bloque := Jhasar.ObtenerPrimerBloqueReporteElectronico('01/05/2024','07/05/2024',TiposReporteAFIP.ReporteAFIPCompleto);
 33 GrabarEnArchivo('Archivo.txt', bloque.Informacion);
 34 while (bloque.Registro <> IdentificadorBloque.BloqueFinal) do
       begin
 36     bloque := Jhasar.ObtenerSiguienteBloqueReporteElectronico();
          GrabarEnArchivo('Archivo.txt', bloque.Informacion);
      end;
 39    ConvertirABinario('Archivo.txt');
    End;
End;
te paso las lineas que me da error
[Error] FACTURA.pas(32): Object or class type required
[Error] FACTURA.pas(32): Incompatible types: 'RespuestaObtenerPrimerBloqueReporteElectronico' and 'Variant'

[Error] FACTURA.pas(33): Undeclared identifier: 'GrabarEnArchivo'
[Error] FACTURA.pas(34): Object or class type required
[Warning] FACTURA.pas(2334): Comparing signed and unsigned types - widened both operands
[Error] FACTURA.pas(36): Incompatible types: 'RespuestaObtenerPrimerBloqueReporteElectronico' and 'Variant'
[Error] FACTURA.pas(36): Incompatible types: 'RespuestaObtenerPrimerBloqueReporteElectronico' and 'Variant'
[Error] FACTURA.pas(39): Undeclared identifier: 'ConvertirABinario'
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Conectar con ocx Hasar 2da Generacion apuentes Varios 22 Hace 5 Días 00:22:07
OCX Hasar 2da generacion. ¿Funciona en Delphi5? ingel Varios 1 12-12-2021 12:27:31
Problema con impresora fiscar Hasar 1100 Segunda Generación mattaldi Impresión 27 05-05-2020 13:48:58
Programación de impresoras fiscales de segunda generación Hasar santiago14 Impresión 2 15-03-2019 17:55:43
generación de archivos rtf elcigarra OOP 6 29-08-2008 20:09:11


La franja horaria es GMT +2. Ahora son las 05:53:53.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi