Erste und letzte Zeile in Tabelle in Worddokument - Bold

[capo]

Gerne:

Delphi-Quellcode:

var
  lineszaehler: integer;
begin
  lineszaehler := (StringGrid1.RowCount);

    // erste Zeile Bold
  WordApp.activedocument.Tables.Item(1).Rows.Item(1).Range.Bold := True;
      // letzte Zeile Bold
  WordApp.activedocument.Tables.Item(1).Rows.Item(lineszaehler).Range.Bold := True;

Gruss
Capo