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ß

[AndiS75]

Hellas

[Keldorn]

Hallo

prinzipell kommst du sehr weit, wenn du ein makro aufzeichnest und dann deine gewünschten Dinge tust und dir dann das Makro anschaust.
Was genau möchtest du tun?

Du findest hier ein Beispiel und gleich das Problem. Diverse Wordvarianten setzten das Bild an unterschiedliche Stellen. Ich hab auch vor dem Problem gestanden und habe es sein gelassen. Nutze jetzt Rave, da geht das wesentlich einfacher.

Mfg Frank