Einzelnen Beitrag anzeigen

Keldorn

Registriert seit: 6. Mär 2003
Ort: Meißen
876 Beiträge
 
Delphi 10.1 Berlin Professional
 
#7

Re: WordTable.Columns Text zentrieren

  Alt 18. Apr 2008, 21:22
Hallo

geht doch recht einfach:

Makrovariante, du mußt dich in der 1. Zelle befinden
Delphi-Quellcode:
  //1. spalte zentriert
  WordApp.Selection.movedown(wdline,4,wdextend);
  WordApp.Selection.ParagraphFormat.Alignment := wdAlignParagraphCenter;
  //nächste Spalte
  WordApp.Selection.moveright(wdcharacter,1);

  //2.Spalte rechtbündig
  WordApp.Selection.movedown(wdline,4,wdextend);
  WordApp.Selection.ParagraphFormat.Alignment := wdAlignParagraphRight;
  WordApp.Selection.moveright(wdcharacter,1);

Besser wird es aber sein, die spalte direkt zu selektieren:
Delphi-Quellcode:
  WordApp.activedocument.Tables.item(1).Columns.item(3).Select;
  WordApp.Selection.ParagraphFormat.Alignment := wdAlignParagraphRight;

  WordApp.activedocument.Tables.item(1).Columns.item(4).Select;
  WordApp.Selection.ParagraphFormat.Alignment := wdAlignParagraphCenter;
Statt WordApp.activedocument.Tables.item(1) kannst du ja deine Rückgabe beim add verwenden, kannst dir ja unter Umständen nicht sicher sein, daß deine Tabelle auch die 1. ist.

Gruß Frank

Lükes Grundlage der Programmierung:
Es wird nicht funktionieren
(Murphy)
  Mit Zitat antworten Zitat