Discussion :

[SLE]

Bonjour,


Dans une appli MDI, j'ai une barre de statut avec un TLabel qui affiche la date et l'heure courante. Ce TLabel est rafraîchi via un TTimer toutes les secondes. La fiche contient un logo (bitmap) au niveau du canvas.
Mon problème, c'est que quand le TTimer est actif, le logo à un effet de "flash". Comment remédier à ce problème ?
Merci.

Dans le OnTimer, j'ai ceci :

Code :

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

LblDateHeure.Caption := DateTimeToStr(now);

et dans le OnPaint de la fiche :

Code :

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

if not FondBmp.Empty then self.Canvas.Draw(200,200,FondBmp);

[tourlourou]

essaye de mettre Form.DoubleBuffered:=True ?

[SLE]

Ca ne change pas grand chose... Il y a une très légère amélioration, mais ça scintille toujours...

[Lung]

Ca ne change pas grand chose... Il y a une très légère amélioration, mais ça scintille toujours...

Ton image est dirrectement posée sur ta Form ?
Il n'y a pas un Panel intermédiaire ?

[SLE]

A la création de la fiche, je charge un fichier dans un TBitmap

Code :

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

1
2
3
4
  Fondbmp:=TBitmap.Create;
  FondBmp.Transparent := True;
  FondBmp.TransparentColor := clWhite;
  if FileExists(Memvar.m_pathlogo) then Fondbmp.LoadFromFile(Memvar.m_pathlogo) else ShowMessage('Erreur Config Logo - Non trouvé !');

et dans le OnPaint je fais

Code :

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

  if not FondBmp.Empty then self.Canvas.Draw(200,200,FondBmp);

[SLE]

Il n'y a pas un Panel intermédiaire ?

Et oui... il suffit de placer un TPanel en Align 'alClient' sur la fiche et le scintillement disparaît... Merveilleux !!! Merci.