Помогите прописать путь к файлу [D7]
varvar123 © (2011-05-26 13:28:00)
Уважаемые программисты, подскажите пожалуйста. Мне необходимо,
чтобы при нажатии кнопки открывался 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:00) [1]
> Возможно ли как-то прописать только имена doc-файлов?
ShowMessage(ExtractFilePath(ParamStr(0)) +
'1Doc\\Rab_prog.doc');
Наверх 
ЧАТ |
Орешник |
|
