IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

C++Builder Discussion :

Declarer une dll Delphi ?


Sujet :

C++Builder

  1. #1
    Membre chevronné
    Avatar de DelphiCool
    Homme Profil pro
    Ingénieur de production
    Inscrit en
    Mars 2002
    Messages
    187
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Ingénieur de production
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Mars 2002
    Messages : 187
    Points : 2 198
    Points
    2 198
    Par défaut Declarer une dll Delphi ?
    Salut

    Comment declarer et utiliser une dll Delphi

    pour une procedure Delphi de ce type:
    Procedure Proc1(abc Char); Stdcall;

    et une fonction de ce type:
    Function Fonc(abc, def Char): PChar; Stdcall;

    Merci
    Hiacine

    Quand on veut, on peut...

  2. #2
    Membre chevronné
    Avatar de DjmSoftware
    Homme Profil pro
    Responsable de compte
    Inscrit en
    Mars 2002
    Messages
    1 044
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Suisse

    Informations professionnelles :
    Activité : Responsable de compte
    Secteur : High Tech - Opérateur de télécommunications

    Informations forums :
    Inscription : Mars 2002
    Messages : 1 044
    Points : 2 187
    Points
    2 187
    Billets dans le blog
    1
    Par défaut
    Salut tu peux utiliser l'exemple suivant

    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
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    #include <condefs.h>
    #include <iostream>
    #include <windows.h>
    #include <stdlib.h>
    #include <stdexcept>
     
     
     
     
    //---------------------------------------------------------------------------
    #pragma argsused
    using namespace std;
    HINSTANCE hDll = 0;
    // declaration des types importés depuis ta dll
     
    typedef void&#40;__stdcall *TProc1&#41;  &#40;char* value&#41;;
    typedef char*&#40;__stdcall *TFonc&#41;  &#40;char* abc,char* def&#41;;
     
    TProc1 Proc1=NULL; //assignation a 0 des variables 
    TFonc Fonc =NULL;
     
     
    void DLLFree&#40;&#41;
    &#123;
        FreeLibrary&#40;hDll&#41;;
    &#125;
     
     
    void DLLInit&#40;&#41;
    &#123;
        hDll = LoadLibrary&#40;"delphi.dll"&#41;;
        Proc1 = &#40;TProc1 &#41;GetProcAddress&#40;hDll, "Proc1"&#41;;
        Fonc = &#40;TFonc&#41;GetProcAddress&#40;hDll, "Fonc"&#41;;
    &#125;
     
     
     
    int main&#40;int argc, char* argv&#91;&#93;&#41;
    &#123;
        DLLInit&#40;&#41;;
        char i&#91;1&#93;;
        try
        &#123;
          Proc1&#40;Fonc&#40;"Test de ma"," Dll"&#41;&#41;;
        &#125;
        catch &#40;const exception& e&#41;
          &#123;
          cout <<" error When loading DLL or Function";
          &#125;
        DLLFree&#40;&#41;;
        cout <<"Please Return Key "<<endl;
        cin.getline&#40;i,1&#41;;
        return 0;
    &#125;
    Avec mes salutations
    vous trouverez mes tutoriels à l'adresse suivante: http://djmsoftware.developpez.com/
    je vous en souhaite une excellente lecture ...

    A lire : Les règles du forum

  3. #3
    Membre chevronné
    Avatar de DelphiCool
    Homme Profil pro
    Ingénieur de production
    Inscrit en
    Mars 2002
    Messages
    187
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Ingénieur de production
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Mars 2002
    Messages : 187
    Points : 2 198
    Points
    2 198
    Par défaut
    Merci
    Hiacine

    Quand on veut, on peut...

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 1
    Dernier message: 18/07/2006, 17h44
  2. Réponses: 4
    Dernier message: 01/06/2006, 16h55
  3. [Librairie] Charger une DLL delphi
    Par yanis97 dans le forum Bibliothèques et frameworks
    Réponses: 3
    Dernier message: 24/03/2006, 12h56
  4. [VB.NET] Comment gérer une DLL Delphi ?
    Par slimjoe dans le forum VB.NET
    Réponses: 2
    Dernier message: 09/01/2006, 01h10
  5. Réponses: 2
    Dernier message: 28/10/2003, 11h55

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo