OLE Word auslesen

[Sidi61]

OK - habe ich mir fast gedacht

lese das ganze nun in ein unsichtbares Memo ein und bearbeite es dann von dort aus:

Code:

 WordApp.Documents.Open(Komabe_file);
    WordDoc := WordApp.ActiveDocument;

    for I := 1 to WordDoc.Paragraphs.count do
    begin
      S := WordDoc.Paragraphs.item(i).range.text;
      if pos(chr(11),S) = 0 then Memo1.Lines.Add(S) else
      begin
        while pos(chr(11),S)>0 do
        begin
          Z := copy(S,1,pos(chr(11),S)-1);
          delete(S,1,pos(chr(11),S));
          Memo1.Lines.Add(Z);
        end;
      end;
    end;

Was passiert eigentlich, wenn sich im Dokument zwischen dem Text noch eine Tabelle befindet

Gruß Sidi61