IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Voir le flux RSS

_alx_

Datation précise en Delphi

Noter ce billet
par , 12/01/2023 à 15h53 (1959 Affichages)
Je croyais avoir compris la gestion d'écran par Windows, et mon fil résolu.
Mais j'ai fait un nouvel essai à vitesse plus lente (45 ms. < 3*15.6 ~48 ms.) pour m'assurer si le Textout était synchrone ou pas.
Le code est:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
procedure TDrawThread.Execute;
begin
  var DC := GetDC(HWnd);
  while not Terminated do
  begin
    var S := FormatDateTime('hh:nn:ss.zzz', Now);
    Winapi.Windows.TextOut(DC, 10, 10, PChar(S), Length(S));
    S := FormatDateTime('hh:nn:ss.zzz', Now) + ' *';
    Winapi.Windows.TextOut(DC, 10, 30, PChar(S), Length(S));
    Sleep(45);
  end;
end;
et le résultat:
Nom : toto3.png
Affichages : 16
Taille : 90,8 Ko
Comment expliquer que le second événement d'écriture ait une date antérieure au premier ?
Miniatures attachées Images attachées  

Envoyer le billet « Datation précise en Delphi » dans le blog Viadeo Envoyer le billet « Datation précise en Delphi » dans le blog Twitter Envoyer le billet « Datation précise en Delphi » dans le blog Google Envoyer le billet « Datation précise en Delphi » dans le blog Facebook Envoyer le billet « Datation précise en Delphi » dans le blog Digg Envoyer le billet « Datation précise en Delphi » dans le blog Delicious Envoyer le billet « Datation précise en Delphi » dans le blog MySpace Envoyer le billet « Datation précise en Delphi » dans le blog Yahoo

Catégories
Sans catégorie

Commentaires