Word Dokument fernsteuern, Tutorial?

[toms]

Hi,

Habe hier einen Code, um ein TStringGrid in ein Worddokument zu exportieren.
(Hab's ohne die Server Komponente gemacht)
Vielleicht hilf's dir ja ein wenig weiter.

Delphi-Quellcode:

uses 
  ComObj; 

procedure TForm1.Button1Click(Sender: TObject); 
var 
  WordApp, NewDoc, tabelle: OLEVariant; 
  iRows, iCols, iGridRows, jGridCols: Integer; 
begin 
  try 
    // Word Instanz erzeugen 
    WordApp := CreateOleObject('Word.Application'); 
  except 
    // Fehler.... 
    Exit; 
  end; 

  // Word anzeigen 
  WordApp.Visible := True; 

  // Neues Dok einfügen 
  NewDoc := WordApp.Documents.Add; 

  // Spalten, Reihen ermitteln 
  iCols := StringGrid1.ColCount; 
  iRows := StringGrid1.RowCount; 

  // Tabelle einfügen 
  tabelle := NewDoc.Tables.Add(WordApp.Selection.Range, iCols, iRows); 

  // Tabelle ausfüllen mit Stringgrid Daten 
  for iGridRows := 1 to iRows do 
    for jGridCols := 1 to iCols do 
      tabelle.Cell(iGridRows, jGridCols).Range.Text := 
        StringGrid1.Cells[jGridCols - 1, iGridRows - 1]; 

  // Hier evtl Word beenden... 

  // Cleanup... 
  WordApp := Unassigned; 
  NewDoc  := Unassigned; 
  tabelle := Unassigned; 
end;