| 
| 
 | Вопрос # 3 273/ вопрос открыт / | 
 |  Доброго времени суток, уважаемые эксперты!Подскажите пожайлуста реально ли передать информацию из таблицы в Worde в Delphi? Если да то как это сделать???
 
|  |   Вопрос задал: 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
 Комментарий к оценке: Спасибо большое!Вы мене реально помогли сэкономить рабочее время! |  
 Мини-форум вопросаМини-форум пуст. Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте. |