====
Il nous faudra ici une version de Delphi 2005 (avec le framework 1.1). La version personnelle est disponible en téléchargement et conviendra a ce tutorial
Ouvrir Delphi 2005.Créer un nouveau projet Delphi.NET (Fichier->Nouveau->Autre->Projet Delphi pour .NET) et sélectionner Bibliothèque.
Au-dessus de "uses",on rajoute la directive {$UNSAFECODE ON}
puis on crée une procédure:
procedure SayHello;
begin
end;
et ensuite,on met
exports
SayHello;
On enregistre le projet,on le compile,et on copie la dll obtenue dans le répertoire C:\
Maintenant,le moment est venu de tester notre DLL...
Pour cela,on va dans Démarrer,Exécuter et on tape
rundll32 C:\nom_de_votre_dll.dll SayHello
et,après quelques secondes d'attente (on est en managé,quand même!),on a normalement une boîte de message contenant "I am a test" qui s'affiche !
Je mets ici le code au complet du projet (il y a juste le .dpr...).
Le code à saisir est en gras
library Library1;
uses
SysUtils,
Classes,
System.Reflection,
System.Runtime.InteropServices;
[assembly: AssemblyTitle('') *
[assembly: AssemblyDescription('') *
[assembly: AssemblyConfiguration('') *
[assembly: AssemblyCompany('') *
[assembly: AssemblyProduct('') *
[assembly: AssemblyCopyright('') *
[assembly: AssemblyTrademark('') *
[assembly: AssemblyCulture('') *
procedure SayHello;
begin
end;
exports
SayHello;
[assembly: AssemblyVersion('1.0.*') *
[assembly: AssemblyDelaySign(false) *
[assembly: AssemblyKeyFile('') *
[assembly: AssemblyKeyName('') *