Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.316 Beiträge
 
Delphi 12 Athens
 
#12

Re: ETS - Der ExeTimeSaver #28

  Alt 18. Feb 2009, 17:20
Es wäre schön, wenn man beim Hinzufügen [+] auch einfach eines der aktiven Programme auswählen könne (evt. einen weiteren Hinzufügenbutton machen, wo man eines der aktiven Programme wählen kann)

"Wert" Für die Laufzeit klingt auch etwas ... na ja

ich hatte vorhin mal ein Problem, daß dier "Wert"/die Laufzeit zu schnell verging ... so um die 4 Sekunden pro Aktualisierung/Sekunde ... hatte davor mal zu oft auf Aktualisieren geklickt, konnte dieses Verhalten aber nicht reproduzieren.

Dann wäre es toll, wenn ein Programm mehrmals offen ist, daß die Zeit schneller verginge (eine Sekunde pro Instanz ... also bei 2 Instanzen dann doppelt so schnell)

zum Speicherbadarf:
den maximalen/durchschnittlichen verbrauch würd ich schon nett finden.

und wenn das Programm grad nicht aktiv ist, dann z.B. statt 0k lieber "inaktiv" schreiben

Delphi-Quellcode:
// Speicherbedarf = der Speicher, welchen das "aktive" Programm grad verbraucht.

// Durchschnittsumme: Int64;
// Durchschnittzähler: Integer;
// MaximalerSpeicher: Integer; // oder Int64, falls dein Programm
                                 // auch mehr als 2 GB Programmspeicher anzeigen kann

{if ProgrammIsAktiv then begin}
  // maximalen speicherverbrauch merken
  if MaximalerSpeicher > Speicherbedarf then
    MaximalerSpeicher := Speicherbedarf;
  // durchschnitt berechnen
  Inc(Durchschnittsumme, Speicherbedarf);
  Inc(Durchschnittzähler);
  // überlauf verhinden
  if (Int64Rec(Durchschnittsumme).Hi > $7fff0000)
      or (Durchschnittsumme > $7ffff000) then begin
    Durchschnittsumme := Durchschnittsumme shr 16;
    Durchschnittzähler := Durchschnittsumme shr 16;
  end;
{end;}
und die Anzeige eventuell irendwie so
Delphi-Quellcode:
if ProgrammIsAktiv then
  {Speicher}    := Speicherbedarf
else {Speicher} := 'inaktiv';
{Durchschnitt}  := Durchschnittsumme div Min(Durchschnittzähler, 1);
{Maximal}       := MaximalerSpeicher;
Ein Therapeut entspricht 1024 Gigapeut.
  Mit Zitat antworten Zitat