Delphi-PRAXiS
Seite 22 von 32   « Erste     12202122 2324     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   SystemInfo 1.6.5 (https://www.delphipraxis.net/93053-systeminfo-1-6-5-a.html)

bigg 23. Sep 2008 19:02

Re: SystemInfo 1.5.0
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

Zitat von RWarnecke
Danke für den Link zu dem Tool. Wie gesagt, ich werde das noch irgendwie als Plugin implementieren. Nur weis ich noch nicht hundertprozentig wie und in welchem zusammenhang ich das mit dem Rest des Programms verknüpfe.

Ganz simple wäre es, wenn man die Sensoren im Tray anbringt (wie Everest) oder über einen Reiter verfügbar macht. Ich sehe aber eher die Hürde im ermitteln der Werte.

RWarnecke 23. Sep 2008 20:36

Re: SystemInfo 1.5.0
 
Wenn dann über einen Reiter. In diesem Reiter werden dann die aktuellen Werte angezeigt. Diese werden alle 2-3 Sekunden aktualisiert. Das ganze dann als Plugin. So ungefähr stelle ich mir das vor. Aber wie gesagt, dass mit dem Plugin muss erst noch reifen.

RWarnecke 13. Feb 2009 10:17

Re: SystemInfo 1.6.0
 
Hallo zusammen,

nach langer, langer Zeit und einigen Betas später wird mal wieder eine neue Version von SystemInfo veröffentlicht. Ich habe noch nicht alle Wünsche umgesetzt. Was sich geändert und verbessert hat entnehmt bitte dem Changelog :

Changelog :
Version 1.6.0 [13.02.2009]:
[+] Bei "Reg. Dateierweiterungen" wird noch das zugehörige Icon angezeigt
[+] Beim Speichern des RTF-Reports wird ein Name vorgeschlagen
[+] Die Laufzeit des Betriebssystem wird angezeigt.
[+] Durch einen Doppelklick auf einen Wert wird dieser in die Zwischenablage kopiert. (Ausgenommen ListViews)
[+] Einen kompletten Report als PlainText [*] Bei zu langen Gruppennamen bei den Mitgliedschaften, werden diese als Hint angezeigt. [*] Den Style der Anzeige für die physikalischen Laufwerke geändert und verbessert
[-] Die Zeit von 1 Sekunde auf 5 Sekunden verlängert zur Aktualisierung des Speicher und der CPU Frequenz
[-] Es wird immer das zuletzt installierte Office Produkt angezeigt
[-] Unter Benutzerrechten wird die Arbeitsgruppe/Domain nicht angezeigt
[!] Verschiedene Anzeigen aus den gesamten Programm optimiert

Version 1.5.8 Beta [21.09.2008]:
[+] Automatisches Update des Inhaltes der physikalischen Laufwerke (USB-Stick oder CD einlegen) [*] Auflösung, Farbtiefe, Frequenz für alle Monitore werden ermittelt [*] Die Aktualisierung der Daten zum Prozessor auslagern [*] Installationsdatum gemäß den Ländereinstellungen anzeigen
[-] Bei einem leeren Card-Reader kommt der Fehler "Can't create device handler"
[-] Unter Windows XP 64Bit wird das Betriebssystem nicht richtig erkannt, wenn es nicht im Kompatibilitätsmodus ausgeführt wird
[!] Verschiedene Beschriftungen geändert und Rechtschreibfehler korrigiert.

Version 1.5.5 Beta [07.09.2008]:[*] Bei mehreren Monitoren wurde die Anzeige der Daten korrigiert [*] Buttons zum Wechseln der Netzwerkkarten am Anfang & Ende wurden deaktiviert [*] Die Anzeige der Drucker im HTML-Report besser strukturiert
[-] Fehler beim Anzeigen des CD/DVD Laufwerks wenn kein Medium eingelegt ist korrigiert
[-] Zugriffsverletzungen beim Ermitteln der Laufwerke unter Haupt- und Benutzerrechten

Version 1.5.2 Beta [10.08.2008]:
[+] Zusätzlicher Report im HTML Format [*] Physikalische Laufwerke auslesen verbessert
[-] Probleme beim Auslesen der WINS-Konfiguration behoben
[-] Werte für den Bereich "Anzeige" im RTF & HTML Report korrigiert

Testen ist natürlich wieder erwünscht und gebt mir ruhig viel Feedback. ;-)

RWarnecke 10. Mai 2009 11:10

Re: SystemInfo 1.6.3
 
Hallo zusammen,

ich habe euch mal wieder eine neue Version von SystemInfo Online gestellt. Aktuell ist es in der Version 1.6.3 verfügbar. Alle Änderungen entnehmt bitte dem Changelog :

Changelog:
Version 1.6.3:

