Détruire un TTimer dans son évenement OnTimer, risqué ?

Version imprimable

Bonjour,

J'ai besoin de créer un Timer autonome : sa destruction doit être automatique, j'ai donc testé le code suivant :

Code:

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
29
30
31
32
33
34
35
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    Timer1 = new TTimer(NULL);
    Timer1->OnTimer = Timer1Timer;
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
    static int i = 0;
 
    // juste pour que quelchose bouge
    Caption = IntToStr(i);
 
    // après dix secondes, on détruit le timer
    if(10 == ++i) {
        // C'est la ligne suivante qui me fait peur : a t on le droit
        // de détruire le timer dans son propre gestionnaire d'evt ?
        delete Timer1;
        Timer1 = NULL;
    }
}
//---------------------------------------------------------------------------

Apparemment, ça fonctionne, mais j'ai un peu peur que ça puisse me sauter à la figure dans un projet plus vaste. (Certains principes de c++builder m'échappent encore)
Qu'en pensez vous ?

Salut mabu
J'avais teste ceci, je ne sais pas si cela va t'aider
le .h

Code:

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
29
30
 
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
        TButton *Button1;
        TButton *Button2;
        TTimer *Timer1;
        TLabel *Label1;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
private: // User declarations
public:  // User declarations
        __fastcall TForm1(TComponent* Owner);
        TTimer *temp;
        void __fastcall TForm1::tempTimer(TObject *Sender);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

le .cpp

Code:

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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
 
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include "ExtCtrls.hpp"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int nb;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
temp = new TTimer(this);
temp->Enabled = true;
temp->Interval = 1000;
temp->OnTimer = tempTimer;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if(temp)
{
temp->Enabled = false;
delete temp;
temp = NULL;
nb = 0;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::tempTimer(TObject *Sender)
{
Label1->Caption = nb;
nb = nb + 1;
}
//---------------------------------------------------------------------------

10/06/2009, 13h26
Invité(e)
Citation:
Envoyé par blondelle

Salut mabu
J'avais teste ceci, je ne sais pas si cela va t'aider
[...]

Code:

1 2 3 4 5 6 7 8 9 10 void __fastcall TForm1::Button2Click(TObject *Sender) { if(temp) { temp->Enabled = false; delete temp; temp = NULL; nb = 0; } }
Merci, mais en fait, comme on le voit dans ton exemple, l'utilisateur doit cliquer sur un bouton pour détruire le TTimer, Dans un environnement monothread, cela ne pose pas de problème.

Dans mon cas, je ne veux même pas que l'utilisateur ai conscience du TTimer.

En fait, j'aurai pu poser ma question autrement : quel est le mécanisme d'appel de l'événement OnTimer d'un TTimer ?
10/06/2009, 13h33
blondelle

Le code d'arret qu'il soit dans les evenements d'un Button ou dans ton code, ne devrais pas poser de probleme en prenant soins de verifier que le timer est en fonction, puis l'arreter et le detruire
10/06/2009, 13h52
totoche76

Citation:

Envoyé par mabu

En fait, j'aurai pu poser ma question autrement : quel est le mécanisme d'appel de l'événement OnTimer d'un TTimer ?

D'après le code situé dans ExtCtrls.pas, le constructeur de TTimer alloue une fenêtre invisible (de classe TPUtilWindow, visible avec Spy++) associée à un Timer Windows. La windowproc de la fenêtre créée se contente de réagir au message WM_TIMER et appelle ton événement en conséquence...

Donc coup de bol, vu la simplicité de ce composant, la destruction pendant l'exécution de l'événement ne pose pas de problème, mais voilà, c'est du bol... Juste après l'exécution de ton événement, s'il bricolait en choses en interne, ça se crasherait...

Pourquoi ne pas simplement désactiver le timer ? Tu en crées un au démarrage, et tu l'actives/désactives au besoin...
10/06/2009, 17h16
Invité(e)

Citation:

Envoyé par totoche76

Donc coup de bol, vu la simplicité de ce composant, la destruction pendant l'exécution de l'événement ne pose pas de problème, mais voilà, c'est du bol... Juste après l'exécution de ton événement, s'il bricolait en choses en interne, ça se crasherait...

Okay, bien vu.
Donc aujourd'hui, ça ne crashe pas et c'est normal (même si c'est un coup de pot), mais rien ne garantit que dans le futur la gestion des TTimer puisse changer.
Je dois donc me méfier si je veux une solution pérenne.

Citation:

Envoyé par totoche76

Pourquoi ne pas simplement désactiver le timer ? Tu en crées un au démarrage, et tu l'actives/désactives au besoin...

L'idée est bonne, mais j'avais en tête de supprimer au plus vite les ressources inutiles, car même si on a de la marge, je n'aime pas avoir des objets initialisés alors que je sais pertinemment qu'il ne me serviront plus.

Je pense donc que je vais m'orienter vers une gestion WM_TIMER à l'ancienne.

Merci bien