TPeriodTimer

Klasse zur Performance-Messung und Auswertung.

Eigenschaften

PerformanceTestActive
FileName
ExecStartTimer
ExecStopTimer
ExecResetAllTimer
ExecWriteAllTimer

Verwendung

Die Klasse kann auf zwei Arten eingesetzt werden:
-> Verwendung der global registrierten Instanz mittels der CB-Konstante

PerformanceTimer

-> Eigene Instanzierung

Beispiel

CODE

performancetimer.FileName := 'C:\Debug\Performance_test.txt',
performancetimer.PerformanceTestActive := True,
performancetimer.ExecResetAllTimer,
performancetimer.ExecStartTimer := 'Import',
sleep(100),
performancetimer.ExecStartTimer := 'Import_Schritt1',
sleep(100),
performancetimer.ExecStopTimer  := 'Import_Schritt1',
performancetimer.ExecStartTimer := 'Import_Schritt2',
sleep(100),
performancetimer.ExecStopTimer  := 'Import_Schritt2',
performancetimer.ExecStartTimer := 'Import_Schritt3',
sleep(200),
performancetimer.ExecStopTimer  := 'Import_Schritt3',
performancetimer.ExecStartTimer := 'Import_Schritt1',
sleep(100),
performancetimer.ExecStopTimer  := 'Import_Schritt1',
performancetimer.ExecStopTimer  := 'Import',
performancetimer.ExecWriteAllTimer,