Показать сообщение отдельно
  #1  
Старый 10.02.2011, 11:38
Максон Максон вне форума
Прохожий
 
Регистрация: 10.02.2011
Сообщения: 19
Репутация: 10
По умолчанию проблема с открытием документа через OpenDialog

Здравствуйте.
У меня возникла такая проблема.
Пишу программу, в которой необходимо открыть документ Word через OpenDialog.
Код:
procedure TPost.btn4Click(Sender: TObject);
begin
if dlgOpen1.Execute then
WA:=CreateOleObject('Word.Application');
WA.Visible:=True;
WA.DisplayAlerts:=True;
WA.documents.add(dlgOpen1.FileName);
if not dlgOpen1.Execute then Exit;
end;
Админ: Пользуемся тегами!

Все бы ничего, вот только открывается нужный документ в Title которого написано Документ_1, а надо чтобы открывался документ с сохраненным именем файла. Например, выбрал в OpenDialoge документ постановление_3, открылся этот документ и в Title его было имя файла.
В delphi я новичок, не хватает знаний и опыта. Поскажите, пожалуйста, как правильно сделать.
Ответить с цитированием