lue: = StrKomb ;: = 'Книга під індексом' + Query1.FieldByName ('NUMB_BOOK'). Asstring + '';. Cells.Item [13,1]. value: = StrKomb;: = 'Адміністратор залу ________________'; ExcelWorksheet1.Range [ 'E17', 'J17'] do: = xlVAlignCenter;// вирівнювання вертикальне - по центру
HorizontalAlignment: = xlHAlignRight;// вирівнювання горизонтальне - по центру: = true;// об'єднання ячеек.Bold: = 1;// шрифт - стіль.Italic: = 1;// шрифт - стиль [EmptyParam]: = StrKomb;;// пишемо текст
end;. Range ['A1', 'J18']. BorderAround (2,4,1, EmptyParam) ;//рамка - кордон сформованого документа
// Форматуємо лист Excel ------------------------------------- --- ExcelWorksheet1. PageSetup do.PageSetup.PaperSize: = DMPAPER_A4 ;//формат - А4.PageSetup.LeftMargin: = 20;// поле левое.PageSetup.RightMargin: = 20;// поле правое.PageSetup.TopMargin: = 20;// поле верхнее.PageSetup.BottomMargin: = 20;// поле нижнє
end;
Після виконання програми, розташованого на малюнку 12 додатка у нас виходить один документ Microsoft Word і одна книга Microsoft Excel:
У Документі Microsoft Word:
На першій сторінці документа Microsoft Word загальна довідкова таблиця по всім абонентам, які є в БД, малюнок 13 додатка 1.
На другій сторінці розташовується довідка про клієнта, що є абонентом, із зазначенням його адреси, дати реєстрації, книгою для отримання та її індексом, малюнок 14 додатка 1.
На третій сторінці розташовується Направлення на видачу із зазначенням дати реєстрації та найменуванням книги абонента, малюнок 15 додатка 1.
У Книзі Microsoft Excel:
На першому аркуші розташовується загальна довідкова таблиця по всім абонентам які є в БД, малюнок 16 додатка.
На другому аркуші розташовується довідка про клієнта, що є абонентом, із зазначенням його адреси, дати реєстрації, книгою для отримання та її індексом, малюнок 17 додатка.
На третьому аркуші розташовується Направлення на видачу із зазначенням дати реєстрації та найменуванням книги абонента, малюнок 18 додатка 1.
програма додаток експорт розробка
Висновок
У проекті були отримані навички створення бази даних в Microsoft Access. Перегляд створених СУБД в Delphi, а так само експорт даних в додатки Microsoft Word, Microsoft Excel на основі компонентів OLE Automation - WordApplication, WordDocument, ExcelApplication, ExcelWorkbook, ExcelWorksheet, ExcelChart. br/>
Список літератури
1. В«Delphi, мова і середовище програмуванняВ» Фараонів В.В, Москва: 2009.
