![]() |
|
#1
|
|||
|
|||
![]() Я хочу что-бы моя программа читала doc файлы, но у меня выдаёт ошибку в то время когда я хочу загрузить файл - выдаёт "Ошибка адреса" или, что-то такое!
Код:
var Form5: TForm5; MSWord : OleVariant; implementation {$R *.dfm} procedure TForm5.Button1Click(Sender: TObject); begin MSWord := CreateOleObject('Word.Application'); MSWord.Documents.Open(OpenDialog1.FileName); end; end. |