J’essaie de piloter Word et surtout Excel (Office 97 standard) avec partir des composants de l'onglet Server (Delphi 5), mais voilà !!
Je veux juste lancer l'interface Word ou Excel (pour le moment). Avec Word, pas de problèmes, mais avec Excel, j'ai le message suivant qui s'affiche à l'exécution (pas de problème lors de la compilation) :
"Le projet a provoqué une classe d'exception EOLeException avec le message 'Ancien format ou bibliothèque de type non valide'"
Si Quelqu'un à la solution, je la recevrai avec joie !!!
merci d'avance
Voici le source de mon projet test :
"
unit Excelacces;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Word97, OleServer, Excel97;
type
TForm1 = class(TForm)
WA: TWordApplication;
WD: TWordDocument;
LanceWord: TButton;
LanceExcel: TButton;
EA: TExcelApplication;
EWB: TExcelWorkbook;
procedure LanceWordClick(Sender: TObject);
procedure LanceExcelClick(Sender: TObject);
private
{ Déclarations privées }
public
{ Déclarations publiques }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.LanceWordClick(Sender: TObject);
var
a, b, c : OleVariant;
begin
a := EmptyParam;
b := False;
c := 1;
WA.connect;
WA.visible := true;
WA.Caption := 'Delphi';
WA.Documents.Add(A,B);
WD.ConnectTo(WA.documents. item(c));
end;
procedure TForm1.LanceExcelClick(Sender: TObject);
var
a, b : oleVariant;
begin
a := EmptyParam;
b := true;
EA.Connect;
EA.visible[1] := true;
EA.Workbooks.Add(a,b);
EWB.ConnectTo(EA.workbooks .item[1]);
end;
end.
"