| 600 |
|
begin |
| 601 |
|
if Statement.GetPerfStatistics(stats) then |
| 602 |
|
begin |
| 603 |
< |
Add2Log(Format('Current memory = %d',[stats[psCurrentMemory]])); |
| 604 |
< |
Add2Log(Format('Delta memory = %d',[stats[psDeltaMemory]])); |
| 605 |
< |
Add2Log(Format('Max memory = %d',[stats[psMaxMemory]])); |
| 603 |
> |
Add2Log(Format('Current memory = %f',[stats[psCurrentMemory]])); |
| 604 |
> |
Add2Log(Format('Delta memory = %f',[stats[psDeltaMemory]])); |
| 605 |
> |
Add2Log(Format('Max memory = %f',[stats[psMaxMemory]])); |
| 606 |
|
Add2Log('Elapsed time= ' + FormatFloat('#0.000',stats[psRealTime]/1000) +' sec'); |
| 607 |
|
Add2Log('Cpu = ' + FormatFloat('#0.000',stats[psUserTime]/1000) + ' sec'); |
| 608 |
< |
Add2Log(Format('Buffers = %d',[stats[psBuffers]])); |
| 609 |
< |
Add2Log(Format('Reads = %d',[stats[psReads]])); |
| 610 |
< |
Add2Log(Format('Writes = %d',[stats[psWrites]])); |
| 611 |
< |
Add2Log(Format('Fetches = %d',[stats[psFetches]])); |
| 608 |
> |
Add2Log(Format('Buffers = %f',[stats[psBuffers]])); |
| 609 |
> |
Add2Log(Format('Reads = %f',[stats[psReads]])); |
| 610 |
> |
Add2Log(Format('Writes = %f',[stats[psWrites]])); |
| 611 |
> |
Add2Log(Format('Fetches = %f',[stats[psFetches]])); |
| 612 |
|
end; |
| 613 |
|
end; |
| 614 |
|
|
