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

Открытие шаблона Microsoft Excel   Найти похожие ветки 

← →
kingsoft ©   (2007-01-16 04:33) [0]

Доброго времени суток уважаемые мастера. Помогите пожалуйста с небольшой проблемой: Как сделать так, чтобы по нажатию на кнопку (Button), открывался уже готовый шаблон Microsoft Excel, из того или иного каталога жёсткого диска.

---

← →
КиТаЯц ©   (2007-01-16 08:11) [1]

ShellExecute ?

---

← →
pavel_guzhanov ©   (2007-01-16 09:41) [2]

XLApp:=CreateOleObject("Excel.Application");
 XLApp.WorkBooks.Open("c:\Blank.xls");

---

← →
kingsoft ©   (2007-01-16 14:35) [3]

> pavel_guzhanov ©   (16.01.07 09:41) [2]
> XLApp:=CreateOleObject("Excel.Application");  XLApp.WorkBooks.
> Open("c:\Blank.xls");

Что то я не понял. Если можно то напишите пожалуйста полный код, и какие кампоненты нужно додавить на форму для работы, этого кода?

---

← →
pavel_guzhanov ©   (2007-01-16 14:54) [4]

компонентов, кроме твоей кнопки, никаких.

uses comObj, Excel_TLB;

procedure TForm1.BInExcelClick(Sender: TObject);
var XLApp:Variant;
begin
  XLApp:=CreateOleObject("Excel.Application");
  XLApp.WorkBooks.Open("c:\Blank.xls");
  XLApp.Visible:=true;
end;


Если у тебя нет файла Excel_TLB.pas, то его нужно импортировать. Делается это так: Projects->Import Type Library, выбираешь в списке "Microsoft Excel 11.0 Object Library (Version 1.5)" и нажимаешь кнопку Create Unit. 11.0 и 1.5 - соответствуют MSExcel 2003, у других версий будут отличаться. Ну и, конечно, в корне диска С должен быть файл Blank.xls, это в том случае, если ты не хочешь ничего менять в приведенном примере.

---

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

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



Память: 0.45 MB
Время: 0.028 c