Discussion :

[user8]

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.

[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 ...

[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.

[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 !

[ShaiLeTroll]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

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
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;

[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

[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!

[ShaiLeTroll]

Quels objets de la VCL ?

[user8]

Potentiellement n'importe lequel!
Dans mon exemple, j'ai un TMemo, un TObjectList, un TListView...

[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 ?

[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?

[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

[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.

[Linkin]

VCL: Visual Component Library

Donc le TObjectList n'en fait pas partie

[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!

[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 ?