WordItems Gruppieren

[shmia]

Delphi-Quellcode:

var a : Variant;
begin
  // a := VarArrayCreate([0, 1], varString);
  a := VarArrayOf(['img', 'textbox']);

Übrigens:
Es ist empfehlenswert, nicht immer die gesamte Objekthierarchie durchzugehen, sondern man steigt tiefer ein:

Delphi-Quellcode:

var
   shapes : OleVariant;
...
   shapes := winword.ActiveDocument.Shapes; // Interface wird zwischengespeichert, spart einige Zugriffe
sh_word := shapes.AddPicture('einbild.bmp',true,false); 
...
sh_word := shapes.AddTextbox(msoTextOrientationHorizontal,0,0,100,100);