Il est fort probable que ce qui suit reste valable pour les versions plus récentes de Delphi.
Afin d'illustrer au mieux l'utilisation d'une DLL je vous propose de télécharger la DLL IO.DLL qui a été crée dans la leçon précédente. Afin de la rendre disponible il convient de copier ce fichier dans le répertoire WindowsSystem ou Win95System de votre disque dur.
Je rapelle que cette DLL contient les fonctions et procédure suivantes :
Procedure OUT(Adresse du port;Valeur a écrire sur ce port)
Function INP(Adresse du port que l'on désire lire) qui renvoie l'octet présent sur le port. Comment utiliser IO.DLL sous Delphi... pas à pasLancer Delphi puis créer un nouveau projet par la commande Fichier puis Nouveau Projet.
 | | Une vue de l'interface de Delphi 1.0 après l'ouverture d'un nouveau projet |
Modifier le source de l'unité UNIT1.PAS comme le montre l'écran ci-dessous
 | | Le source modifié |
Dans la partie Implementation de l'unité, il suffit de déclarer la procedure OUT et la fonction INP exactement comme elles ont été implémentées dans la leçon précédente. Les clauses Far sont obligatoire pour tout appel de fonction se trouvant dans une DLL car le code de ces routines ne se trouve pas forcément dans le même segment de mémoire que le reste du programme. La clause external 'io' permet de préciser au compilateur que ces routines se trouvent dans le fichier IO.DLL ( dans le répertoire system de votre ordinateur... ).
Afin d'illuster l'utilisation de la procédure OUT, creer sur la feuille Form1 un bouton. Double cliquez sur celui-ci pour accéder a l'évènement Button1Click et modifier le source comme indiqué ci-dessous. Exécuter le programme. A chaque fois que vous cliquerez sur le bouton, La valeur 0 sera envoyé sur le Port n° H378. C'est aussi simple que cela !
 | | Le source modifié |
Il ne vous reste plus qu'à compiler et exécuter votre programme.
Date de création : 28/10/2005 @ 18:05
Dernière modification : 23/01/2008 @ 17:57
Catégorie : Les DLL
Page lue 8085 fois
 Prévisualiser la page
 Imprimer la page
|
Arduino
Arduino
30 membres
Réactions à cet article
Haut 