.: The NetworkTrafficEye :.

[Daniel G]

Na, dann schaun wa mal...

[Airblader]

Funktioniert nach erstem Test einwandfrei, danke :cheers:

Edit:
Gibts auch ne Möglichkeit, den "Stand" abzurufen?
Wäre gut, vor dem Ändern der LED-Anzeige das zu speichern, so dass mans am Ende wieder wie vorher anzeigen lassen kann ;)

air

[MarcoWarm]

Zitat:

Zitat von Airblader

Gibts auch ne Möglichkeit, den "Stand" abzurufen?

die Interrupts geben das leider nicht her (bzw. haben wir noch nichts dergleichen gefunden)
als Workaround kannst du die einzelnen Tasten via GetKeyState abfragen und die LEDs mit der Routine setzen.
oder du drückst einfach eine der Tasten (NumLock, CapsLock, ScrollLock) und der alte Zustand ist wiederhergestellt.

[Airblader]

Jo, sowas hatte ich mir schon gedacht....vielleicht wärs ja eleganter gegangen ;)

Trotzdem Danke :) *Prozeduren für ein paar Effekt mach* :mrgreen:

air

[Aenogym]

hi daniel,

das programm ist schön (ich mag das -risikobehaftete- keyboard-LED feature [ist ja nich mein rechner :mrgreen:]). aber ein groooßes manko hat das prog:
es füllt den speicher mit jedem upload-download event auf. ich habs grad mal ne halbe stunde an und schon nutzt dein prog laut taskmanager 55mb speicher!

system: windows 2000 sp3 - p2 500MHz - 192mb RAM

und nebenbei hat es eine ständige auslastung von 10 - 20%

aenogym

[himitsu]

Ach ja, war das nur bei mir so, oder lassen sich die ComboBoxen noch bei anderen nicht aufklappen?

[Kidix]

ist bei mir genauso....ach ja, das mit der speicherauslastung stimmt. doch das prog bbraucht nie mehr als 1% CPU auslastung...

[himitsu]

stümmt ... irgendwo kann da was nixcht in Ordnung sein ... ich hab das mal mit 25 ms getestet und da wächst es um über 20 MB pro Minute :shock:

[Daniel G]

Zitat:

Zitat von himitsu

stümmt ... irgendwo kann da was nixcht in Ordnung sein ... ich hab das mal mit 25 ms getestet und da wächst es um über 20 MB pro Minute :shock:

Jupp, habe ich eben gerade selbst entdeckt:

Delphi-Quellcode:

function AllocMem(Size: Cardinal): Pointer;
begin
  GetMem(Result, Size);
  FillChar(Result^, Size, 0);
end;

Jaja, Speicher anfordern kann ich, nur freigeben tue ich ihn nicht... :wall: :wall:
Wird gefixt!

@himitsu und Kidix: Wie, die Comboboxen lassen sich nicht aufklappen?

//Edit: @chaosben: Gibt es die vorkompillierte DCU auch für Delphi 5? Eine *.pas ist ja leider nicht dabei...

[himitsu]

Nur der Schwarze Strich erscheint nach dem Aufklappen (sieht aus wie eine 0 Einträge lange Liste)


Und ein Memory-Leak ... wie konntest du nur :evil: