Ver Mensaje Individual
  #2  
Antiguo 15-09-2021
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.282
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
Tendrás que revisar las funciones del SDK para ver si existe alguna función que permita hacerlo.
En el ejemplo que hay en el hilo que has puesto, hay unos algunas cosas que tal vez te puedan servir:

Código Delphi [-]
...
// *********************************************************************//
// Interface: IDPFPSampleConversion
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {34CE265E-92E3-4884-922B-D4C7E9AD43BA}
// *********************************************************************//
  IDPFPSampleConversion = interface(IDispatch)
    ['{34CE265E-92E3-4884-922B-D4C7E9AD43BA}']
    function ConvertToPicture(const pSample: IDispatch): IDispatch; safecall;
    function ConvertToANSI381(const pSample: IDispatch): OleVariant; safecall;
  end;

// *********************************************************************//
// DispIntf:  IDPFPSampleConversionDisp
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {34CE265E-92E3-4884-922B-D4C7E9AD43BA}
// *********************************************************************//
  IDPFPSampleConversionDisp = dispinterface
    ['{34CE265E-92E3-4884-922B-D4C7E9AD43BA}']
    function ConvertToPicture(const pSample: IDispatch): IDispatch; dispid 1;
    function ConvertToANSI381(const pSample: IDispatch): OleVariant; dispid 2;
  end;

...
__________________
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.
Responder Con Cita