Новости
Видео
Microsoft
Windows 10
Железо
Программы
Форум

Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » Delphi - Word в Делфи в чем ошибка?

Ответить
Настройки темы
Delphi - Word в Делфи в чем ошибка?

Пользователь


Сообщения: 110
Благодарности: 0

Профиль | Отправить PM | Цитировать

Изображения
Тип файла: jpg 1.JPG
(29.0 Kb, 7 просмотров)
Как сделать так что было как на картинки?

Код: Выделить весь код
procedure TClav.N10Click(Sender: TObject);
var 
i:integer;
k,b:OleVariant;
begin
WordApplication1.Visible:= true;
WordApplication1.Connect;
WordDocument1.Connect;
//====================================================================================
k:=23;
b:=0;
WordDocument1.Range(b).Text:='Отчет по подразделениям';
WordDocument1.Range(b).Select;
WordDocument1.Range.ParagraphFormat.LineSpacing:= 20;
WordDocument1.Range.Font.Size:=16;
WordDocument1.Range.ParagraphFormat.Alignment:=$00000001;
//====================================================================================
for i:=2 to ADOQuery1.RecordCount+1  do
 begin
  WordDocument1.Range(b).InsertBefore(ADOQuery1.FieldValues['podr']);
  WordDocument1.Range(b).Select;
  WordApplication1.Selection.Font.Size:=12;
  WordApplication1.Selection.ParagraphFormat.Alignment:=$00000000;
  WordApplication1.Selection.TypeParagraph;
  WordDocument1.Range(b).InsertAfter(ADOQuery1.FieldValues['sot_familiya']+' '+ADOQuery1.FieldValues['sot_imya']+' '+ADOQuery1.FieldValues['sot_otchestvo']);
  WordDocument1.Range(b).Select;
  WordApplication1.Selection.Font.Size:=12;
  WordApplication1.Selection.ParagraphFormat.Alignment:=$00000000;
  ADOQuery1.Next;
 end;
И можете объяснить свойство Range ели вам не сложно, а то я не до конца понимаю?

Отправлено: 12:25, 29-04-2012

 

Ветеран


Сообщения: 27449
Благодарности: 8087

Профиль | Отправить PM | Цитировать

Molchun78, кроме MSDN, здесь: Объект Word.Range - AskIt.RU пробовали смотреть?

Отправлено: 21:51, 29-04-2012 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » Delphi - Word в Делфи в чем ошибка?

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
2007 - Ошибка преобразования адресов e-mail в Word 2007 TUNec59 Microsoft Office (Word, Excel, Outlook и т.д.) 2 07-02-2012 20:54
Прочие - Ошибка в Word 2010 Microsoft Visual Basic for Application akalibr Microsoft Office (Word, Excel, Outlook и т.д.) 3 06-11-2011 21:53
2010 - [решено] Ошибка Word (Excel) 2010 при попытке открытия файла Erix Microsoft Office (Word, Excel, Outlook и т.д.) 3 04-05-2011 10:08
2003/XP/2000 - Критическая ошибка при работе в MS Word Notis Microsoft Office (Word, Excel, Outlook и т.д.) 1 22-04-2011 12:40
Ошибка - При запуске Word офиса 2003 выдается ошибка shav-75 Microsoft Windows 2000/XP 13 29-07-2009 09:43


« Предыдущая тема | Следующая тема »


 
Переход