Доклад: Работа с EXCEL: приёмы оформления документа (отчёта)

В uses добавить ComObj

var

Form1: TForm1;

XL : variant; // Переменная в которой создаётся обьект EXCEL

Созданиедокумента

// Обьект EXCEL

XL := CreateOleObject('Excel.Application');

// Чтоб не задавал вопрос о сохранении документа

XL.DisplayAlerts := false;

// новый документ

XL.WorkBooks.Add;

// или загружаем его

XL.WorkBooks.Open(MyDir + '\akt.xls');

{ MyDir - глобальная переменная типа string в неё помещаем путь

к каталогу запуска нашей програмы по событию FormCreate

procedure TForm1.FormCreate(Sender: TObject);

begin

GetDir(0,MyDir);

end;

я всегда так делаю, чтобы программу можно было в любой каталог

поместить вместе со своими дополнительными файлами, в этом случае путь

будет выбираться всегда правильно

}

// Делаем его видимым

XL.Visible := true;

// Когда прога уже оттестирована лучше это делать в конце, быстрей работает,

// а пока нет лучше в начале

// Левое и правое поля отступа для печати

XL.WorkBooks[1].WorkSheets[1].PageSetup.LeftMargin := 30;

--> ЧИТАТЬ ПОЛНОСТЬЮ <--