Word Bilder und Text einfügen

[AndiS75]

Hallo,

folgendes Problemchen.Ich will in ein Worddokument Bilder und Text zum jeweiligen Bild einfügen. Das mit den Bilder klappt auch.

Delphi-Quellcode:

  word.Visible := True;
  while not ADOFotoSELECT.Eof do
  begin
    word.Selection.InlineShapes.AddPicture(ADOFotoSELECT.FieldValues['pfad'], False, True);
    ADOFotoSELECT.Next;
  end;

Aber jetzt möchte ich noch Text zum jeweiligen Bild einfügen und die Bilder von der Größe her ändern. Hab bischen in der VBA Hilfe nachgeschaut, doch nichts brauchbares gefunden.


Gruß