Einzelnen Beitrag anzeigen

Nimmersatt

Registriert seit: 14. Feb 2014
86 Beiträge
 
#1

Delphi - Text in Wordtabelle zentrieren

  Alt 15. Okt 2018, 23:26
Hallo,


Ich möchte einen Text in der Wordtabelle zentrieren.

Hier erst mal der Code

Delphi-Quellcode:
const wdStory = 6;

var wordTable: array[1..2] of OLEVariant;
    e: integer;

begin
  try
    Word := CreateOleObject('Word.Application');
  except
    Exit;
  end;

  Word.Visible := True;
  NewDoc := Word.Documents.Add;

  for e:=1 to 2 do
  begin
    WordTable[e]:=NewDoc.Tables.Add(Word.Selection.Range,2,2);
  
    WordTable[e].Cell(1,1).Range.Text :='aaa';
    WordTable[e].Cell(1,2).Range.Text :='bbb';
    WordTable[e].Cell(2,1).Range.Text :='ccc';
    WordTable[e].Cell(2,2).Range.Text :='ddd';

    wordTable[e].Borders.InsideLineStyle :=1;
    wordTable[e].Borders.outsideLineStyle :=1;

    Word.Selection.Endkey(wdStory);
    Word.Selection.TypeText(#13#10);
  end;
end;

Wie also kann der Text in den Zellen der Wordtabelle zentriert werden ?



mfg Nimmersatt
  Mit Zitat antworten Zitat