Delphi ist eine leistungsstarke integrierte Entwicklungsumgebung, die bei Programmierern, die in Pascal arbeiten, beliebt ist. Eines der häufigsten Szenarien für die Verwendung von Delphi ist die Erstellung und Verarbeitung von MS Excel-Dokumenten.
Es gibt mehrere Ansätze, um mit Excel in Delphi zu arbeiten. Eine davon ist die Verwendung der TExcelApplication-Komponente aus der VCL-Bibliothek. Mit dieser Komponente können Sie Excel-Dateien erstellen, öffnen, bearbeiten und speichern. Wenn Sie TExcelApplication verwenden, können Sie mit dem Excel-Objektmodell auf verschiedene Anwendungsfunktionen und -methoden zugreifen.
var
ExcelApp: TExcelApplication;
ExcelWorkbook: _Workbook;
ExcelWorksheet: _Worksheet;
begin
ExcelApp := TExcelApplication.Create(nil);
ExcelApp.Connect;
ExcelWorkbook := ExcelApp.Workbooks.Add;
ExcelWorksheet := ExcelWorkbook.Worksheets[1] as _Worksheet;
// Daten hinzufügen
ExcelWorksheet.Cells[1, 1] := 'Hallo Welt!';
// Datei speichern
ExcelWorkbook.SaveAs('С:\Новый_файл .xls');
// Ressourcen freigeben
ExcelWorksheet := nil;
ExcelWorkbook := nil;
ExcelApp.Quit;
ExcelApp := nil;
end;
Wenn Sie eine flexiblere und leistungsfähigere Arbeit mit Excel wünschen, können Sie spezialisierte Bibliotheken wie Office Open XML oder Apache POI verwenden. Mit diesen Bibliotheken können Sie Excel-Dateien unabhängig von der installierten Excel-Anwendung erstellen und verarbeiten.
In jedem Fall bietet die Arbeit mit Excel in Delphi umfangreiche Möglichkeiten zum Erstellen und Automatisieren von Datenprozessen, was diese Entwicklungsumgebung zu einem großartigen Werkzeug für die Arbeit mit Excel-Tabellen macht.
Delphi: Erstellen einer Excel-Datei
Delphi bietet verschiedene Möglichkeiten zum Erstellen und Verwalten von Excel-Dateien. In diesem Artikel betrachten wir eine einfache Möglichkeit, eine Excel-Datei mithilfe der TExcelApplication-Komponente zu erstellen.
- Erstellen Sie eine neue Delphi-Anwendung.
- Fügen Sie dem Formular eine TExcelApplication-Komponente und eine Schaltfläche hinzu.
- Legen Sie die ConnectMode-Eigenschaft der TExcelApplication-Komponente auf cmExcel fest;
- Fügen Sie im Handler für das Klickereignis den folgenden Code hinzu:
varExcelApp: TExcelApplication;ExcelWorkbook: _Workbook;Sheet: _Worksheet;beginExcelApp := TExcelApplication.Create(nil);ExcelApp.Connect;ExcelWorkbook := ExcelApp.Workbooks.Add(EmptyParam, 0);Sheet := ExcelWorkbook.ActiveSheet as _Worksheet;// Запишите в ячейки нужные значенияSheet.Cells.Item[1, 1].Value := 'Заголовок 1';Sheet.Cells.Item[1, 2].Value := 'Заголовок 2';Sheet.Cells.Item[2, 1].Value := 'Значение 1';Sheet.Cells.Item[2, 2].Value := 'Значение 2';// Сохраните файлExcelWorkbook.SaveAs('путь_к_файлу.xls');// Закройте приложение ExcelExcelApp.Disconnect;ExcelWorkbook := nil;ExcelApp := nil;end;Beachten Sie, dass die Value-Eigenschaft des Zellenobjekts zum Schreiben von Daten in Zellen verwendet wird. Der Zellenwert wird mithilfe von Zeilen- und Spaltenindizes festgelegt.
Nachdem der Code ausgeführt wurde, wird eine Excel-Datei im angegebenen Pfad mit den angegebenen Werten in den Zellen erstellt.
Jetzt wissen Sie, wie Sie eine Excel-Datei in Delphi mit der TExcelApplication-Komponente erstellen.
Abschnitt 1: Delphi importieren und Komponenten installieren
Schritt 1: Laden Sie Delphi herunter
Der erste Schritt besteht darin, Delphi von der offiziellen Website von Embarcadero Technologies herunterzuladen. Wählen Sie die entsprechende Version von Delphi entsprechend Ihren Anforderungen und Systemanforderungen aus. Stellen Sie sicher, dass Sie die neueste verfügbare Version von Delphi herunterladen.
Schritt 2: Installieren Sie Delphi
Führen Sie nach dem Herunterladen von Delphi die Installationsdatei aus und folgen Sie den Installationsanweisungen. Stellen Sie sicher, dass Sie die Delphi-Komponenten auswählen, die Sie für die Arbeit mit Excel-Dateien benötigen.
Schritt 3: Installieren Sie die Komponenten
Nach Abschluss der Delphi-Installation müssen Sie möglicherweise zusätzliche Komponenten installieren, um mit den Excel-Dateien zu arbeiten. Es gibt viele Komponenten von Drittanbietern für Delphi, die das Erstellen und Bearbeiten von Excel-Dateien erleichtern. Sie können je nach Ihren Bedürfnissen eine dieser Komponenten auswählen.
Einige beliebte Komponenten für die Arbeit mit Excel in Delphi sind:
- Excel ADO.Net komponente von Devart
- TMS FlexCel
- OS Power Suite für Excel
Nachdem Sie die Komponenten installiert haben, konvertieren Sie sie in Ihr Delphi-Projekt, indem Sie den Anweisungen des Entwicklers der einzelnen Komponenten folgen. Nachdem Sie die Komponenten erfolgreich importiert und installiert haben, können Sie Excel-Dateien in Delphi erstellen.
Abschnitt 2: Erstellen einer Excel-Instanz
Um mit Excel in Delphi arbeiten zu können, müssen Sie ein Excel-Objekt instanziieren.Application. Dies kann wie folgt erfolgen:
1. Hinzufügen von verwendeten Bibliotheken zum Modulcode
Sie müssen die verwendeten Bibliotheken am Anfang des Modulcodes hinzufügen:
uses ComObj;
2. Erstellen einer Instanz eines Excel-Objekts
Erstellen einer Instanz eines Excel-Objekts.Application ruft die CreateOleObject-Funktion auf:
var
Nachdem dieser Code ausgeführt wurde, wird eine Instanz des Excel-Objekts erstellt.Application, die für die Arbeit mit Excel verwendet wird.
Abschnitt 3: Erstellen eines neuen Excel-Dokuments
Es gibt mehrere Möglichkeiten, ein neues Excel-Dokument in Delphi zu erstellen. Wir werden eine der einfachsten Methoden mit der Excel-Anwendungsbibliothek betrachten.
Zuerst müssen Sie dem Projekt einen Verweis auf die Excel Application-Bibliothek hinzufügen. Klicken Sie dazu in der Delphi IDE auf die Registerkarte "Projekt" und wählen Sie dann aus dem Menü die Option "Import Type Library" aus. Suchen Sie im geöffneten Fenster nach Microsoft Excel XX.X Object Library", wobei XX.Die X- Version von Excel auf Ihrem Computer (z. B. "Microsoft Excel 16.0 Object Library" für Excel 2016).
Als nächstes fügen Sie dem Code die folgenden Zeilen hinzu:
usesExcel_Tlb; // Импортируем модуль с объявлениями типов из библиотеки Excel Application
varExcelApp: _Application; // Переменная для работы с Excel
beginExcelApp := CoApplication.Create; // Создаем новый экземпляр ExcelExcelApp.Visible := True; // Показываем Excel на экранеExcelApp.Workbooks.Add; // Создаем новую книгуend;
Das ist alles! Jetzt haben Sie ein neues Excel-Dokument, das auf dem Bildschirm angezeigt wird. Sie können andere Methoden und Eigenschaften des ExcelApp-Objekts verwenden, um das Erscheinungsbild des Dokuments anzupassen oder Daten hinzuzufügen.
Denken Sie daran, Ressourcen freizugeben, wenn Sie mit Excel fertig sind:
ExcelApp.Quit; // Закрыть ExcelExcelApp := nil; // Освободить память
In diesem Abschnitt haben wir untersucht, wie ein neues Excel-Dokument mit Delphi erstellt wird. Im nächsten Abschnitt erfahren Sie, wie Sie dem erstellten Dokument Daten hinzufügen.
Abschnitt 4: Auffüllen von Daten in Excel
Nachdem wir eine neue Excel-Datei in Delphi erstellt haben, können wir damit beginnen, sie mit Daten zu füllen. Dazu verwenden wir die Objekte und Methoden, die von der Excel-Bibliothek bereitgestellt werden.
Um in Delphi eine Zelle in Excel zu füllen, müssen wir einen Verweis auf das Arbeitsmappenobjekt (Workbook) und das Arbeitsblattobjekt (Worksheet) erstellen, auf dem wir die Daten füllen möchten.
Um einen Verweis auf ein bestimmtes Arbeitsblatt in einer Arbeitsmappe zu erstellen, verwenden wir den folgenden Code:
var Excel: Variant; Workbook: Variant; Worksheet: Variant; begin Excel := CreateOleObject('Excel.Application'); Workbook := Excel.Workbooks.Add; Worksheet := Workbook.Worksheets.Item[1]; // Verweis auf das erste Blatt in der End-Arbeitsmappe;
Jetzt, da wir einen Verweis auf das gewünschte Blatt haben, können wir beginnen, die Daten auszufüllen. Die Daten werden mit der Cells-Methode in eine Zelle aufgefüllt, die eine Zeilen- und Spaltennummer akzeptiert und einen Verweis auf eine bestimmte Zelle zurückgibt:
var Cell: Variant; begin Cell := Worksheet.Cells[1, 1]; // Verweis auf die Zelle A1 Cell.Value := 'Hello World'; // Schreibe den Wert in die End-Zelle;
Daher wird nach der Ausführung dieses Codes in Zelle A1 der Wert "Hello World" geschrieben.
Außerdem können wir einen Bereich von Zellen mit Daten füllen. Dazu können wir ein Range- Objekt verwenden, das die Anfangs- und Endzellen des Bereichs akzeptiert:
var Range: Variant; begin Range := Worksheet.Range['B1', 'C3']; // Verweis auf den Zellbereich B1:C3 Range.Value := 123; // Schreibe den Wert 123 in alle Zellen des End-Bereichs;
Auf diese Weise werden alle Zellen im Bereich B1:C3 mit dem Wert 123 gefüllt.
Jetzt wissen Sie, wie Sie die Daten in einer Excel-Datei mit Delphi füllen können. Im nächsten Abschnitt werden wir untersuchen, wie Daten in einer Excel-Datei zu formatieren.
Abschnitt 5: Formatieren von Zellen in Excel
Wenn Sie Zellen in Excel formatieren, können Sie das Aussehen der Daten ändern, Stil, Farbe und Auswahl hinzufügen. In Delphi gibt es mehrere Möglichkeiten, Zellen in Excel zu formatieren.
- Formatieren von Text: Sie können die Schriftart, Größe und den Stil des Textes in der Zelle ändern, Ausrichtung und Einzug hinzufügen. Mit der Textformatierung können Sie die Tabelle lesbarer und aufgeräumter gestalten.
- Formatieren von Zahlen: Sie können das Anzeigeformat von Zahlen in einer Zelle ändern, Satzzeichen, Tausendertrennzeichen und Dezimaltrennzeichen hinzufügen. Die Formatierung von Zahlen verbessert die Lesbarkeit von numerischen Daten.
- Formatieren von Daten: Sie können das Anzeigeformat von Datum und Uhrzeit in einer Zelle ändern, die Formatierung von Datum, Uhrzeit oder beides gleichzeitig hinzufügen. Mit der Datumsformatierung können Sie Daten in einem leicht verständlichen Format darstellen.
- Formatieren von Hintergrund und Rahmen: Sie können die Hintergrundfarbe einer Zelle ändern, Rahmen um eine Zelle oder einzelne Zellen hinzufügen. Wenn Sie den Hintergrund und die Grenzen formatieren, können Sie wichtige Daten hervorheben und die Tabelle strukturierter gestalten.
Delphi bietet verschiedene Funktionen und Methoden zum Formatieren von Zellen in Excel. Sie können Objekte und Eigenschaften verwenden, um das Aussehen und den Stil der Daten in einer Zelle zu ändern und die Position der Daten in einer Tabelle zu steuern.
Im nächsten Abschnitt untersuchen wir, wie Sie die Textformatierung mit Delphi auf Zellen in Excel anwenden.
Abschnitt 6: Speichern und Schließen eines Excel-Dokuments
Nachdem wir unser Excel-Dokument erfolgreich erstellt und ausgefüllt haben, müssen Sie es speichern und schließen. Um dies zu tun, verwenden wir in Delphi die folgenden Methoden und Eigenschaften:
Workbook-Eigenschaft:
- SaveAs(FileName: OleVariant; FileFormat: OleVariant; ReadOnly, CreateBackup, AddToMru, TextCodepage, TextVisualLayout: OleVariant)
Mit der SaveAs-Methode können Sie eine Excel-Datei in einem bestimmten Pfad speichern und ein Speicherformat auswählen. Die folgenden Werte werden als Parameter übergeben:
- FileName: Der Pfad, in dem die Datei gespeichert werden soll
- FileFormat: Speicherformat (z. B. xlOpenXMLWorkbook - zum Speichern im xlsx-Format)
- ReadOnly: bestimmt, ob die Datei als schreibgeschützt gespeichert werden soll
Workbook-Eigenschaft:
- Close(SaveChanges, Filename, RouteWorkbook: OleVariant)
Mit der Close-Methode können Sie das aktuelle Excel-Dokument schließen. Die folgenden Werte werden als Parameter übergeben:
- SaveChanges: bestimmt, ob die Änderungen vor dem Schließen gespeichert werden sollen (zum Beispiel True, um die Änderungen zu speichern)
- Filename: Der Dateiname, der zum Speichern der Änderungen verwendet wird
- RouteWorkbook: Legt fest, ob gespeicherte Links zu anderen Dokumenten aktualisiert werden sollen
Ein Beispiel für die Verwendung dieser Methoden:
Dieser Code speichert das aktuelle Excel-Dokument im Pfad 'C:\example .xlsx' im xlsx-Format.
Dieser Code schließt das aktuelle Excel-Dokument und speichert alle Änderungen.
