Bild an Excel übergeben

[ORGADATA AG]

Hallo!
Kann ich mit OLE auch Bilder an Excel übergeben?

[DP-Maintenance]

Dieses Thema wurde von "sakura" von "Neuen Beitrag zur Code-Library hinzufügen" nach "Sonstige Fragen zu Delphi" verschoben.

[shmia]

Ja, habe folgendes durch Makro-Aufzeichnung erhalten:

Delphi-Quellcode:

var
  newpic : OleVariant;
begin
   newpic := ActiveSheet.Pictures.Insert('C:\einBild.jpeg');
   // ActiveSheet: selber überlegen, wo du das herbekommst !

   newpic.ShapeRange.Height := 112.5;
   newpic.ShapeRange.Width := 180;
   newpic.ShapeRange.Rotation := 0;

[ORGADATA AG]

:-D super das geht! danke!