关键词： Delphi；Word；Excel；报表；
1. Einführung
Bei der Entwicklung von Anwendungen mit Delphi müssen wir in der Regel viele Dokumente und Berichte in verschiedenen Formaten entwerfen, und wir müssen häufig Dateien erstellen, bearbeiten und ändern. Da die chinesische Eingabe- und Datenformatsteuerung problematischer zu bedienen ist. Die Verwendung der Bürowerkzeuge, mit denen jeder vertraut ist, kann dieses Problem gut lösen. Das Folgende ist eine detaillierte Einführung in die Verwendung von Office, um die Produktion verschiedener Dokumente und Berichte zu vervollständigen.
2. Implementierungsmethode
Es gibt drei Hauptmethoden zur Entwicklung mit Delphi und Office:
(1) Einbettete über Delphis Kontroll -Tolecontainer. Darüber hinaus ist das auf diese Weise eingeführte Bürodokument ein Ganzes (von der Schnittstelle), aber es hat einen unüberwindlichen Nachteil, dh das Office -Dokument kann nicht über Delphi kontrolliert werden, und der Zweck der flexiblen Manipulation des Amtes kann nicht erreicht werden.
(2) Verwenden Sie die von Delphi bereitgestellte Server, um das Amt zu rufen, die Eigenschaften des Büros und die Server -Steuerung von Delphi, um das Amt zu manipulieren. Es gibt aber auch einige Bürofunktionen, die in Delphi nicht aufgerufen werden können (z. B. VBA -Makrocode, die von Ihnen selbst geschrieben wurden). Und bei der Implementierung der Funktion müssen die Parameter, die im VBA -Code ausgewählt werden können, beim Aufrufen von Delphi hinzugefügt werden. Andernfalls können sogar die Kompilierung nicht übergeben werden. Auf diese Weise begannen Office- und Delphi -Programme gehören zu zwei Formen.
(3) Verwenden von CreateLoBject startet das Amt und steuert dann das Büro im OLE -Modus. Diese Methode soll Office in createLoBjects anrufen, was tatsächlich OLE ist. Diese Methode kann jedoch wirklich die vollständige Kontrolle über Office -Dateien erreichen und alle Eigenschaften des Amtes verwenden, einschließlich VBA -Makrocode, die von Ihnen selbst geschrieben wurden. Im Vergleich zur Steuerung und COM -Technologie kann diese Methode verschiedene Eigenschaften von Office verwenden.
3 ． Software -Implementierung
3.1 Die erste Methode: Das Büro durch Delphis Steuerung Tolecontainer ist wie folgt:
(1) Rufen Sie die Tolecontainer -Implementierung der Systemseitensteuerung in Delphi auf.
(2) Doppelklicken Sie auf Olecontainer, und die folgende Schnittstelle wird angezeigt:
(3) Zu diesem Zeitpunkt können Sie eine Wahl treffen, "aus der Datei erstellen", das entsprechende Dokument auswählen und einfach die Funktion zur Anpassung des Office -Dokuments implementieren.
3.2 Die zweite Methode: Verwenden Sie die von Delphi bereitgestellte Server, um das Amt zu rufen Ein Beispiel, stellen Sie seine Implementierungsmethode ein:
(1) Rufen Sie das Twodocument auf (Word -Dateiobjekt erstellen), Twodocument (Word starten und eine Verbindung mit Wort herstellen), twodofont (festlegen die Schriftart der Wortdatei) und TwodCragraphFormat (das Absatzformat in der Wortdatei festlegen).
(2) Word starten und durch TwitterApplication implementieren;
Versuchen
Wordapplication.connect;
Außer
Messagedlg ('Wort kann nicht installiert werden', Mterror, [Mbok], 0);
Abbrechen;
Ende;
(3) Erstellen Sie eine neue Datei und implementieren Sie sie über TwitterApplication.
Template := EmptyParam; //表示不使用模板
NewTemplate := False; //表示新建新建文档的类型为文档，
//添加新文档
WordApplication.Documents.Add(Template, NewTemplate); WordDocument.ConnectTo(WordApplication.Documents.Item(ItemIndex ));
// Pinyin -Suche und Grammatiksuche schließen, um die Effizienz des Programmbetriebs zu verbessern
WordApplication.Options.CheckSpellingasyOutype: = false;
WordApplication.Options.CheckgrammarasyOutype: = false;
(3) Daten einfügen und über das TwitterDocument implementieren.
//Text
WordDocument.Range.insertafter ('Oracle Database'+chr (#13));
//表格
WordDocument1.tables.add (WordDocument1.Range, Rownum, Colnum, Vorlage, NewTemplate); // wobei Rownum die Anzahl der Tabellenreihen und Colnum ist, ist die Anzahl der Tabellenspalten
//向表格中插入数据
WordDocument1.tables.Item (1) .Cell (1,1) .Range.text: = 'Zertifikatnummer';
WordDocument1.tables.Item (1) .Cell (1,2) .Range.text: = 'ID -Nummer' '
(4) Formateinstellungen
WordFont.ConnectTo (WordDocument.sensces.getLast.font); // Setzen Sie bestimmte Texte
Wordfont.connectto (WordDocument.Paragraphs.getlast.font); // Setzen Sie einen bestimmten Text
WordFont.bold: = 1;
Wordfont.italic: = 1; …………………………
WordDocument1.PageSetup.HeaderDistance:=1.5; //设置页边距
WordDocument1.Pagesetup.FoterDistance: = 1,75;
// Setzen Sie die Header und die Fußzeile
WordDocument1.ActiveWindow.activePane.View.seekview: = wdseekcurrentPageFoterer;
// Lassen Sie die Fußzeile nach rechts beugen
WordDocument1.ActiveWindow.activePane.Selection.ParagraphFormat.Alignment: = wdalignSparagrapHright;
………………………………………………………………………………………………………………………………………………………………………………………………….
3.3 Die dritte Methode: Verwenden Sie CreateLoBject, um das Amt zu starten, und steuern Sie das Büro im OLE -Modus. Nehmen Sie als Beispiel Excel -Tabellen (das Format der Tabelle kann im Voraus festgelegt oder von Ihnen selbst definiert werden. Hier nehmen wir das Format der Tabelle im Voraus als Beispiel an), erklären Sie es:
(1) Comobj -Klasse in Verwendungen hinzufügen;
(2) eine globale Variable beantragen: FVExcel, Typ Variante;
(3) Definieren Sie eine Funktion zum Starten von Excel, z. B. die Funktion openExcel (strFileName: String): boolean;
Funktion tform1.
Beginnen
Ergebnis: = wahr;
versuchen
FVExcel: = createLoBject ('excel.application');
außer
Application.MessageBox ('Enabled Excel zu öffnen', pchar (application.title), mb_iconError);
Ergebnis: = falsch;
Ende;
Fvexcel.vissible: = true;
FVExcel.Caption: = '';
FvExcel.WorkBooks.Open(strFileName); //打开工作簿
FvExcel.WorkSheets[1].Activate; //设置第1个工作表为活动工作表
Ende;
(4) Fügen Sie Daten in FVExcel ein
FvExcel.cells[row,col].value:='中国' ;//row表示行，col表示列；
(5) Setzen Sie das Format
fvexcel.rows[row].font.color:=clred; //设置某一行数据的颜色
fvexcel.ActiveSheet.PageSetup.LeftMargin:=1; //设置左页边距
fvexcel.ActiveSheet.PageSetup. RightMargin:=1; //设置右页边距
fvexcel.ActiveSheet.PageSetup.Zoom:=100; //设置显示比例
fvexcel.ActiveSheet.PageSetup.PaperSize:= xlPaperA4; //设置打印纸张大小
4 ． Einige Erfahrungen
Während des Programmierungsprozesses müssen wir häufig das Format von Bürodokumenten und Tabellen festlegen. sie. und sehen Sie sich den Code an. Normalerweise können viele Eigenschaften, Funktionen oder Methoden direkt in Delphi -Programmen verwendet werden, und einige von ihnen können in Delphi verwendet werden, solange sie leicht modifiziert sind.
5 ． Abschluss
Delphi kann perfekt mit Büro kombiniert werden, und verschiedene Arten von Tabellen, Texten, Folien usw. werden entworfen. Gleichzeitig werden über Delphi die erforderlichen Daten in den entsprechenden Ort des Amtes eingefügt, und die Funktionen des Amtes selbst werden vorangedacht, gedruckt und gespeichert, wodurch die Zeit für das Debuggen und Positionieren von Debuggen für Programme gesenkt wird, was die Schwierigkeit der Programmierung vereinfacht, die Schwierigkeit der Programmierung, die Programmierung, vereinfacht und Reduzierung der Arbeitsbelastung der Programmierer. Für Benutzer erhöht die Verwendung vertrauter Büro die Systembetriebsfähigkeit. Diese Idee wurde im "Informationssystem" Professional Title Review Management "häufig verwendet.