Ver Mensaje Individual
  #2  
Antiguo 12-12-2022
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.285
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
No parece que lo que has añadido sea ningún componente como tal.
Más parece una unit con código al que puedes llamar.

Intenta añadirlos a un proyecto y haz la siguiente llamada (por ejemplo) a ver quá pasa:

Código Delphi [-]
uses
  Treportp;
...

  var l:TListadoPant := TListadoPant.Create(nil);
  l.Print('hola mundo')

El problema es que sigues teniendo algunas dependencias.
Por ejemplo, el formulario Tpantrpt está utilizando componentes TAdvSmoothButton, que si no dispones de la librería fallarán al compilar y ejecutar.
Por otro lado, la unit Treportp.pas (que parece que es la que puedes llamar) posee dependencias de la dll NViewLib.dll. Sin ella, tampoco podrás probar nada.

Código Delphi [-]
function NViewLibSetLanguage(Lang: PChar): bool; Stdcall; external 'NViewLib.dll';
Procedure NViewLibSetCustomLang(pProgress,pError, pLoad, pErrLoad, pWarning : PChar); Stdcall; external 'NViewLib.dll';
function NViewLibLoad(FileName : PChar; ShowProgress: BooLean):hbitmap; Stdcall; external 'NViewLib.dll';
function NViewLibSaveAsJPG(Quality:Integer; FileName: PChar):bool; Stdcall; external 'NViewLib.dll';
function Load_JPG(FileName : PChar; ShowProgress: BooLean):hbitmap; Stdcall; external 'NViewLib.dll';
function Load_GIF(FileName : PChar; ShowProgress: BooLean):hbitmap; Stdcall; external 'NViewLib.dll';
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.

Última edición por Neftali [Germán.Estévez] fecha: 12-12-2022 a las 15:08:33.
Responder Con Cita