[+] Eine Progressbar im Splashscreen, welche den Gesamtfortschritt anzeigt.
[+] Windows 7 Beta & Release Candidate wird richtig ausgelesen und angezeigt.
[+] Der aktive Reiter kann manuell über das Kontextmenü oder der Taste F5 aktualisiert werden.[*] Es werden alle installierten Browser im Reiter "Software" angezeigt. Der Standardbrowser wird mit (Standard) gekennzeichnet.[*] Die Farben für das Tortendiagramm in dem Reiter "Festplatten" geändert (Windows Standardfarben)[*] Microsoft Office SP2 wird erkannt.

uwewo 10. Mai 2009 12:58

Re: SystemInfo 1.6.3
 
Hallo RWarnecke,

habe es jetzt auch mal unter Win 7 RC ausprobiert, soweit ich sehen kann ist alles korrekt bis auf:

Anzeige: DirectX 9 4.09.00.0904
Richtig: Directx 11 6.01.7100.0000

Uwe

hathor 11. Mai 2009 03:27

Re: SystemInfo 1.6.3
 
Die aktuelle CPU-Frequenz ist falsch. Nimm doch die vom BS:

Delphi-Quellcode:
const
  powrproflib = 'powrprof.dll';

type
  PROCESSOR_POWER_INFORMATION = packed record
    Number: Cardinal;
    MaxMhz: Cardinal;
    CurrentMhz: Cardinal;
    MhzLimit: Cardinal;
    MaxIdleState: Cardinal;
    CurrentIdleState: Cardinal;
  end;
  PPROCESSOR_POWER_INFORMATION = ^PROCESSOR_POWER_INFORMATION;

  TCPUFrequency = packed record
    CurrentMhz: Cardinal;
    MaxMhz: Cardinal;
    MhzLimit: Cardinal;
  end;

  TPowerInfoArray = array[0..0] of PROCESSOR_POWER_INFORMATION;
  PPowerInfoArray = ^TPowerInfoArray;

var
  CPUFrequency: TCPUFrequency;
  PowerInfos: Pointer;
  SysInfo: SYSTEM_INFO;
  PowerInfoArray: PPowerInfoArray absolute PowerInfos;

implementation

{$R *.dfm}

function CallNtPowerInformation(InformationLevel: DWORD; InPutBuffer: Pointer; InputBufferSize: ULONG; OutPutBuffer:
  Pointer; OutPutBufferSize: ULONG): DWORD; stdcall; external powrproflib;

function GetCPUFrequency(var CPUFrequency: TCPUFrequency): DWORD;
var
  ppi: PROCESSOR_POWER_INFORMATION;
  err: DWORD;
begin
  ZeroMemory(@ppi, sizeof(PROCESSOR_POWER_INFORMATION));
  err := CallNTPowerInformation(11, nil, 0, @ppi, sizeof(PROCESSOR_POWER_INFORMATION));
  if err = 0 then
  begin
    CPUFrequency.CurrentMhz := ppi.CurrentMhz;
    CPUFrequency.MaxMhz := ppi.MaxMhz;
    CPUFrequency.MhzLimit := ppi.MhzLimit;
  end;
  result := err;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
   Button1Click(Self);
end;

procedure TForm1.Button1Click(Sender: TObject);
var size, ret: Cardinal;
    CURR, i :Integer;
begin
  GetSystemInfo(SysInfo);
  size := SizeOf(PROCESSOR_POWER_INFORMATION) * SysInfo.dwNumberOfProcessors;
  GetMem(PowerInfos, size);
  ZeroMemory(PowerInfos, size);
  ret := CallNTPowerInformation(11, nil, 0, PowerInfos, size);
  if ret = ERROR_SUCCESS then
    begin
      PowerInfoArray := PowerInfos;
      for i := 0 to SysInfo.dwNumberOfProcessors - 1 do
      begin
        CURR:= Round(PowerInfoArray^[i].CurrentMhz div 100 +1)* 100;
       case i of
       0: CurrentMhz0.Caption:= IntToStr(CURR); // Core 0
       1: CurrentMhz1.Caption:= IntToStr(CURR); // Core 1
       end;
      end;
    end
  else
  FreeMem(PowerInfos, size);
end;

RWarnecke 11. Mai 2009 06:05

Re: SystemInfo 1.6.3
 
Hallo Hathor,

erstmal danke für den Sourcecode. Ich verstehe nur nicht ganz, wieso die aktuelle CPU-Frequenz falsch sein soll. Der Reiter "System" wird alle 10 Sekunden über einen Thread aktualisiert. Ich habe die Frequenzen von mehreren CPU's mit den Herstellerprogrammen nachkontrolliert und bis jetzt hatte immer alles gestimmt.

Mit was für einer CPU hast Du denn getestet ? Hast Du auch mal ein anderes Programm als Vergleich genommen und wenn ja welches ?

rakekniven 11. Mai 2009 08:26

Re: SystemInfo 1.6.3
 
Der Downloadlink aus dem ersten Posting geht nicht.
Der Webserver gibt ein 404 zurück.

Noch eine GUI-Anmerkung:
Die Auswahl der Netzwerkadapter ist IMHO wenig intuitiv.
Oben eine ComboBox mit den Adapter fände ich ganz praktisch.

Aber ansonsten kann ich nur ein Lob aussprechen!

Gruß

P.S. Gibt es Gedanken den Source zu veröffentlichen?

rakekniven 11. Mai 2009 08:40

Re: SystemInfo 1.6.3
 
Noch ein paar Anmerkungen:

Ich habe hier ein Lenovo Thinkpad T61P.

Monitor:
Dieser wird mit einem externen Monitor mit unterschiedlicher Auflösung betrieben.
Hier zeigt mir Dein Tool die falsche Anzahl an Monitoren.

Batterie:
Ladestatus: Mein Akku ist zu 100% voll und im Netzbetrieb.
Das Tool zeigt mir: Hoher Ladezustand, 3% verbleibend.
Was bedeutet das "verbleibend"?

Physikalische Laufwerke:
Die beiden Listen für "physikalische Festplatten" und "physikalische CD/DVD-Laufwerke" sind leer.
Oben werden die Partitionen meiner Festplatte angezeigt.

Drucker:
Könnte man noch anzeigen, welcher Drucker der Standarddrucker ist?

Idee/Wunsch:
Gibt es eine Möglichkeit die ermittelten Werte zu exportieren?
z.B. Text-Datei oder HTML-Datei oder PDF oder ??

Gruß

RWarnecke 11. Mai 2009 09:51

Re: SystemInfo 1.6.3
 
Zitat:

Zitat von rakekniven
Der Downloadlink aus dem ersten Posting geht nicht.
Der Webserver gibt ein 404 zurück.

Der Download hätte trotzdem funktionieren sollen. Habe aber jetzt die URL korrigiert, so dass der Download gleich startet.

Zitat:

Zitat von rakekniven
Noch eine GUI-Anmerkung:
Die Auswahl der Netzwerkadapter ist IMHO wenig intuitiv.
Oben eine ComboBox mit den Adapter fände ich ganz praktisch.

Muss ich mal sehen, wie ich ins Design integriere. Aber was meinen die anderen dazu ?

Zitat:

Zitat von rakekniven
Aber ansonsten kann ich nur ein Lob aussprechen!

Danke.

Zitat:

Zitat von rakekniven
P.S. Gibt es Gedanken den Source zu veröffentlichen?

Das werde ich nicht machen, da in dem Programm schon zuviel Arbeit drin steckt. Vielleicht werde ich Teile davon mal als Klassen veröffentlichen. Aber dazu fehlt mir gerade etwas die Zeit.


Zitat:

Zitat von rakekniven
Monitor:
Dieser wird mit einem externen Monitor mit unterschiedlicher Auflösung betrieben.
Hier zeigt mir Dein Tool die falsche Anzahl an Monitoren.

Könntest Du mir mal bitte einen Screenshot des Reiters "System" zukommen lassen, plus die korrigierten Werte.

Zitat:

Zitat von rakekniven
Batterie:
Ladestatus: Mein Akku ist zu 100% voll und im Netzbetrieb.
Das Tool zeigt mir: Hoher Ladezustand, 3% verbleibend.
Was bedeutet das "verbleibend"?

Das steht schon auf meiner ToDo-Liste, dass ich an der Anzeige noch etwas tun muss.

Zitat:

Zitat von rakekniven
Physikalische Laufwerke:
Die beiden Listen für "physikalische Festplatten" und "physikalische CD/DVD-Laufwerke" sind leer.
Oben werden die Partitionen meiner Festplatte angezeigt.

Auch hier wäre ein Screenshot nicht schlecht, mit der Angabe was für eine Festplatte und welches Controller-System verbaut ist.

Zitat:

Zitat von rakekniven
Drucker:
Könnte man noch anzeigen, welcher Drucker der Standarddrucker ist?

Ich nehme das mit in meine ToDo-Liste mit auf.

Zitat:

Zitat von rakekniven
Idee/Wunsch:
Gibt es eine Möglichkeit die ermittelten Werte zu exportieren?
z.B. Text-Datei oder HTML-Datei oder PDF oder ??

Gruß

Du hast ein Kontextmenü in dem Programm. In diesem Menü gibt es den Punkt Exportieren. Darunter findest Du die Formate Text-Datei, RTF-Datei und HTML-Datei.


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:03 Uhr.
Seite 22 von 32   « Erste     12202122 2324     Letzte »    

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