Форум: "Базы";
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];

Вниз

Выгрузка данных в Excel   Найти похожие ветки 

← →
JibSkeart   (2002-03-09 11:36) [1]

Var
Xl,Xarr:Variant;
begin
XArr:=VarArrayCreate([1,2],varVariant);
XL:=CreateOLEObject("Excel.Application");
XL.WorkBooks.add;
XL.visible:=true;
XArr[1]:="hello";
XArr[2]:="world";
XL.Range["A"+IntToStr(j),"B"+IntToStr(j)].Value := XArr;
end;


Так Пойдет ??

---

Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.005 c