Festplattenzugriff sichtbar machen (LED im Tray)

So geht es:

WMI
Class: Win32_PerfFormattedData_PerfDisk_PhysicalDisk
Instance: Name: 0, 1, 2, etc. für HDD0, HDD1, HDD2 etc.

Durch Auswertung der READ/WRITE-Werte kann man dann einem Panel o.a. eine Farbe zuweisen.

Beispiel:
AvgDiskBytesPerRead: 0
AvgDiskBytesPerTransfer: 0
AvgDiskBytesPerWrite: 0
AvgDiskQueueLength: 0
AvgDiskReadQueueLength: 0
AvgDisksecPerRead: 0
AvgDisksecPerTransfer: 0
AvgDisksecPerWrite: 0
AvgDiskWriteQueueLength: 0
CurrentDiskQueueLength: 0
DiskBytesPersec: 0
DiskReadBytesPersec: 0
DiskReadsPersec: 0
DiskTransfersPersec: 0
DiskWriteBytesPersec: 0
DiskWritesPersec: 0
Name: 0 D: F: C: E:--------------------> HDD0
PercentDiskReadTime: 0
PercentDiskTime: 0
PercentDiskWriteTime: 0
PercentIdleTime: 100
SplitIOPerSec: 0

AvgDiskBytesPerRead: 1048576
AvgDiskBytesPerTransfer: 1048576
AvgDiskBytesPerWrite: 0
AvgDiskQueueLength: 1
AvgDiskReadQueueLength: 1
AvgDisksecPerRead: 0
AvgDisksecPerTransfer: 0
AvgDisksecPerWrite: 0
AvgDiskWriteQueueLength: 0
CurrentDiskQueueLength: 2
DiskBytesPersec: 37756348
DiskReadBytesPersec: 37756348
DiskReadsPersec: 36
DiskTransfersPersec: 36
DiskWriteBytesPersec: 0
DiskWritesPersec: 0
Name: 2 H:--------------------> HDD2
PercentDiskReadTime: 100
PercentDiskTime: 100
PercentDiskWriteTime: 0
PercentIdleTime: 1
SplitIOPerSec: 0

AvgDiskBytesPerRead: 0
AvgDiskBytesPerTransfer: 0
AvgDiskBytesPerWrite: 0
AvgDiskQueueLength: 0
AvgDiskReadQueueLength: 0
AvgDisksecPerRead: 0
AvgDisksecPerTransfer: 0
AvgDisksecPerWrite: 0
AvgDiskWriteQueueLength: 0
CurrentDiskQueueLength: 0
DiskBytesPersec: 0
DiskReadBytesPersec: 0
DiskReadsPersec: 0
DiskTransfersPersec: 0
DiskWriteBytesPersec: 0
DiskWritesPersec: 0
Name: 1 J:--------------------> HDD1
PercentDiskReadTime: 0
PercentDiskTime: 0
PercentDiskWriteTime: 0
PercentIdleTime: 100
SplitIOPerSec: 0

AvgDiskBytesPerRead: 1048576
AvgDiskBytesPerTransfer: 1048576
AvgDiskBytesPerWrite: 0
AvgDiskQueueLength: 1
AvgDiskReadQueueLength: 1
AvgDisksecPerRead: 0
AvgDisksecPerTransfer: 0
AvgDisksecPerWrite: 0
AvgDiskWriteQueueLength: 0
CurrentDiskQueueLength: 2
DiskBytesPersec: 37756348
DiskReadBytesPersec: 37756348
DiskReadsPersec: 36
DiskTransfersPersec: 36
DiskWriteBytesPersec: 0
DiskWritesPersec: 0
Name: _Total
PercentDiskReadTime: 55
PercentDiskTime: 55
PercentDiskWriteTime: 0
PercentIdleTime: 67
SplitIOPerSec: 0

**DelTurbo**

Ui, nun weiß ich garnicht was ich sagen soll, ausser vielen vielen dank.

Und dann gleich noch eine frage hinterher.... ist das diese unit, oder?

http://delphi-wmi-class-generator.go...ysicalDisk.pas

Gruß und nochmals vielen dank

