Appel d'une fonction externe d'une DLL

Question

Appel d'une fonction externe d'une DLL

Signaler

slykp

Messages postés: 3
Date d'inscription: dimanche 6 octobre 2002
Statut: Membre
Dernière intervention: 27 août 2003

- 27 août 2003 à 09:56
slykp

Messages postés: 3
Date d'inscription: dimanche 6 octobre 2002
Statut: Membre
Dernière intervention: 27 août 2003

- 27 août 2003 à 10:08

Salut tout le monde,

J'espere que les vacances ont été sympa :)

Voila, j'ai un soucis...arg....
J'ai fais une DLL, et maintenant je voudrais appelé les fonctions de la DLL mais pas traditionnellement...

CAD :

Function CopyText(Source,Destination:string):boolean; stdcall
external 'test.dll' name 'CopyText';

Procedure Form1.ButtonClick(Sender: Tobject)
var
source,destination:string;
boolean;
Begin
source:=edit1.text;
destination:=edit2.text;

asm
pushad
mov eax, dword ptr [source]
mov ebx, dword ptr [destination]
push eax
push ebx
call CopyTexT
popad
end;

Enfin bref c un truc comme ca que j'essaye, et dont je n'arrive pas a me sortir :(
En faisant les convention habituelle :

Function CopyText(Source,Destination:string):boolean; stdcall
external 'test.dll' external 'CopyText'

Procedure Form1.ButtonClick(Sender: Tobject)
var
source,destination:string;
boolean;
Begin
source:=edit1.text;
destination:=edit2.text;
Boolean:=Copytext(Source,Destination);
end;

En faisant comme ci dessus ya po de soucis, mais je veux pouvoir faire passer ca en ASM, j'ai vu dans les imports de delphi (windows.pas) qu'il est possible de faire des call en asm ??

Comment faire ?

Merci bien

A voir également:

Appel d'une fonction externe d'une DLL
C# : appel d'une fonction C++ d'une dll (type TCHAR*) ✓ - Forum - C# / .NET
Appeler une fonction c++ contenu dans dll avec de code c++ ✓ - Forum - C
Visual Basic / VB.NET : Toutes(?) les fonctions gdi dans une dll avec une démo complèt - Guide
Lire la frequence du cpu grâce à l'appel d'une fonction native - Codes sources - Java (Systeme)
Utilisation de fonction contenue dans une dll - Codes sources - Delphi / Pascal (Système)

2 réponses

Répondre Posez votre question

slykp · Answer 1 · 2003-08-27T10:06:39+0200

Réponse 1 / 2

slykp

Messages postés: 3
Date d'inscription: dimanche 6 octobre 2002
Statut: Membre
Dernière intervention: 27 août 2003

27 août 2003 à 10:06

En cherchant un peu je suis tombé la dessus ?
Est-ce que l'on pourrait m'expliqué :
far et forward :)

function _LocalLock(Mem: THandle): Word; far; forward;

function _LocalLock; external 'KERNEL' Index 8;

Merci

slykp · Answer 2 · 2003-08-27T10:08:23+0200

Réponse 2 / 2

slykp

Messages postés: 3
Date d'inscription: dimanche 6 octobre 2002
Statut: Membre
Dernière intervention: 27 août 2003

27 août 2003 à 10:08

Grrrr
j'ai oublié de donné la fonction :(
Ya aussi 'assembler' derriere qui est pas claire ?

function LocalLock(Mem: THandle): Pointer; assembler;
asm
PUSH Mem
CALL _LocalLock
MOV DX,DS
end;

Votre réponse