Показать сообщение отдельно
  #4  
Старый 21.10.2010, 21:43
Аватар для Paskal
Paskal Paskal вне форума
Новичок
 
Регистрация: 28.09.2010
Сообщения: 93
Репутация: 12
Печаль

C CreateOleObject я сам разобрался нужно всего в раздел модулей добавить модуль ComObj
НУ а теперь на счет
Код:
procedure TForm1.Button1Click(Sender: TObject);
var WordApp, doc,sel_,cell:Variant;  p,ChisloD:string; i:integer;
fil:OLEVariant; Cel1,Cel2:Variant;
begin
try
 WordApp:=CreateOleObject('Word.Application');//
 doc:=WordApp.Documents.open('E:\Borland Studio Projects\ww\Shablon PasportK.doc');

 WordApp.Selection.GoTo(-1,,,'Inv');//переход к закладке
 WordApp.Selection.TypeText(Edit1.Text);//вставляем то, что нам надо
except
end;


end;
Я так понимаю в этом WordApp.Selection.GoTo(-1,,,'Inv');
Inv это метка из документа. Только помогите ламеру как эту метку вставить в мой шаблон и что такое -1
Пожалуйста помогите разобраться
Ответить с цитированием