Автоматическая загрузка процессора Excel

Для работы с электронной таблицей Excel на форме размещаются компоненты TExcelApplication и TExcelWorkbook (книга Excel).

Свойствам объекта TExcelApplication AutoConnect и AutoQuit присваивается значение true.

Свойство объекта TExcelWorkbook ConnectKind должно принять значение ckAttachToInterface.

По аналогии работы с текстовым документом процессора Word, требуется открыть существующий файл, например, к1.xls, в ячейку (1,1) записать текст Для печати, распечатать файл и закрыть документ.

Ниже представлен фрагмент соответствующего кода программы.

Procedure TForm1. ButtonClick (Sender:TObject);

var n: OleVariant;

begin

n:= ‘с:\к1.xls’;

ExcelApplication1.Workbooks.Add (n, 0);

ExcelWorkbook1.ConnectTo (Excel Application1. ActiveWorkbook);

ExcelApplication1.Cells.Items[1,1].Value:=’Для печати’

ExcelWorkbook1.PrintOut;

ExcelWorkbook1.Save;

ExcelWorkbook1.Close;

end.

В приведенном фрагменте программы использовался метод Add (добавить), а также свойство Cells (ячейки таблицы).

Задание на работу

а) Необходимо разработать проект, в котором:

- текст, указанный в компоненте TEdit1, заносится в ранее созданный файл программы Word, выводится на печать, а затем сохраняется под именем, указанным в компоненте TEdit2.

б) Необходимо разработать проект, в котором:

- через какой-либо компонент формы вводится в ячейку электронной таблицы ранее созданного файла Excel произвольное значение или текст.

Не нашли, что искали? Воспользуйтесь поиском: