Messages to delphi dll

Version imprimable

18/11/2009, 08h59
user8

Messages to delphi dll

Salut tout le monde,

J'ai développé une dll sous delphi utilisant un TTimer. La dll a besoin d'effectuer des taches toutes les n secondes.

Si je branche cette dll via une application delphi tout se passe bien.
Par contre, je rencontre un problème si je branche ma dll sur une application Java. L'evenement OnTimer n'est jamais exécuté. Je soupçonne un problème lié aux messages windows. Je pense que ma dll n'est jamais notifié de la réception par l'application du message WM_TIMER. Qu'en pensez vous?

Connaissez vous une solution?

Merci d'avance.
18/11/2009, 11h35
ShaiLeTroll

Ton Timer est juste à l'intérieur de la DLL, elle en fait quoi de l'évènement, elle appelle une procédure type CallBack ou alors juste un traitement interne ?

Sinon, je répète, qu'un thread démarré avec DllEntryPoint serait plus efficace et plus maitrisable ...
18/11/2009, 12h00
user8

En faite, je ne gère pas l'évènement c'est le timer qui est censé le récupérer pour exécuter dans le OnTimer un traitement interne.

Je vais développer un Timer Perso basé sur un thread qui attend et pas sur les évènements Windows.

Quelle est l'utilité du DllEntryPoint? je ne connais pas.
Mon timer perso sera un composant réutilisable aussi bien dans une dll que dans un exécutable...dans ces conditions dois-je utiliser DllEntryPoint?

Merci pour ton aide.
18/11/2009, 14h06
0x44-0x43-0x53-0x43

Essay avec l'API SetTimer(...); c'est plus efficace que d'utiliser les timer de la VCL surtout pour un usage externe !

le DLLEntryPoint c'est lorsque tu charges la DLL, tu peux vouloir lancer le Timer dès le chargement (LoadLibrary) sans nécessairement devoir appeler une fonction ... pour le thread, t'emmerde pas cela a déjà été écrit,

ça donne

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
type
  TTimerThread = class(TThread)
  private
    FDelay: Cardinal;
    FEvent: TThreadMethod;
  protected
    procedure Execute; override;
  public
    constructor Create(ADelay: Cardinal; AEvent: TThreadMethod);
 
    property Delay: Cardinal read FDelay; // en milli-secondes
    property Event: TThreadMethod read FEvent;
  end;

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
constructor TTimerThread.Create(ADelay: Cardinal; AEvent: TThreadMethod);
begin
  inherited Create(True);
 
  FDelay := ADelay;
  FEvent := AEvent;     
 
  Self.Resume();
end;
 
procedure TTimerThread.Execute();
begin
  while  not Terminated do
  begin
     Sleep(FDelay); // à souvent 0.95 milli-secondes de retard :mouarf:, mais tu as un besoin moins précis, il me semble
     Event();
  end;
end;

18/11/2009, 15h09
user8

Merci à vous 2.

0x44-0x43-0x53-0x43: SetTimer n'utilise pas les messages Windows?

ShaiLeTroll: Merci pour toutes les infos. Je vais partir sur cette voie. J'ai également trouvé cette source qui est pas mal: http://www.gtdelphicomponents.gr/?p=178
18/11/2009, 17h32
user8

J'ai terminé mon timer avec thread et ca marche beaucoup mieux mais voila j'ai toujours un problème avec Windows et ses évènements.

J'utilise des objets de la VCL dans mon onTimer. Je dois donc passer par Synchronize pour l'exécuter. Synchronize utilise des évènements et ca ne marche donc pas lorsque ma dll est appelé via l'application de test java. Si je retire synchronize, j'ai des crashs!
18/11/2009, 17h59
ShaiLeTroll

Quels objets de la VCL ?
19/11/2009, 08h17
user8

Potentiellement n'importe lequel!
Dans mon exemple, j'ai un TMemo, un TObjectList, un TListView...
19/11/2009, 10h02
ShaiLeTroll

un TMemo ou TListView dans une DLL, c'est étrange, ... sinon, le reste ne devrait pas poser problème ... sans ShareMem déjà ...

C'est une DLL ou un ActiveX ?
19/11/2009, 10h53
user8

En faite, j'ai un bout de code qui contient le ontimer.

Dans un cas, ce bout de code est utilisé directement dans une application delphi. La procedure branchée sur le ontimer contient le TMemo et TListview.

Dans l'autre cas, ce bout de code est partagé pour générer une dll. Une application de test utilise cette dll. Le procedure de l'application branchée sur le ontimer contenu dans la dll peut contenir n'importe quoi mais pas dans la VCL.

Par contre dans les deux cas, j'ai besoin d'un TObjectList dans mon thread.

Dans le premier cas, j'ai besoin de synchronize sinon ca freeze.
Dans le deuxième cas, ca ne marche pas avec le synchronize...execute se termine de manière inattendu. Si je retire le synchronize, ca marche (alors que j'utilise le TObjectList de la vcl ... bizarre? ).

J'ai vraiment besoin que ce code soit partagé ... mais dans un cas j'ai besoin du synchronize, dans l'autre non. Et si une application delphi appel la dll et utilise la vcl dans le ontimer ... J'aurai probablement besoin du Synchronize dans ce cas la aussi. Comment puis-je gerer ce casse-tete?
19/11/2009, 11h40
ShaiLeTroll

L'autre solution, c'est de lancer la DLL elle-même dans un Thread et que ce soit l'application appelante qui fasse le Timer ...

Sinon quel est le but de la DLL ? c'est bien tordu ton histoire
19/11/2009, 11h49
user8

La dll doit être une sorte de plugin... je ne peux pas demander à l'application hôte de gérer quoi que ce soit.

En tout cas merci pour ton aide.
19/11/2009, 11h50
Linkin

VCL: Visual Component Library

Donc le TObjectList n'en fait pas partie ;)
19/11/2009, 11h54
user8

Je sais ce que veut dire VCL mais si tu vas dans l'aide tu veras que Contnrs en fait partie ... donc TObjectList en fait partie!
19/11/2009, 12h30
ShaiLeTroll

Tu confonds la VCL et RTL ... mais comme un peu tout le monde puisque l'aide n'en fait pas la différence ...

Sinon, que doit faire ta DLL, comment-elle invoquer ?