ZOOM sur DELPHI 6

ZOOM sur DELPHI 6
"Les composants dédiés aux applications serveurs de Microsoft Office"

I Introduction

Lors d'un premier article sur le test de DELPHI 6, j'avais souligné l'impressionnante richesse de composants que possède cet outil de développement RAD. Je voudrais aujourd'hui attirer votre attention sur une série d'objet visuel qui n'existait pas dans les versions antérieures et qui est constituée de pas moins de 69 composants : Localisée dans l'onglet "Serveurs" de la palette des composants. Cette série regroupe tous les outils permettant de se connecter aux applications de Microsoft Office et de dialoguer avec elles.

A lui seul ce groupe d'objets place DELPHI au-dessus de ces concurrents en ce qui concerne le développement en entreprise. En effet si l'on considère que le plus grand nombre de sociétés possèdent la suite bureautique de Microsoft, ces composants constituent alors un atout majeur pour DELPHI 6. Le travail fastidieux qui consistait à établir une communication avec une application par le biais d'une interface COM est dès lors grandement simplifié.

II Mise en oeuvre

Onglet "Servers"

Word, Excel, PowerPoint, Outlook, Access sont désormais accessibles en faisant simplement glisser le composant adéquat sur une fiche.

D'un point de vue technique, tous ces objets descendent de TOleServer et dévoilent chacun trois propriétés de base visibles dans l'inspecteur d'objet.

AutoConnect : permet de se connecter au serveur Office dès le lancement de l'application Delphi.

ConnectKind : permet de choisir le type de connexion (connexion au serveur en cours, connexion en créant une nouvelle instance du serveur...)

RemoteMachine : Spécifie le poste qui exécute le serveur COM quand la propriété ConnectKind es ckRemote.

Piloter, interroger les applications d'Office implantées au sein d'une entreprise devient un jeu d'enfant. Le gain de temps est considérable et les méthodes fournies par chaque composant sont nombreuses et très facile à utiliser.

III Mise en application

Pour étayer mes propos je vous propose de réaliser un petit programme très simple.

Imaginons qu'un groupe de travail voudrait imprimer en fin de journée tous les documents en cours, ouverts sous Word puis les sauvegarder.

Déroulement :

1) Créer un nouveau projet, poser sur la feuille principale un composant TWordApplication mettre sa propriété AutoConnect sur True. Ajouter à la feuille un TButton et insérez le code suivant dans l'évènement OnClick de ce dernier.

procedure TForm1.Button1Click(Sender: TObject);
Var
  I : Integer;
  Index : OLeVariant;
Begin
  For I:=1 To WordApplication.Documents.Count Do
  Begin
    Index:=I;
    WordApplication.Documents.Item(Index).Select;
    WordApplication.PrintOut;
    WordApplication.Documents.Item(Index).Save;
  End;
  WordApplication.Quit;
end;

2) Faire "Exécuter" et voilà le résultat :

En moins de dix minutes notre cahier des charges est rempli, alors que le même projet sans ces composants aurait nécessité une bonne heure de travail voi plus.

IV Conclusion

Nous constatons encore à quel point DELPHI 6 est un outil qui offre un gain de temps et de productivité toujours plus grand dans des domaines clés du développement de demain...

Alexandre le Grand

Site http://herea.soft.free.fr