Einzelnen Beitrag anzeigen

Benutzerbild von Andidreas
Andidreas

Registriert seit: 27. Okt 2005
1.110 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#18

AW: GetTickCount / Fehler bei Bereichsprüfung

  Alt 15. Jan 2014, 16:46
Ok, jetzt hats klick gemacht, peinlich

Also wäre es so sinnvoller?

Delphi-Quellcode:
var
wrdStart, wrdEnd : DWord;

If gsPerformCheck = 'YESThen wrdStart := GetTickCount();

If gsPerformCheck = 'YESThen
Begin
  wrdEnd := GetTickCount();
  gdblTimeDiff := ((wrdEnd - wrdStart)/1000);
  prMsgLog(MySQL_Database, tyINF, 99999, '', FloatToStrF(gdblTimeDiff, ffFixed, 5, 3), 'Delete Master Data Tables', gbBlckInfoMsg);
End;
Ein Programmierer Programmiert durchschnittlich 15 Code Zeilen pro Tag
Wir sind hier doch nicht bei SAP!!!

Aber wir habens bald
  Mit Zitat antworten Zitat