Sieht brauchbar aus.
Ich teste es mal.

**DelTurbo**

Damit kann man irgendwie units erstellen. Genau hab ich das noch nicht kapiert.

https://code.google.com/p/delphi-wmi-class-generator/

**DelTurbo**

Ich habe eben eine kleine Demo gemacht. Leider ist die abfrage viel viel zu langsam. Schade, vielleicht gibt es ja nochwas anderes.....

OS ist Win7 32 Bit

Ich habe hier etwas Interessantes gefunden.
Man kann auch mehrere Instanzen starten, wenn man das Programm in mehrere Unterordner kopiert (wegen der INI-Config.)

Man kann unter verschiedenen Objekten auswählen, was man sichtbar machen möchte.

http://www.sepago.de/d/helge/2009/11...new-diskled-11

http://www.sepago.de/sites/default/files/DiskLED.zip

**DelTurbo**

Das ist total nett das du hilfst. Aber leider komme ich meinem prob nicht näher. Ich möchte das ja selber programmieren. Um z.b. auch eine Remotefunktion einzubauen.

Das mit dem WMI klappt, aber es ist leider viel zu langsam.

Festplattenzugriff sichtbar machen (LED im Tray)

AW: Festplatten zugriff sichbar machen (LED im Tray)

AW: Festplatten zugriff sichbar machen (LED im Tray)

AW: Festplatten zugriff sichbar machen (LED im Tray)

AW: Festplatten zugriff sichbar machen (LED im Tray)

AW: Festplatten zugriff sichbar machen (LED im Tray)

AW: Festplatten zugriff sichbar machen (LED im Tray)

AW: Festplatten zugriff sichbar machen (LED im Tray)

Forumregeln

DelTurbo Registriert seit: 12. Dez 2009 Ort: Eifel 1.248 Beiträge Delphi 2007 Architect	#2 AW: Festplatten zugriff sichbar machen (LED im Tray) 28. Apr 2013, 15:17 Ui, nun weiß ich garnicht was ich sagen soll, ausser vielen vielen dank. Und dann gleich noch eine frage hinterher.... ist das diese unit, oder? http://delphi-wmi-class-generator.go...ysicalDisk.pas Gruß und nochmals vielen dank Alle meine Rechtschreibfehler sind Urheberrechtlich geschützt!!
	Zitat

hathor (Gast) n/a Beiträge	#3 AW: Festplatten zugriff sichbar machen (LED im Tray) 28. Apr 2013, 15:32 Sieht brauchbar aus. Ich teste es mal.
	Zitat

DelTurbo Registriert seit: 12. Dez 2009 Ort: Eifel 1.248 Beiträge Delphi 2007 Architect	#4 AW: Festplatten zugriff sichbar machen (LED im Tray) 28. Apr 2013, 15:47 Damit kann man irgendwie units erstellen. Genau hab ich das noch nicht kapiert. https://code.google.com/p/delphi-wmi-class-generator/ Alle meine Rechtschreibfehler sind Urheberrechtlich geschützt!!
	Zitat

DelTurbo Registriert seit: 12. Dez 2009 Ort: Eifel 1.248 Beiträge Delphi 2007 Architect	#5 AW: Festplatten zugriff sichbar machen (LED im Tray) 29. Apr 2013, 08:12 Ich habe eben eine kleine Demo gemacht. Leider ist die abfrage viel viel zu langsam. Schade, vielleicht gibt es ja nochwas anderes..... OS ist Win7 32 Bit Alle meine Rechtschreibfehler sind Urheberrechtlich geschützt!!
	Zitat

DelTurbo Registriert seit: 12. Dez 2009 Ort: Eifel 1.248 Beiträge Delphi 2007 Architect	#7 AW: Festplatten zugriff sichbar machen (LED im Tray) 30. Apr 2013, 15:42 Das ist total nett das du hilfst. Aber leider komme ich meinem prob nicht näher. Ich möchte das ja selber programmieren. Um z.b. auch eine Remotefunktion einzubauen. Das mit dem WMI klappt, aber es ist leider viel zu langsam. Alle meine Rechtschreibfehler sind Urheberrechtlich geschützt!!
	Zitat