SysInfo

[Luckie]

So meine neue SysInfo ist fertig (2000/XP only bisher). Sie zeigt Informationen zum Betriebssystem, zu den Festplatten / Partitionen, zum Prozessor und zum Speicher an.

Download: SysInfo

[Motzi]

Ich weiß nicht wie Luckie die Anzahl der Prozessoren ermittelt, aber mit GetSystemInfo müsste eigentlich funktionieren...

[CalganX]

Hm... sonst ggf. mit GetSystemMetrices (oder so ähnlich).
Kann mir das Programm leider nicht herunterladen, da ich derzeit am Linux PC sitze. Werde mir das ganze aber mal zu Hause ansehen.
Tipp: füge noch eine Liste mit den Usern und einigen Infos rein. Achja: wenn du nochmal Icons brauchst: die in meinem Programm sind, kannst du nutzen...

Chris

[janjan]

Kann es sein, dass der Computername unten in der Statusleiste angezeigt wird nicht ganz komplett ist? Bei mir fehlen die letzten drei Zeichen...

[Luckie]

Zitat von sakura:

Zitat von Luckie:

2 Prozessoren? Wer hat denn sowas? Aber müssen die nicht eh baugleich sein?

Ich, und das nicht nur einmal Baugleich?, ja, aber es sind zwei und Dein Proggi sagte, es sei nur einer

......

Mal sehen, was sich da noch machen läßt. Ich glaube, da habe ich schon eine Idee. Aber bei deiner Auslagerungsdatei bin ich etwas ratlos.

[Luckie]

Zitat von Chakotay1308:

Tipp: füge noch eine Liste mit den Usern und einigen Infos rein.

Dafür gibt es meinen User-Mamnger. Das will ich mir nicht noch mal antuen.

[Luckie]

Zitat von janjan:

Kann es sein, dass der Computername unten in der Statusleiste angezeigt wird nicht ganz komplett ist? Bei mir fehlen die letzten drei Zeichen...

Sollte eigentlich nicht der Fall sein. Aber ist ja mit Soße, kannst also selber debuggen, wenn du willst.

[Jan]

Hallo Luckie,
ist ja schon schick das alles, besonders die Festplattensparte gefällt mir. ABER:
ist zwar absolut unwichtig, aber das weiße Banner oben in deiner Anwendung erninnert mich immer daran, wie mein explorer aussieht, wenn er sich aufhängt, nämlich komplett weiss, und ich ndenke jedesmal, dass dein Programm hängt. Du kennst das sicher, wenn die anwendung nichtmehr reagiert und das Fenster so weiss wird.
der andere Punkt ist, dass diese Angaben hier:

Familie : 6
Modell : 4
Stepping : 2

unheimlich informativ sind..

was auch immer das heissen mag (vielleicht weisst du das ja sogar), könnte man da nicht vielleicht noch ein paar zusätzliche Infos dazuschreiben, zum Bleistift, was das bedeuten soll? Oder in welcher Einheit Stepping ist?

Gruß
Jan

[Luckie]

Das sind die genauen Prozessorbezeichnungen. Ähnlich wie bei der Software die Versionsnummer: Version 3.2.5.

Den weißen Bereich mache ich bei meinen Tools immer oben hin. Soll sowas wie ein Markenzeichen werden.

[Alexander]

Hi
also bei mir stimmt der Computername auch nicht, es wird der letzte Buchstabe abgeschnitten....Sonst scheint alles zu passen...Du könntest ja noch die CPU-Auslastung anzeigen. Und aktualisiert sich das Memo eigentlich von selbst?

[sakura]

Aus

Delphi-Quellcode:

procedure TSysInfo.GetCompName;
const
  UNLEN = 256; // Maximum computer name length (LmCons.h)
var
  Size: DWORD;
begin
  Size := UNLEN + 1;
  SetLength(FComputerName, Size);
  if GetComputerName(PChar(FComputerName), Size) then
    SetLength(FComputerName, Size - 1)
  else
    FComputerName := '';
end;

wird

Delphi-Quellcode:

procedure TSysInfo.GetCompName;
const
  UNLEN = 256; // Maximum computer name length (LmCons.h)
var
  Size: DWORD;
begin
  Size := UNLEN + 1;
  SetLength(FComputerName, Size);
  if GetComputerName(PChar(FComputerName), Size) then
    SetLength(FComputerName, Size)
  else
    FComputerName := '';
end;

in Datei TSysInfo.inc und dann stimmt auch der Computername

......