pb de scintillement

Question

bonjour &#224; tous

pour une appli que j'&#233;cris en ce moment, j'utilise le code suivant pour changer l'apparence de l'horloge windows :

dans un timer je mets :

  ss:=FormatDateTime('hh:mm',Time);
    tt.FillRect(tt.ClipRect);
    tt.TextOut(((tt.ClipRect.Right-tt.ClipRect.left) div 2) -( tt.textwidth(ss) div 2), ((tt.ClipRect.bottom-tt.ClipRect.top) div 2) -( tt.textheight(ss) div 2), FormatDateTime('hh:mm',Time));

en initialisant dans le formcreate de la maniere suivante : 

    DC := getWindowDC ( FindWindowEx(FindWindowEx(FindWindow('shell_traywnd',nil),0,'TrayNotifyWnd',nil),0,'TrayClockWClass',nil));
    tt := TCanvas.Create;
    tt.Handle := DC;
    tt.Brush.Color:=clbtnface;
    tt.Font.Name := 'Arial'; tt.Font.Size := 12;tt.Font.Style:=[fsbold];
    tt.Font.color:=clblack;

avec dans la clause var    : 
DC: HDc;
  tt:tcanvas;
  ss:string;

ca marche bien pour ce qui est de remplacer l'heure windows , mais probl&#232;me , ca scintille de temps en temps et je ne vois pas comment corriger le tir.

J'ai donc besoin de votre aide et de vos conseils

Merci par avance de votre aide

f0xi · Answer

Hem ... je vais resoudre ton probleme :
Time Heure systeme Heure affich&#233;e dans la barre des taches.

"regarde cherie! je vais transformer cette patate en ... patate"

autant d'interet que d'ecrire :

X := round(sqrt(sqr(3*3)) - (1098/122));

au lieu de

X := 0;

ou est localis&#233; ce scintillement exactement ?

<hr size="2" width="100%">

Cirec · Answer

Salut,
ton scintillement est normal, tu surcharge le canvas de l'horloge et tu affiche donc l'heure avec une nouvelle police etc. Mais
l'horloge continue &#224; mettre &#224; jour son affichage en arri&#232;re plan (avec l'ancienne police) et c'est cela qui provoque ton scintillement et donc pour &#233;viter cela il faut changer de technique, il faut remplacer l'affichage de l'horloge par une nouvelle et non la surcharger c'est un peut plus complexe mais le r&#233;sultat sera &#224; la hauteur de tes attentes. Des probl&#232;mes risquent toute fois de se poser puisque la  barre des t&#226;ches (selon la configuration) peut &#234;tre cach&#233;e, &#224; voir.

@+
Cirec

jace1975 · Answer

Vos pr&#233;cieuses remarques ne m'aide pas des masses ... Y'a t-il quelqu'un de comp&#233;tent dans le coin

Matt 261 · Answer

F0xi et Cirec t'ont mis sur la voie apr&#232;s &#224; toi d'adapter se qu'ils te r&#233;ponde &#224; tes besoins. Enfin si F0xi et Cirec ne sont pas comp&#233;tants alors je pense que tu as une notion de la comp&#233;tence un peu bizarre.

@+ Matt


<HR width="100%" SIZE=2>
La paresse est la m&#232;re du g&#233;nie...

jace1975 · Answer

T'as lu la r&#233;ponse de Foxy ???? je crois que l'on ai sur un forum delphi pas sur un forum des vannes sans interet.

Matt 261 · Answer

Oui, la r&#233;ponse de F0xi commence par une vanne ...certe mais fini par une question :

"ou est localis&#233; ce scintillement exactement ?"

Donc je pense que s'il te demande &#231;a c'est pour apr&#232;s te donner une r&#233;pose qui te conviendra...

@+ Matt


<HR width="100%" SIZE=2>
La paresse est la m&#232;re du g&#233;nie...

Pb de scintillement

6 réponses

Votre réponse

Discussions similaires