p
u
b
l
i
c
i
t
é
publicité
  1. #1
    Invité de passage
    Inscrit en
    août 2002
    Messages
    50
    Détails du profil
    Informations forums :
    Inscription : août 2002
    Messages : 50
    Points : 0
    Points
    0

    Par défaut DLL Win32 depuis Dot.Net

    Bonjour,

    Je doit appeler une DLL Win32 depuis un programme Delphi Dot.net. J'utilise la méthode DllImport et ça marche très bien avec des types numériques, le souci apparaît quand je veux utiliser des chaines. Dans ma Dll Win32 j'ai:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    function PassageChaine(Chn: PChar):Boolean;stdcall;
    begin
     ShowMessage(StrPas(Chn));
    end;
    Dans mon appli.net j'ai :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     [DllImport('Calculer.dll', CharSet = CharSet.Auto, EntryPoint = 'PassageChaine')]
    	Function PassageChaine(Chn:String):Boolean; external;
    et au niveau de l'appel j'ai:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
     PassageChaine('abcde');
    Lorsque j'exécute l'appli je vois bien le showmessage mais uniquement avec le premier caractère : a

    Le problème vient d'ou de la DLL ou du programme appelant ?

    Merci d'avance

  2. #2
    Expert Confirmé Sénior Avatar de ShaiLeTroll
    Homme Profil pro
    Développeur C++\Delphi
    Inscrit en
    juillet 2006
    Messages
    10 163
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 34
    Localisation : France

    Informations professionnelles :
    Activité : Développeur C++\Delphi
    Secteur : High Tech - Électronique et micro-électronique

    Informations forums :
    Inscription : juillet 2006
    Messages : 10 163
    Points : 14 561
    Points
    14 561

    Par défaut

    Ce ne serait pas du WideChar ?
    Et tu es en Delphi 1 à Delphi 2007 (du moins je l'espère pour ma théorie )

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    function PassageChaine(Chn: PWideChar):Boolean;stdcall;
    begin
    ShowMessage(WideCharToString(Chn));
    end;
    'abcde' c'est en fait en UniCode 'a0b0c0d0e000'
    Comme ShowMessage, est ANSI, il voit a puis 0 qu'il confond avec un zéro terminal !
    Aide via F1 - FAQ - Guide du développeur Delphi devant un problème - Pensez-y !
    Attention Troll Méchant !
    "Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson" Confucius
    Mieux vaut se taire et paraître idiot, Que l'ouvrir et de le confirmer !
    L'ignorance n'excuse pas la médiocrité !

    L'expérience, c'est le nom que chacun donne à ses erreurs. (Oscar Wilde)
    Il faut avoir le courage de se tromper et d'apprendre de ses erreurs

  3. #3
    Invité de passage
    Inscrit en
    août 2002
    Messages
    50
    Détails du profil
    Informations forums :
    Inscription : août 2002
    Messages : 50
    Points : 0
    Points
    0

    Par défaut

    Je suis en Delphi 2007, donc c'est du WideChar, et ta théorie est bonne.

    Ca marche,

    Merci

Discussions similaires

  1. Recompiler DLL Win32 en .NET
    Par Jognu dans le forum Delphi .NET
    Réponses: 2
    Dernier message: 22/09/2008, 15h31
  2. [VB.NET]Appel de DLL Win32
    Par NiamorH dans le forum C++/CLI
    Réponses: 3
    Dernier message: 02/10/2006, 10h30
  3. Comment créer une dll Win32 sous Delphi ?
    Par Mickey.jet dans le forum Langage
    Réponses: 8
    Dernier message: 16/06/2005, 15h38
  4. [Dot Net] Panel et Formulaire
    Par kyrilkarlier dans le forum Windows Forms
    Réponses: 6
    Dernier message: 24/05/2005, 08h45
  5. Forum Dot Net un peu fourre tout.... Diviser ou pas ?
    Par Troopers dans le forum Evolutions du club
    Réponses: 21
    Dernier message: 09/07/2004, 22h05

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