Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
26. Jan 2007
Ups noch was: Du solltest am Ende von Destroy noch inherited aufrufen, um den original Destruktor aufzurufen und auszuführen.
Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
26. Jan 2007
Der Destruktor ist eigentlich immer Destroy:
type
TProcessManager = class(TObject)
private
tRefresher: TTimer;
processes: TCPULoads;
RI: Integer;
Function GetTime(fFiletime: FileTime): Cardinal;
Procedure RefreshSnapShot;
Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
26. Jan 2007
Wer achtet denn auf so was? :oops: Aber wir schweifen ab.
Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
26. Jan 2007
Jetzt weiß ich, woher mir der Nick Darkmorph so bekannt vorkommt, der steht als E-Mail Adresse in unserer Excel-Klassenliste. :wall:
Hättest ja mal was sagen können, dass du Benjamin bist. :roll:
Aber seit wann hast du was an der Arbeit zu tun und das an einem Freitag? ;)
Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
25. Jan 2007
Ich würde mir eine Funktion wünschen, de rman nur die ProzessID übergibt und bekommt dann die Auslastung in Prozent.
Und zu den Kommentaren: Ich finde es ist etwas zu viel des Guten:
//hier wird die Differenz zwischen alter und neuer Kernelzeit ermittelt
lKernel := lNewKernel - lOldKernel;
//hier wird die Differenz zwischen alter und neuer Userzeit ermittelt
lUser := lNewUser...