Bonjour à tous.
Je suis à la recherche d'une piste pour utiliser les API de LibreOffice (Calc) depuis un programme créé avec Lazarus sur Ubuntu.
Je n'ai personnellement rien trouvé en Lazarus ou Delphi (même sous Windows ).
Merci et bonne journée.
Bonjour à tous.
Je suis à la recherche d'une piste pour utiliser les API de LibreOffice (Calc) depuis un programme créé avec Lazarus sur Ubuntu.
Je n'ai personnellement rien trouvé en Lazarus ou Delphi (même sous Windows ).
Merci et bonne journée.
Bonjour jjnoui,
Un lien qui pourrait peut-être t'intéresser :
https://wiki.freepascal.org/Office_Automation/fr
En espérant que ça pourra t'aider...
Bonjour Chrispy.
Lors de mes recherches je suis aussi tombé sur ce site.
Et à première vue cela ne semblait concerner que l'usage sous Windows et je n'ai pas vu qu'on pouvait l'utiliser avec Lazarus.
Ta réponse me donne le courage de fouiller davantage.
Je me donne quelques jours pour clôturer ce post avec résolu ou non.
Merci.
Hello,
j'ai bien quelque chose à te proposer mais c'est en passant par du python et par le package lazarus Python4Lazarus. Connais-tu le langage Python ?
Ami calmant, J.P
Jurassic computer : Sinclair ZX81 - Zilog Z80A à 3,25 MHz - RAM 1 Ko - ROM 8 Ko
bonjour J.P.
Désolé, je ne pratique pas ce langage
Merci quand même.
Enfin si je ne résouds pas mon problème et si j'ai un peu de courage je me lancerais peut-être (ça fait beaucoup de si, non?)
Ayant un petit peu galéré pour arriver à un premier petit résultat, je vous livre mon vécu
Les liens qui m'ont aidé (en plus des réponses à mon post), merci à Chrispi et à jurassik pork
https://wiki.lazarus.freepascal.org/...heet:_Examples : Source honteusement pompé pour faire mon test
https://wiki.lazarus.freepascal.org/FPSpreadsheet : la doc de base
Petit exemple complet (?) mais perfectible pour gérer via lazarus sous ubuntu les fichiers Excel, Open/libre Office.
Pour l'installation:
aller sur https://sourceforge.net/projects/lazarus-ccr/
cliquer sur l'onglet files
sélectionner le dossier FPSpreadsheet
une fois le téléchargement terminé,
aller dans le dossier de téléchargement
sélectionner le fichier fpspreadsheet-1.14.zip (version actuelle)
dézipper ce fichier dans un dossier
il faut ensuite ouvrir Lazarus pour installer ?????
C'est la partie qui me pause encore des problèmes :
Pour ma part la mauvaise méthode est :
1 cliquer sur onglet Paquet
2 cliquer sur ouvrir un fichier de paquet(.lpk)
3 sélectionner le fichier laz_fpspreadsheet.lpk (issu du 'dézippage' de fpspreadsheet-1.14.zip)
4 cliquer sur compiler
Redémarrer Lazarus (on se sait jamais)
créer le petit programme de test en dapatant les répertoires et noms de fichiers.
Le source qui suit permet de convertir un fichier issu d'Open/Libre Office vers Excel.
Toute proposition de correction de cette méthode sera la bienvenue
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54 unit XlstoOds; {$mode objfpc}{$H+} interface uses Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, fpstypes, fpspreadsheet, fpsallformats; type { TForm1 } TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private public end; var Form1: TForm1; implementation {$R *.lfm} const INPUT_FORMAT = sfOpenDocument; OUTPUT_FORMAT = sfExcel8; var MyWorkbook: TsWorkbook; MyDir: string; { TForm1 } procedure TForm1.Button1Click(Sender: TObject); begin // Initialization MyDir := ExtractFilePath(ParamStr(0)); // Convert the spreadsheet MyWorkbook := TsWorkbook.Create; try MyWorkbook.ReadFromFile(MyDir + 'premier.ods', INPUT_FORMAT); MyWorkbook.WriteToFile(MyDir + 'second.xls', OUTPUT_FORMAT); finally MyWorkbook.Free; end; end; end.
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager