![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как открыть готовый word в Delphi [D7]
Дмитрий © (2013-04-23 16:49:00)Помогите пожалуйста еще разок.
я вписал код:
procedure TForm1.RadioButton1Click(Sender: TObject);
var Word: variant;
begin
if RadioButton1.Checked=True then
Word:=CreateOleObject('Word.Application');
Word.Documents.Open('L:\ДИПЛОМ\test.doc') ;
end;
а он при запуске выдает не может найти файл. не пойму в чем дело
Kilkennycat (2013-04-29 02:28:00) [1]
> не может найти файл
в делфи существуют функция fileexists, которую неплохо было бы использовать до попытки открытия, а также есть диалоговые всякие фигни, типа TOpenDialog, которые позволяют выбрать файл, и автоматом генерят путь к нему.
да и вопрос Плохиша тож имеет смысл обдумать.
brother (2013-04-27 10:15:00) [2]> 'L:\ДИПЛОМ\test.doc'
> внешний жесткий\ДИПЛОМ\ Дипломный проект
ты не учел эту папку
Ega23 (2013-04-23 17:16:00) [3]
procedure DoOpenWordDoc(FileName: string);
var
w: Variant;
begin
w := CreateOleObject('Word.Application'); // <- сюда бряк и смотреть, что в FN пришло
w.Documents.Open(FileName) ;
end;
procedure TForm1.RadioButton1Click(Sender: TObject);
begin
if RadioButton1.Checked then
with TOpenDialog.Create(nil) do
try
if Execute then
DoOpenWordDoc(FileName);
finally
Free;
end;
end;
Плохиш (2013-04-23 17:12:00) [4]
> я не правильно адрес прописал? а как лучше?
Надо как правильно. А как правильно нам от сюда не видно.
Зачем оно тебе, это программирование?
Дмитрий (2013-04-23 17:09:00) [5]документ лежит: компьютер\внешний жесткий\ДИПЛОМ\Дипломный проект
я не правильно адрес прописал? а как лучше?
O'ShinW (2013-04-23 17:00:00) [6]либо его там нет
либо не
> L:
а \\computer\share