|
ExcelMgt.OpenBook(FileName);
ExcelMgt.OpenSheetByNumber(1);
RowID := '8';
....
ExcelMgt.FillCell('G2',FORMAT(UPPERCASE(Driver.Name) + ' ' + "Licence Plate"));
ExcelMgt.FillCell('K2',FORMAT(TODAY));
SetFontSizeBold('K2', 11, FALSE);
...
ExcelMgt.Save(PathForSave, FileName);
где
ExcelMgt - кодеюнит содержащий функции работы с Excell
FileName - имя файла (у нас тянется из шаблонов)
RowID - номер строки (отлично инкрементится для перехода на сл строку при помощи INCSTR(RowID))
FillCell - функция вставки значения в ячейку
Save - сохранение файла по пути PathForSave с именем FileName
остальное можно дописать самому) (новые функции легко создаются при помощи самого Excell - записываете в макрос действия и глядя на его код пишете свои функции)...
__________________
Как только вы проиграете, все ваши прошлые победы забудут.
|