Discussion :

[defluc]

Bonjour,
Je reçois le message d'erreur «Le projet MonProj.exe a provoqué une classe d'exception EintfCastError avec le message 'Interface non supportée'.» à l'exécution de la dernière instruction du code qui suit :

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
Uses
  Excel_Tlb.pas,....
Var
  XlApp : _Application;
  Sheet : _WorkSheet;
  Classeur : _WorkBook;
  ShRange : ShapeRange;
  Lcid : Integer;
 
begin
  XlApp := CoApplication_.Create;
  Classeur := xlApp.Workbooks.Add(EmptyParam,Lcid);
  Sheet := Classeur.Worksheets[xlApp.ActiveWorkbook.Sheets.Count] as _worksheet;
  ShRange := Sheet.Shapes.AddTextEffect(msoTextEffect13, 'Demo', 'Impact', 36,
                             $00000000, $00000000, AColW, TopDepl) as ShapeRange;
......

Et pourtant l'exécution donne bien le résultat voulu.

Quelqu'un a-t-il une idée pour éliminer ce message ?

Merci d'avance.

[Aka Guymelef]

Question, AddTextEffect renvoit-il bien un as ShapeRange ?

[Paul TOTH]

moi je te conseille fortement de ne pas utiliser OLE

XLSReadWriteII sont des composants natifs Delphi qui génèrent des documents Excel directement en binaire sans passer par Excel. Ils existent sans doute d'autres composants, moi j'utilise ceux là et ils sont vraiment au poil.

pourquoi faire ça ? et bien quand un client décide de passer à OpenOffice, il peut toujours lire des documents Excel, mais Excel n'est plus là pour travailler en OLE ! Du coup ton appli n'est plus compatible. Alors que si elle génère elle même ses documents Excel, ça ne pose aucun soucis.

[defluc]

Je ne connais pas XLSReadWriteII et après une petite recherche sur Internet, il m'apparait que ce n'est pas un composant libre (ni gratuit).
Il m'intéresse pour la raison mise en avant :

quand un client décide de passer à OpenOffice, il peut toujours lire des documents Excel

.
J'ai 2 questions :

1. Gère-t-il les ChartObjects de Excel ?
2. Où puis-je télécharger une version compatible Delphi4 libre d'utilisation ?

Merci pour l'info déjà fournie

[Paul TOTH]

à ma connaissance il gère tout ce que gèrent les documents Excel, y compris les formules et les graphs...MAIS c'est un composant commercial, il n'existe pas de version gratuite.

[defluc]

C'est ce que j'avais cru comprendre.

Merci quand même.