Ключевые слова: Delphi;
1 введение
При разработке приложений с использованием Delphi нам обычно приходится разработать много документов и отчетов в различных форматах, и нам часто нужно создавать, редактировать и изменять файлы. В качестве китайского ввода и управления форматом данных более трудно работать. Использование офисных инструментов, с которыми все знакомы, может хорошо решить эту проблему. Ниже приведено подробное введение в то, как использовать офис для завершения производства различных документов и отчетов.
2 Метод реализации
Существует три основных метода разработки с использованием Delphi и Office:
(1) Внедряет офис через контроль Delphi ToLecontainer. Более того, офисный документ, запущенный таким образом, представляет собой целое (из интерфейса), но он имеет непреодолимый недостаток, то есть офисный документ не может контролироваться через Delphi, и цель гибкой манипулирования офисом не может быть достигнута.
(2) Используйте контроль серверов Delphi для вызова Office, используйте свойства Office, и используйте серверы управления Delphi для манипулирования Office Office. Но есть также некоторые офисные функции, которые не могут быть вызваны в Delphi (например, макрод VBA, написанный вами). И при реализации функции параметры, которые могут быть выбраны в коде VBA, должны быть добавлены при вызове Delphi, в противном случае даже компиляция не может быть передана. Программы Office и Delphi, начатые таким образом, принадлежат двум формам.
(3) Использование CreateObject начнет Office, а затем управляет офисом в режиме OLE. Этот метод состоит в том, чтобы позвонить в Office в CreateObjects, который на самом деле является OLE, но этот метод может действительно добиться полного контроля над офисными файлами и использовать все свойства Office, включая макрод VBA, написанный самостоятельно. По сравнению с контролем серверов и технологией COM этот метод может действительно использовать различные свойства офиса.
3 Реализация программного обеспечения
3.1 Первый метод: встроенный офис через управление Delphi ToLecontainer.
(1) вызовуте системную страницу управления реализацией ToLeContainer в Delphi;
(2) Дважды щелкните Olecontainer, и появляется следующий интерфейс:
(3) В настоящее время вы можете сделать выбор, выберите «Создать из файла», выберите соответствующий документ и просто реализуйте функцию корректировки офисного документа;
3.2 Второй метод: используйте управление серверами, предоставленным Delphi для вызова Office; Пример, введите свой метод реализации:
(1) Вызовите Twodocument (Create Word File Object), Twodocument (Start Word и установите соединение с Word), Twodofont (установите шрифт файла Word) и TwodParagraphformat (установите формат абзаца в файл Word);
(2) запустить слово и реализовать его через Twitterapplication;
Пытаться
WordApplication.connect;
Кроме
MOSSAGEDLG («Слово не может быть установлено», Mterror, [MBOK], 0);
Прервать;
Конец;
(3) Создайте новый файл и реализуйте его через TwitterApplication;
Шаблон: = emptyParam; // означает, что шаблон не используется
Newtemplate: = false; // означает, что тип нового документа является документом.
// Добавить новый документ
WordApplication.documents.add (Template, Newtemplate) ;
// Закрыть поиск пининина и поиск грамматики для повышения эффективности работы программы
WordApplication.options.checkspellingasyoutype: = false;
WordApplication.options.checkgrammarasyoutype: = false;
(3) вставить данные и реализовать их через TwitterDocument;
//текст
Worddocument.range.insertafter ('база данных Oracle'+chr (#13));
// лист
Worddocument1.tables.add (WordDocument1.range, Rownum, Colnum, Template, Newtemplate); // где rownum - это количество строк таблиц, а Colnum - это количество столбцов таблицы
// вставить данные в таблицу
Worddocument1.tables.item (1) .cell (1,1) .range.text: = 'номер сертификата';
Worddocument1.tables.item (1) .cell (1,2) .range.text: = 'Идентификационный номер'
(4) Настройки формата
Wordfont.connectto (worddocument.sentencies.getlast.font); // установить определенные тексты
Wordfont.connectto (worddocument.paragraphs.getlast.font); // Установить определенный текст
WordFont.Bold: = 1;
WordFont.italic: = 1; ……………………
WordDocument1.PagesTup.HeaderDistance : = 1,5;
Worddocument1.pagesetup.foterdistance: = 1,75;
// установить заголовок и нижний колонтитул
Worddocument1.activewindow.activepane.view.seekview: = wdseekcurrentpagefooter;
// Пусть нижний колонтитул сгибаться вправо
WordDocument1.activeWindow.activePane.selection.paragraphformat.Alignment: = wdalignParagraphright;
………………………………………………………………………
3.3 Третий метод: используйте CreateoleObject для запуска Office, а затем управляйте офисом в режиме OLE. Возьмите таблицы Excel в качестве примера (формат таблицы может быть установлен заранее или определен сами. Здесь мы принимаем формат таблицы, установленного заранее, в качестве примера), объясните это:
(1) добавить класс Comobj в использование;
(2) Подайте заявку на глобальную переменную: FVEXCEL, тип вариант;
(3) Определите функцию для запуска Excel, такую как определение функции OpenExcel (strFileName: String): boolean;
Функция tform1.
Начинать
Результат: = true;
пытаться
FVexcel: = createOleObject ('Excel.application');
кроме
Application.messagebox ('включен Excel для открытия', pchar (application.title), mb_iconerror);
Результат: = false;
конец;
FVexcel.visible: = true;
FVexcel.caption: = '';
FVEXCEL.Workbooks.open ( strfilename ) ;
FVEXCEL.WorkSheets [ 1] .Activate ;
конец;
(4) Вставьте данные в fVexcel
Fvexcel.cells [row, col] .value: = 'china' ; // row представляет ряд, Col представляет столбец;
(5) Установите формат
fvexcel.rows [row] .font.color: = clred ;
fVexcel.ActiveSheet.Pagesetup.leftmargin : = 1 ;
FVEXCEL.ActiveSheet.PagesTup .
FVEXCEL.Activesheet.pagesetup.zoom : = 100 ;
FVEXCEL.ActiveSheet.pagesetup.papersize : = xlpapera4 ;
4 Некоторый опыт
Во время процесса программирования нам часто нужно установить формат офисных документов и таблиц. их. и просмотреть код. Обычно многие свойства, функции или методы могут быть непосредственно использованы в программах Delphi, и некоторые из них могут использоваться в Delphi, если они слегка изменены.
5 Заключение
Delphi может быть идеально сочетается с офисом, и разработаны различные стили столов, текстов, слайдов и т. Д. В то же время, через Delphi, необходимые данные вставляются в соответствующее место офиса, а функции самого офиса предварительно просмотрены, напечатаны и сохранены, тем самым сокращая время для отладки программы и отладки позиционирования, упрощая сложность программирования, и сокращение рабочей нагрузки программистов. Для пользователей использование знакомого офиса увеличивает системную работу. Эта идея широко использовалась в «Информационной системе управления обзором профессионального названия».