uups hab was vom source vergessen, hier nochmal komplett:
Delphi-Quellcode:
var
intEnd, intFreq, intStart : Int64;
QueryPerformanceFrequency(intFreq);
If gsPerformCheck = 'YES' Then QueryPerformanceCounter(intStart);
If gsPerformCheck = 'YES' Then
Begin
QueryPerformanceCounter(intEnd);
gdblTimeDiff := (intEnd - intStart)/intFreq;
prMsgLog(MySQL_Database, tyINF, 99999, '', FloatToStrF(gdblTimeDiff, ffFixed, 5, 3), 'Delete Master Data Tables', gbBlckInfoMsg);
End;
Keine Ahnung warum ich erst Multipliziert und dann wieder Dividiert hab
Liegt wohl an der Uhrzeit das ich schon etwas verwirrt bin