Передача в Excel

← →
Maloric (2006-07-09 14:56) [0]

Здраствуйте, уже весь форум перерыл, немогу избавиться от ошибки, есть ли у кого рабочий пример?
1. uses KolComObj var XLApp:OleVariant; begin Kol.OleInit; XLApp:=CreateOleObject("Excel.Application");//ERROR ...
Возвращает пустую ошибку.
2.uses Variants, ComObj; var XLApp:OleVariant; begin Kol.OleInit; XLApp:=CreateOleObject("Excel.Application");//ERROR ...
Не узнает строку CreateOleObject?
Пробовал и с заменой системных модулей и без нее.
uses Windows, Messages, ShellAPI, KOL, KOLEcmListEdit ,Variants {$IFNDEF KOL_MCK}, mirror, Classes, Controls, mckControls, mckObjs, Graphics, mckCtrls, mckEcmListEdit, ComObj{$ENDIF (place your units here->)};

← →
Maloric © (2006-07-09 16:11) [1]

Заменил fakeVariants на Variants из шестого делфи, все заработало,
только файл стал весить на ~50кб больше.

p.s. Я и не знал, что в KOL теперь встроили fakeVariants.

← →
thaddy (2006-07-09 18:26) [2]

the reasons for the fakevariants were:

1. from D6 the variants implementations were (badly) rewritten and added a lot of code.
2. the variants unit was included in the uses clause by some code even if it wasn"t needed.

The best solution is to use D4 or D5 with KOL COM code (recommended!).
The second solution is to use the variants unit from Borland, but that will add 70K to your programs.

> The best solution is to use D4 or D5 with KOL COM code (recommended!
> ).
> The second solution is to use the variants unit from Borland,
> but that will add 70K to your programs.

Thank for the answer, Thaddy!
It is necessary to agree with 70 kb

Передача в Excel Найти похожие ветки