Datenstruktur nach Excel Exportieren

[Oracle]

Ich habe in meinem aktuellen Projekt mehrere gleicher Datenstrukturen.
Diese bestehen jeweils aus mehereren Objekten die in Objectlisten untergebracht sind.
Innerhalb der einzelnen Objekte befinden sich dann Arrays mit Messdaten.

Ich möchte jetzt dem Nutzer die Möglichkeit geben, diese Daten nach Excel zu exportieren.
Ist dies mit Delphi Bordmitteln möglich, und wenn ja wie? Oder muss ich mir da eine externe Komponente besorgen.

Vielen Dank schonmal im Vorraus :-D

[mkinzler]

Ja, per COM/OLE.

[Klaus01]

.. hier noch ein Link zu einem Tutorial dazu.

Grüße
Klaus

[grenzgaenger]

ausserdem kann man 'ne .CSV erstellen und wenn diese mit EXCEL verknüpft ist (der normalfall) kann man 'n einfachen shellexecute drauf machen und schon ist der inhalt in EXCEL,... farben und sonstige formatierungen gibts da zwar nicht... kommt halt auf deine prioritäten an...

[Oracle]

Eine CSV Datei bietet für meine Aufgabe nicht genügend Flexibilität. Ich möchte die Daten auf mehrer Tabellenblätter innerhalb einer XLS Datei verteilen.

Bei COM/OLE muss ich beim Export immer Excel öffnen? Das bedeutet dass auf dem Rechner auf dem ich das ausführe, auch Excel installiert sein muss? Das ist ungünstig in meinem Fall. Gibt es auch die möglichkeit ohne ein installiertes Excel eine XLS Datei zu schreiben?

[marabu]

Moin,

Zitat:

Zitat von Oracle

... Gibt es auch die möglichkeit ohne ein installiertes Excel eine XLS Datei zu schreiben?

diese Möglichkeit gibt es: Microsoft Office Binary File Formats

Alternativ erstellst du dir eine MSO XML-Dokumentvorlage und leitest (durch Ergänzung oder Ersetzung) daraus deine Dokumente ab.

Grüße vom marabu

[Oracle]

Jetzt erst zu studieren wie das Binärformat von Excel aufgebaut ist, ist mir viel zu aufwändig.

Gibt es keine fertige Komponente die einem die ganze Arbeit schön wegkapselt?
Ich kenne das von Matlab, da ist das integriert.
Da gab es den wunderschönen Befehl xlswrite, mit den ich schön einfach meine XLS Files zusammengeschrieben habe.

Ich würde auch Geld für eine Komponente ausgeben, die mir dabei hilft.

[RavenIV]

Geh mal nach www.torry.net und gib als Suchbegriff "Excel" ein.
Da gibt es Komponenten für den Zugriff auf Excel, Beispielprojekte und fertige Programme.
Es ist sicher etwas dabei, was Du brauchen kannst...

[Oracle]

Die Programme dich ich da gefunden habe, machen alle einen Export von einer Datenbank nach Excel.
Ich setze aber keine Datenbank ein, sondern habe meine eigene Datenstruktur. Hat vielleicht irgendjemand Erfahrung damit?

[Chemiker]

Hallo Oracle,

in der Cod-Lib XLS File ohne Excel

wird ein StringGrid als XLS File abgespeichert, nach entsprechender Anpassung kannst Du auch Deine eigene Datenstruktur abspeichern.

Bis bald Chemiker

[Oracle]

Ich habe nun die für meine Bedürfnisse beste Lösung gefunden.
Die Komponente NativeExcel2 bietet genau was ich brauche. Ich kann sämtliche Variablen direkt in die Zellen einer XLS Datei schreiben, ohne Excel installiert zu haben. Des Weiteren kann ich die Zellen auch nach belieben konfigurieren (Schrift, Farbe etc.)

Hier ein Beispiel :

Delphi-Quellcode:

  //Create workbook
  Book := TXLSWorkbook.Create;

  //Add new sheet
  ws := Book.Sheets.Add;
  ws.Name := 'Messung';

  // Fette Schrift und Spaltenbreite vergrößern
  ws.Range['A1', 'A2'].Font.Bold := true;
  ws.Cells.Item[1, 1].ColumnWidth := 5.71;

  // den Zellen 1 und 2 der ersten Zeile einen String und eine Variable übergeben
  ws.Cells.Item[1, 1].Value := 'Wert';
  ws.Cells.Item[1, 2].Value := Wert;

  // Speichern als XLS
  Book.SaveAs('Werte.xls');

Die Komponente NativeExcel stammt von NikaSoft. Website : http://www.nika-soft.com/nativeexcel2/index.htm
Sie kann kostenlos heruntergeladen werden. Registrierung kostet 49$.

[Chemiker]

Hallo Oracle,

währe es möglich, mir eine mit der Komponente abgespeicherte Datei zur Verfügung zu stellen?

Bis bald Chemiker

[Oracle]

Du kannst dir auf der Seite von NikaSoft eine Demo herunterladen, mit der du das selbst durchspielen kannst. In dieser Demo kannst du dir auch XLS Dateien erstellen.