Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi [TMemoryStatus] - Problem beim Ruhezustand (https://www.delphipraxis.net/89049-%5Btmemorystatus%5D-problem-beim-ruhezustand.html)

xZise 25. Mär 2007 11:02


[TMemoryStatus] - Problem beim Ruhezustand
 
Wenn ich im Ruhezustand den TMemoryStatus abfrage (also bei Runter- und Hochfahren) dann gibts unschöne fehler...

Gibt es eine bessere oder andere Möglichkeit an die Memoryload zu kommen?

himitsu 25. Mär 2007 13:36

Re: [TMemoryStatus] - Problem beim Ruhezustand
 
Was sind denn unschöne Fehler?

xZise 25. Mär 2007 15:05

Re: [TMemoryStatus] - Problem beim Ruhezustand
 
Seltsam... Ich hab ihn gerade mal in Ruhezustand gefahren, und es gab keinen Fehler...

xZise 5. Apr 2007 09:07

Re: [TMemoryStatus] - Problem beim Ruhezustand
 
So... Nochmal :(

So hier isses:
sh*t... Warum hat er das Fenster nicht kopiert :(
Ha! Ich hab eins:
Zitat:

---------------------------
Niacarv
---------------------------
Ein Aufruf einer Betriebssystemfunktion ist fehlgeschlagen.
---------------------------
OK
---------------------------

xZise 7. Apr 2007 09:21

Re: [TMemoryStatus] - Problem beim Ruhezustand
 
So... Ich wäre sehr über Hilfe erfreut :P
Hier ein paar Infos:
=> Es kommt beim in den Ruhezustand fahren und beim Benutzter sperren
=> Die Funktion wird im Thread aufgerufen
=> Der Code:
Delphi-Quellcode:
    try
      GlobalMemoryStatus(ms);
      if ramUsage <> ms.dwMemoryLoad then
      begin
        ramUsage := ms.dwMemoryLoad;
        Synchronize(UpdateRam);
      end;
    finally

    end;
Danke schonmal...

PS: Ich seh gerade, dass im finally nichts steht ^^ was muss da den rein xD?

himitsu 10. Apr 2007 12:17

Re: [TMemoryStatus] - Problem beim Ruhezustand
 
Sicher, daß es GlobalMemoryStatus ist?

also entweder nur diese meldung unterdrücken
Delphi-Quellcode:
try
  GlobalMemoryStatus(ms);
  if ramUsage <> ms.dwMemoryLoad then
  begin
    ramUsage := ms.dwMemoryLoad;
    Synchronize(UpdateRam);
  end;
except

end;
oder sie selber ausgeben
Delphi-Quellcode:
try
  GlobalMemoryStatus(ms);
  if ramUsage <> ms.dwMemoryLoad then
  begin
    ramUsage := ms.dwMemoryLoad;
    Synchronize(UpdateRam);
  end;
except
  fehlermeldung irgendwo ausgeben
end;
oder auch mal getrennt drauf reagieren
Delphi-Quellcode:
try
  GlobalMemoryStatus(ms);
except
  fehlermeldung (GlobalMemoryStatus) irgendwo ausgeben
end;
try
  if ramUsage <> ms.dwMemoryLoad then
  begin
    ramUsage := ms.dwMemoryLoad;
    Synchronize(UpdateRam);
  end;
except
  fehlermeldung (Anzeige) irgendwo ausgeben
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:28 Uhr.

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