Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Klatsch und Tratsch (https://www.delphipraxis.net/34-klatsch-und-tratsch/)
-   -   Überwachung von freiem Festplattenspeicher (https://www.delphipraxis.net/155190-ueberwachung-von-freiem-festplattenspeicher.html)

sundance 12. Okt 2010 13:20

Überwachung von freiem Festplattenspeicher
 
Kennt jemand von euch zufällig so ein (Freeware) Tool, mit dem man z.B. in einem kleinen Fenster auf dem Desktop die freien Kapazitäten der eingebauten Festplatten im Auge behalten kann (vielleicht über eine Balkengrafik)?
Sollte unter Windows Server 2003 laufen.

.sundance.

Bummi 12. Okt 2010 13:48

AW: Überwachung von freiem Festplattenspeicher
 
Selber machen?

Timer und G_SizeRecArray rausmalen?

Delphi-Quellcode:
type
 TSizeRec=Record
 LW:String;
 Size:Int64;
 Free:Int64;
 End;
 TSizeRecArray=Array of TSizeRec;
var
 G_SizeRecArray:TSizeRecArray;

procedure TForm1.Button1Click(Sender: TObject);
var
  i:Byte;
  size:Int64;
begin
 SetLength(G_SizeRecArray,0);
 for I := 1 to 27 do
   begin
     size := DiskSize(i);
     if Size>0 then
        begin
           SetLength(G_SizeRecArray,High(G_SizeRecArray) + 2);
           G_SizeRecArray[High(G_SizeRecArray)].LW := Char(i + 64);
           G_SizeRecArray[High(G_SizeRecArray)].Size := Size;
           G_SizeRecArray[High(G_SizeRecArray)].Free := DiskFree(i);
        end;
   end;
end;

Bummi 12. Okt 2010 15:09

AW: Überwachung von freiem Festplattenspeicher
 
Liste der Anhänge anzeigen (Anzahl: 2)
Hab mir mal den Spass gemacht ....

Source liegt bei zur freien verwendung

Muellermilchtrinker 12. Okt 2010 15:12

AW: Überwachung von freiem Festplattenspeicher
 
Das wär auch was:
http://gallery.live.com/liveItemDeta...3ceb&bt=1&pl=1
Sidebar Gadget für Windoof Vista/7. Auch wenns unter Server 2003 nicht funktioniert. Vielleicht hilf es ja jmd.

RWarnecke 15. Okt 2010 06:57

AW: Überwachung von freiem Festplattenspeicher
 
Eine andere alternative wäre Zeus. Damit können auch mehrere Platten überwacht werden. Wenn es im Tray ist, so werden die Laufwerke über ein Popup angezeigt, welche unter ein bestimmtes Limit gekommen sind. Die Limits sind einstellbar wie eine Ampel.

himitsu 15. Okt 2010 09:45

AW: Überwachung von freiem Festplattenspeicher
 
Zitat:

Zitat von Bummi (Beitrag 1055347)
Delphi-Quellcode:
for I := 1 to 27 do

ihhhhh ... ich würde MSDN-Library durchsuchenGetLogicalDrives oder MSDN-Library durchsuchenGetLogicalDriveStrings vorschlagen.
Und seit wann hat unser Alphabet 27 Buchstaben?

MSDN-Library durchsuchenFindFirstVolume kann auch nicht schaden, denn nicht jeder Bindet alle seine Laufwerke/Partitionen über so altmodische Laufwerksbuchstaben ein.

Wenn man ReadOnly-Laufwerke, wie CD/DVD und nicht eingelegte Wechsellaufwerke ausschließt, dann könnte das auch nicht schaden.

hathor 15. Okt 2010 12:00

AW: Überwachung von freiem Festplattenspeicher
 
Das von Bummi genannte Beispiel ist fehlerhaft:
- Die Form wird an den erforderlichen Platz nicht angepasst
- Rundungsfehler: aus z.B. 1,85 GB sollte man nicht 1 GB machen!

Getestet nur auf WIN XP.

Bummi 15. Okt 2010 22:17

AW: Überwachung von freiem Festplattenspeicher
 
Ja es war fehlerhaft und 0% optimiert, das ganze war ein 15 min. Quickhack zum fertigbasteln und keine finsle Anwendung.

Luckie 16. Okt 2010 01:59

AW: Überwachung von freiem Festplattenspeicher
 
Warum habe ich jetzt Quicky gelesen. :wall:

hathor 16. Okt 2010 06:22

AW: Überwachung von freiem Festplattenspeicher
 
2,5 Min. sind ein Quickie, 15 Min. ist mit Vorspiel oder ein Dreier...


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:56 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz