Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.09.11;
Скачать: CL | DM;

Вниз

Помогите прописать путь к файлу   Найти похожие ветки 

 
varvar123 ©   (2011-05-26 13:28) [0]

Уважаемые программисты, подскажите пожалуйста. Мне необходимо, чтобы при нажатии кнопки открывался Word_овский файл в режиме "только для чтения". Для этого я прописала:

procedure TForm1.N5Click(Sender: TObject);
var
WordApp: OleVariant;
begin
WordApp := CreateOLEObject("Word.Application");
WordApp.Documents.Add("C:\Users\1\Desktop\Project1\1Doc\Rab_prog.doc",0,true);
WordApp.Visible := True;
WordApp.DisplayAlerts:=False;
end;

Это работает, но есть проблема: в дальнейшем необходимо будет создать загрузочный диск и, само собой, придётся каким-то образом менять все пути к файлам.
Вопрос: Возможно ли как-то прописать только имена doc-файлов?


 
Ega23 ©   (2011-05-26 13:31) [1]


> Возможно ли как-то прописать только имена doc-файлов?


ShowMessage(ExtractFilePath(ParamStr(0)) + "1Doc\\Rab_prog.doc");



Страницы: 1 вся ветка

Текущий архив: 2011.09.11;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.008 c
2-1306081964
Gu
2011-05-22 20:32
2011.09.11
Название компонента для архивации


3-1263670520
dest81
2010-01-16 22:35
2011.09.11
Firebird set <параметр>= значение


2-1306583696
Delphi beginner
2011-05-28 15:54
2011.09.11
Где ошибка в программе?


2-1306492115
rxngl
2011-05-27 14:28
2011.09.11
Из интернета в Exel


15-1305750597
Юрий
2011-05-19 00:29
2011.09.11
С днем рождения ! 19 мая 2011 четверг