Ver Mensaje Individual
  #3  
Antiguo 02-11-2023
afxe afxe is offline
Miembro
 
Registrado: jul 2004
Ubicación: Malaga-España
Posts: 273
Reputación: 20
afxe Va por buen camino
Resuelto

Resuelto... estaba empecinado en indicar el ClassType del objeto... no es necesario:
Código:
var
  Excel, ExcelDoc, WS, oPdf : Variant;
begin

    coinitialize(nil);

    Excel         := CreateOleObject('Excel.Application');
    ExcelDoc      := Excel.Workbooks.Add;
    WS            := ExcelDoc.ActiveSheet;

    oPdf := ws.OleObjects.Add(null, 'C:\config\test.pdf', True, True, 'c:\Config\test.ico', 0, 'PDF', 0, 0, 100, 20);
    oPdf.Width := 100;
    oPdf.Height := 20;

end;
__________________
Amar al mundo apasionadamente.
Responder Con Cita