[Fantss]

Как реализовать заполнение документа ворда (там шаблон документа с инн и ещё чота) через делфи, т.е заходишь в прогу выбираешь документ, жмешь далее и в другом окне заполняешь окна Edit из которых потом вся информация соответственно поставится на места в шаблоне ворда...можно ли такое реализовать, я голову уже неделю ломаю... VBA не вариант ваще... начальство сказало прогой сделать((

[TOJluK]

Ну так и в чем проблема? Да, такое можно реализовать. Один из способов- берешь шаблон, расставляешь в нем метки, и потом по ним перемещаешься уже в дэлфи.

Ворд открываешь так:

Код:

MSWord:Variant;
What,Which,Count,Name:OLEVariant;
begin
try
 MsWord := GetActiveOleObject('Word.Application');
 except
 try
 MsWord := CreateOleObject('Word.Application');
  except
  raise Exception.Create('Ошибка запуска Word');
  end;
 end;
 try
  MSWord.Documents.Open(Имя_файла_шаблона);
  except
  ShowMessage('Ошибка при попытке WORD загрузить шаблон!');
  exit;
  end;
  What:=-1;
  Which:=unAssigned;
  Count:=unAssigned;
  
  Name:='Имя_метки';
  MsWord.Selection.GoTo(What,Which,Count,Name);
  MsWord.selection.TypeText('Текст_метки');
  
  MsWord.Visible:=True;