Discussion :

[roprog]

Bonjours,
Je cherche de l'aide pour écrire une DLL qui implémente un Object qui doit notifier l'application Hôte d'un évènement quelconque. je bloque au niveau de l'évènement, je ne sais pas comment le décloncher pour faire réagir l'application hôte.

[Paul TOTH]

Delphi ne permet pas de partager des objets en EXE et DLL

mais une simple fonction Callback fera l'affaire

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
 
// côté exe
type
  TCallBack = procedure(param...);
 
function SetCallBack(ACallBack: TCallBack); external 'LADLL.DLL';
 
procedure OnCallBack(param...);
begin
  ...
end;
 
begin
  SetCallBack(OnCallBack);
end;
 
// côté DLL
var
  CallBack: TCallBack;
function SetCallBack(ACallBack: TCallBack); export;
begin
  CallBack := ACallBack;
end;
 
procedure TMonObject.Notification;
begin
  CallBack(...);
end;

[tourlourou]

pourquoi ne pas utiliser une fonction CallBack passée au constructeur de l'objet ?

sinon, utiliser un Message prédéfini style WM_USER+1234

[roprog]

Bonjours,
merci pour votre réponse, j'ai oublié de vous dire que la DLL que je veux implémenter est un plugin qui s'enregistre auprès de l'application hôte, je veux que ce plugin informe l'application hôte de son état via un évènement que le hôte doit intercepter. je vais tester votre solution et je vous tiens au courant. Si vous avez d'autres propositions je prends. Merci énormément.

[Paul TOTH]

Bonjours,
merci pour votre réponse, j'ai oublié de vous dire que la DLL que je veux implémenter est un plugin qui s'enregistre auprès de l'application hôte, je veux que ce plugin informe l'application hôte de son état via un évènement que le hôte doit intercepter. je vais tester votre solution et je vous tiens au courant. Si vous avez d'autres propositions je prends. Merci énormément.

Dans ce cas, le mieux est d'utiliser une Interface comme expliqué dans mon livre "Delphi 7 Studio" dans le chapitre 19 qui est justement consultable en ligne.