Thema: Delphi Traffic auslesen

Einzelnen Beitrag anzeigen

Benutzerbild von littleDave
littleDave

Registriert seit: 27. Apr 2006
Ort: München
556 Beiträge
 
Delphi 7 Professional
 
#9

Re: Traffic auslesen

  Alt 9. Sep 2008, 12:23
Hallo

in dem Programm aus dem ersten Post kannst du auch schon den Netzwerk-Traffic auslesen, der seit dem wirklichen Start (nicht erst seit dem Programmstart) angefallen ist. Dafür musst du aber den Quelltext etwas anpassen:

Öffne die Datei TrafficUnit.pas und gehe zur Zeile 144. Dort steht folgendes:
Delphi-Quellcode:
  FActiveCountIn := 0;
  FActiveCountOut:= 0;
  FInTotal := 0;
  FOutTotal:= 0;
  FInPerSec:= 0;
  FOutPerSec:= 0;
  FPeakInPerSec := 0;
  FPeakOutPerSec:=0;
Dies ersetzt du durch folgendes:
Delphi-Quellcode:
  FActiveCountIn := 0;
  FActiveCountOut:= 0;
  FInTotal := AMibIfRow.dwInOctets;
  FOutTotal:= AMibIfRow.dwOutOctets;
  FInPerSec:= 0;
  FOutPerSec:= 0;
  FPeakInPerSec := 0;
  FPeakOutPerSec:=0;
Fertig
Jabber: littleDave@jabber.org
in case of 1 is 0 do external raise while in public class of object array else repeat until 1 is 0
  Mit Zitat antworten Zitat