Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c