Bixby Sayz Posted December 13, 2011 Share Posted December 13, 2011 Trying to write the time running formatted a bit: program New; begin Wait(1234); WriteLn(FormatDateTime('hh:nn:ss.zzz', GetTimeRunning)); end. Successfully compiled (15 ms)00:00:00.000 Successfully executed (1250 ms) Quote Link to comment Share on other sites More sharing options...
FHannes Posted December 13, 2011 Share Posted December 13, 2011 That won't work, FormatDateTime is for TDateTime timestamps, which is a floating point value. GetTimeRunning returns the running time in ms. It's a time interval rather than a timestamp. Quote Link to comment Share on other sites More sharing options...
wyn10 Posted December 13, 2011 Share Posted December 13, 2011 function STimeRunning: string; OSI / Divi / Timing.scar Quote Link to comment Share on other sites More sharing options...
Bixby Sayz Posted December 13, 2011 Author Share Posted December 13, 2011 function STimeRunning: string; OSI / Divi / Timing.scar Yes, I saw that before posting. I was hoping there is a better way. Guess it will wait until tomorrow. I had a rare 30 minutes to sit down and script, until spending 20 minutes on this. Quote Link to comment Share on other sites More sharing options...