Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx) (https://www.delphipraxis.net/196197-delphi-only-read-writer-fuer-excel-dokumente-xls-xlsx.html)

Bernhard Geyer 30. Apr 2018 14:09

Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
Zum 10jähigen Jubiläum kommt die Anforderung wieder hoch Excel-Dateien (xls/xlsx) native ohne installiertes Excel laden zu können.

Welch aktuellen Komponenten wären hier in 2018 zu empfehlen.
- Darf was kosten
- Muss im Quellcode vorliegen
- Sollte noch gepflegt sein (jedenfalls wenn Sie nicht kostenlos verfügbar sind)
- Muss nicht unbedingt Plattformunabhängig sein (FMX, iOS, Android)

timog 30. Apr 2018 14:33

AW: Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
FlexCell von TMS oder SpreadSheat von DevExpress fallen mir spontan ein.

mkinzler 30. Apr 2018 14:41

AW: Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
https://github.com/Avemey/zexmlss
http://www.kluug.net/xlsx-ods-delphi.php

dummzeuch 30. Apr 2018 15:35

AW: Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
Wir verwenden NativeExcel, allerdings scheinen die auf dem Stand von Delphi XE4 stehengeblieben zu sein:

Zitat:

NativeExcel works with Delphi 4, 5, 6, 7, 2005, 2006, 2007, 2009, 2010, XE, XE2, XE3 and XE4.

Delphi.Narium 30. Apr 2018 17:35

AW: Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
Schau mal bitte hier den vierten Betrag an: https://stackoverflow.com/questions/...t-having-excel

Das könnte eventuell eine Lösung sein, die man sich relativ schnell selbst bauen kann.

Ist letztlich "nur" 'ne HTML-Datei mit der Endung xls.

Excel kann damit umgehen und für einen reinen Datenaustausch könnte das durchaus reichen.

Eine Minimalversion in Pascalsacript für meinen Editor sieht so aus:
Delphi-Quellcode:
program Test;

procedure CreateXLS(ADataSet: TDataSet; AFileName : String; ASheetName : String);
var
        i : Integer;
        sl : TStringList;
begin
  sl := TStringList.Create;
  sl.Add('<html xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:x="urn:schemas-microsoft-com:office:excel" xmlns="http://www.w3.org/TR/REC-html40">');
  sl.Add('<head>');
  sl.Add('<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">');
  sl.Add('<!--[if gte mso 9]>');
  sl.Add('<xml>');
  sl.Add(' <x:ExcelWorkbook>');
  sl.Add('   <x:ExcelWorksheets>');
  sl.Add('     <x:ExcelWorksheet>');
  sl.Add(Format('    <x:Name>%s</x:Name>',[ASheetName]));
  sl.Add('       <x:WorksheetOptions>');
  sl.Add('         <x:Selected/>');
  sl.Add('         <x:Panes>');
  sl.Add('           <x:Pane>');
  sl.Add('            <x:Number>1</x:Number>');
  sl.Add('            <x:ActiveRow>1</x:ActiveRow>');
  sl.Add('           </x:Pane>');
  sl.Add('         </x:Panes>');
  sl.Add('         <x:ProtectContents>False</x:ProtectContents>');
  sl.Add('         <x:ProtectObjects>False</x:ProtectObjects>');
  sl.Add('         <x:ProtectScenarios>False</x:ProtectScenarios>');
  sl.Add('       </x:WorksheetOptions>');
  sl.Add('     </x:ExcelWorksheet>');
  sl.Add('   </x:ExcelWorksheets>');
  sl.Add(' </x:ExcelWorkbook>');
  sl.Add('</xml>');
  sl.Add('<![endif]-->');
  sl.Add('</head>');
  sl.Add('<body>');
  sl.Add('<table x:str>');
  ADataSet.First;
  while not ADataSet.EoF do begin
    sl.Add('<tr>');
    for i := 0 to ADataSet.Fields.Count - 1 do sl.Add(Format('<td x:num>%s</td>',[ADataSet.Fields.Fields[i].AsString]));
    sl.Add('</tr>');
    ADataSet.Next;
  end;
  sl.Add('</table>');
  sl.Add('</body>');
  sl.Add('</html>');
  sl.SaveToFile(AFileName);
  sl.Free;
end;

begin
  CreateXLS(DataSet,'c:\temp\Dateiname.xls','Sheetname');
end.
Excel kann die daraus resultierende Datei problemlos öffnen.

zeras 30. Apr 2018 17:47

AW: Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
Zitat:

Zitat von timog (Beitrag 1400961)
FlexCell von TMS oder .....

Dies nutze ich auch, wobei ich nur relativ wenig Funktionen nutze, wie
- neuen Reiter anlegen
- einzelne Zellen beschreiben

Alles in allem für mich sehr gut.

himitsu 30. Apr 2018 18:38

AW: Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
Zitat:

Eine Minimalversion in Pascalsacript für meinen Editor sieht so aus:
Aber ist *.XLS (das alte binäre Format) hier nicht bissl falsch?

Im Grunde ist das ja ein "Teil" des *.XLSX (eine ZIP mit XML-Dateien drin)

Delphi.Narium 30. Apr 2018 19:04

AW: Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
.XLS heißt nur, dass die Datei mit Excel verknüpft sein soll. Offensichtlich ist Excel die Dateiendung egal, solange es sich beim Dateiinhalt um ein für Excel gültiges und verarbeitbares Format handelt.

Und wenn man der Datei die Endung .XSLS gibt, kommt Excel damit auch klar. Und selbst, wenn die Dateiendung auf .Pauline geändert wird, kann Excel noch mit dem Inhalt umgehen, auf den kommt es letztlich an. Man kann die Dateiendung auch bei .html belassen und dann die HTML-Datei mit Excel öffnen.

Das Ergebnis ist immer gleich.

Die starre Verbindung von Dateiendung und Inhalt ist doch schon seit mehrere Windowsgenerationen obsolet, über die Dateiendung verknüpft man eigentlich nurnoch, welches Programm bei 'nem Doppelklick im Explorer ... für das Öffnen der Datei vorgesehen ist. Die meisten Programme prüfen beim Öffnen einer Datei, ob sie mit dem Inhalt umgehen können oder auch nicht.

Wenn ich 'ne Datei per Drag&Drop auf ein Programm ziehe, schaue ich nicht auf die Dateiendung, mich interessiert nur, ob das Programm mit der Datei arbeiten kann.

'ne FireBird-Datenbank ist doch nicht nur dann eine FireBird-Datenbank, wenn die Dateiendung .fdb ist, die kann auch .dbf sein und wird deshalb nicht zu 'ner DBase-Datei.

Und noch lange nicht alle Dateien mit der Endung .DOC sind Worddokumente oder können mit Word sinnvoll bearbeitet werden.

mkinzler 30. Apr 2018 20:16

AW: Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
Hilft hier aber nicht, da ja Dateien geöffnet werden sollen nicht erzeugt. Und dann könnte man auch einfach csv-Dateien erzeugen, diese werden auch problemlos von Excel akzeptiert.

juergen 30. Apr 2018 21:07

AW: Delphi-Only Read(Writer) für Excel-Dokumente (xls/xlsx)
 
Ich kann dir die Axolot-XLSReadWriteII-Komponente empfehlen!
Es ist ein durchgängiges Konzept erkennbar, viele Funktionen, Fehlerbehebung erfolgte schnell und ist aktuell. Source wird bei der Kaufversion geliefert.
Das ist schon meine 3. Excel Komponente und die erste, mit welcher ich rund rum zufrieden bin.


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:17 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz