*.Doc w richedit

0

Czesc, jak do richedit wkleic plik worda? wystarcza same znaki, probuje z WordDocument1 i
WordApplication1 ale nie wychodzi zbytnio, na razie doszedlem do takiego kodu:

WordApplication1.Connect;
WordDocument1.ConnectTo(WordApplication1.ActiveDocument);
WordDocument1.Content.Copy;
WordDocument1.Disconnect;
WordApplication1.Disconnect;
RichEdit1.ReadOnly:=False;
RichEdit1.Lines.Clear;
RichEdit1.PasteFromClipboard;
RichEdit1.ReadOnly:=True;

ale nie wiem jak przypisac plik "z reki" a nie otwarty w wordzie, poza tym to rozwiazanie nie jest optymalne bo wymaga WORDA na komputerze zainstalowanego. Czy nie ma prostego sposobu by wkleic sam tekst w richedit?

0

Czy nikt nie ma na to rozwiazania?

0

dla poszukujacych jak ja rozwiazania:

http://www.bigbit.ltd.uk/scripts/download.asp?DownloadID=1

gotowy komponent ktory pobiera tekst z pliku worda, niestety rozwiazania opartego o standardowych komponentach nie udalo mi sie znalezc, tak wiec moze jednak ktos rozwiazanie poda a jak nie to cieszmy sie tym co mamy...

i w kodzie:

bbDocumentToText1.Filename := 'C:\XXX.doc';
richedit1.Text := bbDocumentToText1.ExtractText;

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0