Скачать: CL | DM;

Опять Excel   Найти похожие ветки 

← →
KPY ©   (2003-02-13 15:19) [0]

Нужно заполнить таблицу Excel
Делаю

procedure TForm1.Button1Click(Sender: TObject);
var
vExcel, xlvariant: OLEVariant;
begin
vExcel := CreateOleObject("Excel.Application");
vExcel.Workbooks.Add(EmptyParam);
vExcel.Cells[1, 1].Value := 124512;
vExcel.Cells[1, 2].Value := "С добрым утром";
vExcel.ActiveWorkBook.SaveAs("c:\Test");
vExcel.ActiveWorkBook.Close;
vExcel.Visible := False;
end;

В результате создается книга данные записываются но видно что Excel открылся и закрылся. Подскажите пожалуйста что творить.

---

← →
Steven   (2003-02-13 15:22) [1]

Могу кинуть компонентик с исходниками =)

---

← →
KPY ©   (2003-02-13 15:33) [2]

Плиз
Krivtsov@nnc.kz

---

← →
KPY ©   (2003-02-13 16:16) [3]

У тебя в примере точно так-же открывается Excel а потом закрывается.Это заметно.Может как нибудь можно записать не запуская Excel (например в шаблон) или так чтобы этого хотябы не было видно.

---

← →
mate ©   (2003-02-13 16:22) [4]

Попробуй вот так:
uses
ComObj, ActiveX;
var
Excel: Variant;
begin
Excel := CreateOleObject("Excel.Application");
Excel.Visible := False;

---

← →
KPY ©   (2003-02-13 16:29) [5]

Только что попробовал, то-же самое
Хотя теперь не видно что это именно Excel открывается, просто экран моргает. Может это вообще невозможно?

---

← →
mate ©   (2003-02-13 16:53) [6]

Попробуй последнее
Excel.Enabled := False;

---

← →
Pakshin A. S.   (2003-02-13 18:29) [7]

Есть компонент F1BOOK1 во вкладке ActiveX...

---

← →
KPY ©   (2003-02-14 13:42) [8]

mate ©
Такого метода у Excel нет
Pakshin A. S.
А это может решить проблему! Спасибо!

---

← →
Alik ©   (2003-02-16 23:26) [9]

Я вот тут тоже занимался с Экселькой, нашел хороший компонент - FlexCel! В результате забацал клевую базу данных! Скачай его и проблемы твои решаться!

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c