Einzelnen Beitrag anzeigen

capo

Registriert seit: 7. Jul 2006
453 Beiträge
 
Delphi 11 Alexandria
 
#1

Erste und letzte Zeile in Tabelle in Worddokument - Bold

  Alt 19. Feb 2009, 19:00
Hallo und guten Abend,

ich bin auf der Suche nach einer Möglichkeit die erste und die letzte Zeile einer Tabelle in Word "fett" zu formatieren.
Damit erzeuge ich meine Tabelle:
Delphi-Quellcode:
    WordTable := NewDoc.Tables.Add(WordApp.Selection.Range, iRows, iCols);
    ProgressBar1.Position := 4;
    WordTable.Columns.Item(1).SetWidth(65, 0);
    WordTable.Columns.Item(2).SetWidth(250, 0);
    WordTable.Columns.Item(3).SetWidth(120, 0);
    WordTable.Columns.Item(4).SetWidth(60, 0);

    WordTable.Borders.OutsideLineStyle := wdLineStyleSingle;
    WordTable.Borders.InsideLineStyle := wdLineStyleSingle;

    WordApp.activedocument.Tables.item(1).Columns.item(4).Select;
    WordApp.Selection.ParagraphFormat.Alignment := wdAlignParagraphRight;
      for iGridRows := 1 to iRows do
       begin
        ProgressBar1.Position := 6 + iGridRows;
        for jGridCols := 1 to iCols do
          begin
          WordTable.Cell(iGridRows, jGridCols).Range.Text := StringGrid1.Cells[jGridCols - 1, igridRows - 1];
Gruss Capo
Hotte
  Mit Zitat antworten Zitat