Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 3 273

/ вопрос открыт /

Доброго времени суток, уважаемые эксперты!
Подскажите пожайлуста реально ли передать информацию из таблицы в Worde в Delphi? Если да то как это сделать???

Приложение:
  1.  


Fantom Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Fantom (статус: 2-ой класс)
Вопрос отправлен: 12 октября 2009, 12:36
Состояние вопроса: открыт, ответов: 1.

Ответ #1. Отвечает эксперт: Шичко Игорь

Здравствуйте, Fantom!
Если описать кратко, то так:

Uses … , ComObj; //Добавляем модуль
...
var
Word, Doc, Table: variant;
Stroka: string;

begin
Word:= CreateOleObject('Word.Application');
Word.Visible:= True;
Doc:= Word.Documents.Open('C:\1.doc'); //открываем документ

Table:= Doc.Tables.Item(1); //обращение к 1-й таблице
stroka:= Table.Cell(1,1).Range.Text; //считываение ячейки 1; 1 в переменную

// далее задвигаем данные куда нужно

Doc.Close; // закрываем
Word.Quit;
Word:= null;
end;

Более подробно можно почитать:
http://articles.org.ru/cn/?c=92

Ответ отправил: Шичко Игорь (статус: 9-ый класс)
Время отправки: 12 октября 2009, 14:01
Оценка за ответ: 5

Комментарий к оценке: Спасибо большое!Вы мене реально помогли сэкономить рабочее время!

Мини-форум вопроса

Мини-форум пуст.

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 12:00
Выполнено за 0.03 сек.