| ** Николай |
| Отправлено: 02.12.2003, 11:20 |
|
Не зарегистрирован
|
Помогите пожалуйста!
Не могу разобраться как передать таблицу в Word и как в эту таблицу вставить данные. Открываю Word и записываю данные следующим образом.
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Variant msWord;
bool isWordRunning = true;
// Проверяю запущен ли Word
try
{
msWord = Variant::GetActiveObject("Word.Basic");
}
catch(EOleSysError&)
{
isWordRunning = false;
}
if(!isWordRunning)
{ //Открываю Word
msWord = CreateOleObject("Word.Basic");
msWord.Exec(Procedure("AppShow"));//Word видимый
msWord.Exec(Procedure("FileNew") << "Normal");
}
msWord.Exec(Procedure("Insert") << "Этот текст вставляю в Word");
}
А как поступить с таблицами.
Заранее спасибо.
|
|
| Gedeon |
| Отправлено: 02.12.2003, 12:09 |
|
Ветеран
Группа: Модератор
Сообщений: 1742
|
Несколько тем назад, загрузи доки, почитай, там как раз есть о работе с таблицами в Word
Документы про работу с Word
|
|
| ** Николай |
| Отправлено: 02.12.2003, 12:19 |
|
Не зарегистрирован
|
Спасибо за подсказку, а как быть с таблицами, если не использую такие компоненты как "WordApplication", "WordDocument" и "WordFont" |
|
