COM DLL / Methodenaufruf mit Rückgabe

[sx2008]

Delphi-Quellcode:

var
  img : IBitmapImage;
  ...
begin
  // dein bisheriger Code hier
  ...

  img := nil;
  myImageAC.GetImageMap(7, myBitmapImage); // Def. der Funktion : procedure GetImageMap(Magnification: Integer; var pPicture: IBitmapImage);
  if not Assigned(img) then
    raise Exception.Create('Fehler bei GetImageMap(7));
  // und ab hier kann man mit dem Interface in 'img' arbeiten