VPF::Вывод данных в Excel в шаблон .xlt - Форум программистов

Torres

Дата 21.6.2011, 09:30 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 25
Регистрация: 6.4.2010

Репутация: нет
Всего: нет

Помогите, плиз. Нужно вывести данные из базы данных в шаблон Excel
Пишу этот код

Код


void __fastcall TForm9::BitBtn1Click(TObject *Sender)
{
//устанавливаем путь к файлу шаблона
AnsiString sFile = GetCurrentDir()+"\\shablon.xlt";
//открываем Excel
Variant App = Variant::CreateObject("Excel.Application");
//создаем книгу
Variant XLBook = App.OlePropertyGet("WorkBooks");
//открываем файл-шаблон
Procedure Open("Open");
XLBook.Exec(Open<<sFile);
Variant Sh = XLBook.OlePropertyGet("Count");
Sh = App.OlePropertyGet("WorkSheets",1);
//открываем документ
App.OlePropertyGet("Visible",Variant(true));

//ввод данных в ячейку
String Str;
Variant cur;
//устанавливаем курсор в нужную ячейку
cur = Sh.OlePropertyGet("Cells",1,1);
Str = "Счёт-фактура №5 от 21.05.2011";
cur.OlePropertyGet("Value",Str.c_str());
.................
}

всё компелится, но при нажатии на кнопку выбивает ошибку в модуле sysvari.h на последнюю строку

Код


template <class P1>
  Variant Variant::OlePropertyGet(const String& name, P1 p1)
  {
    TAutoArgs<1> args;
    args[1] = p1;
   return OlePropertyGet(name, static_cast<TAutoArgsBase*>(&args));
  }

xvr

Дата 21.6.2011, 11:40 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 7046
Регистрация: 28.8.2007
Где: Дублин, Ирландия

Репутация: 48
Всего: 223

Не нашлась какая то проперть в OLE сервере. Посмотрите стек вызовов (или просто значение параметра name)

Torres

Дата 21.6.2011, 19:43 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 25
Регистрация: 6.4.2010

Репутация: нет
Всего: нет

всё нормально, не понимаю в чём проблема? есть ещё какие предложения или же подскажите может есть какой-нибудь другой способ сделать это?

xvr

Дата 21.6.2011, 22:46 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 7046
Регистрация: 28.8.2007
Где: Дублин, Ирландия

Репутация: 48
Всего: 223

Цитата(Torres @ 21.6.2011, 19:43

)

всё нормально,

'ошибка в модуле sysvari.h' - это нормально? Что в стеке, какая OlePropertyGet сломалась? (В какой строке ваших сорцов)

Кстати, у вас почему то одни сплошные OlePropertyGet? Как минимум один OlePropertySet все же должен был присутствовать - для записи данных в ячейку smile

Torres

Дата 22.6.2011, 08:36 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 25
Регистрация: 6.4.2010

Репутация: нет
Всего: нет

спасибо

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »