| |
|
|
- Page 1 - |
|
Michael Wodrich |
Keywords: memory, Memory, 64-bit-Long
Systemspeicher durchleuchten
(ought to really too with gigas cope)
jac/wod
$H windows.ph
struct MemEx = dwLength&,
dwMemoryLoad&,
TotalPhysLo&,TotalPhysHi&,
AvailPhysLo&,AvailPhysHi&,
TotalPageFileLo&,TotalPageFileHi&,
AvailPageFileLo&,AvailPageFileHi&,
TotalVirtualLo&,TotalVirtualHi&,
AvailVirtualLo&,AvailVirtualHi&,
AvailExtendedVirtualLo&,AvailExtendedVirtualHi&
Proc Zeige_Mem
Parameters anzeigetext$, groesse!
Declare type$
type$ = Bytes
If groesse! > 1024
groesse! = groesse! / 1024
type$ = KB
EndIf
If groesse! > 1024
groesse! = groesse! / 1024
type$ = MB
EndIf
If groesse! > 1024
groesse! = groesse! / 1024
type$ = GB
EndIf
Print ;anzeigetext$; :, stature$(#,0,groesse!), type$
ENDPROC
cls
declare b#, f!
Dim b#, MemEx
b#.dwLength& = SizeOf(b#)
External(~kernel32,GlobalMemoryStatusEx,b#)
Print
Print Load: + Str $(b#.dwMemoryLoad&) + %
f! = b#.TotalPhysHi& * 2^32 + b#.TotalPhysLo&
Zeige_Mem(TotalPhys, f!)
f! = b#.AvailPhysHi& * 2^32 + b#.AvailPhysLo&
Zeige_Mem(AvailPhys, f!)
f! = b#.TotalPageFileHi& * 2^32 + b#.TotalPageFileLo&
Zeige_Mem(TotalPageFile, f!)
f! = b#.AvailPageFileHi& * 2^32 + b#.AvailPageFileLo&
Zeige_Mem(AvailPageFile, f!)
f! = b#.TotalVirtualHi& * 2^32 + b#.TotalVirtualLo&
Zeige_Mem(TotalVirtual, f!)
f! = b#.AvailVirtualHi& * 2^32 + b#.AvailVirtualLo&
Zeige_Mem(AvailVirtual, f!)
f! = b#.AvailExtendedVirtualHi& * 2^32 + b#.AvailExtendedVirtualLo&
Zeige_Mem(AvailExtendedVirtual, f!)
Print
Print -end to Tastendruck-
Dispose b#
waitkey
end
|
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 01/03/09 ▲ |
|
|
|
|
| |
|
- Page 3 - |
|
Jac de Lad | @Horst: Jo, had I misread. Habs you neither ill taken, because I there really sooner had on it come can.
it works wonderful and shows even correctly whom Difference between physikalischem and totalem main memory from. |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/04/09 ▲ |
|
|
|
|
Jac de Lad | functions unfortunately not under windows 7. |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/21/09 ▲ |
|
|
|
|
E.T. | Jac
functions unfortunately not under windows 7.
Dou you mean now the Prog of Andreas ?? means by me (on one not überdimensionierten Monstrum) walk yet any Profan- and XProfan-programs under windows 7
[offtopic](whether purely or by XPSE verwurstelt(is indeed nothing other, only the XPSE something umstrukturiert)).[/offtopic] |
|
|
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 01/21/09 ▲ |
|
|
|
|
Jac de Lad | Hm, is correct, the could weg. I had it something compressed in Gamsav installed, and there plummeted it always ex. I probier again the Original. |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/22/09 ▲ |
|
|
|
|
| @Jac In On 1 look runs the code under windows-7 - only I had into Versionserkennung 7 not yet installed. See in the suitable Thread whom Screenshot of E.T. |
|
|
| |
|
|
|
Jac de Lad | the witty is, I Have the virtual machine under windows 7 only 2GB RAM allocated... |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/22/09 ▲ |
|
|
|
|
| Jac
the witty is, I Have the virtual machine under windows 7 only 2GB RAM allocated...
Why are Thou so mean ? - your Monstermaschine has still enough ! |
|
|
| |
|
|
|
E.T. | @JAC: Siehste, I Have Win-7 as volles BS walk, selectable over Bootmenü. as i VISTA yet virt. walk having, gabs too always Problems, which with one realem system not there were. therefore be I thereby, me from the virt. machines To verabschieden and rather once More new to start, then but the BS correctly. on the walk to have. with Win-7 Have I virtual too never The 64-bit correctly. to that walk get...
EDIT: Why must because XProfan-Progs yet compressed go ?? are still small enough... and during the development would I on such Spielerein anyhow dispense. |
|
|
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 01/22/09 ▲ |
|
|
|
|
Jac de Lad | @Horst: because I do not only a separate several at the same time walk let. Also have I The Auslagerungsdatei shorted, because the Performanz bring.
@E.T.: The 64it-Beta runs by me correct, but I will not always neustarten, because I then none More zurande come would because of eachone new row neuzustarten. with telescope meant I, I the Quelltextl so modifziert have, that only the available and the entire memory read becomes. Have everything for unnecessary removes.
Jac |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01/23/09 ▲ |
|
|
|
|
KHR | Hello together,
have now The latest Version ausprobiert. unfortunately shows tappt im dunkeln on my Notebook (Dell) of course The values for RAM correctly. on, but the Auslagerungsdatei won't correctly. viewed.
tuned have I to that try each 500MB, 1000MB, 1024MB, 2000MB 2048MB solid.
The display was but always The same -> see Bildchen
. |
|
|
| Gruß Karl-Heinz WIN XP home/Pro / XPROFAN 11 / P2CPP ATMEL + BASCOM Fan | 06/14/09 ▲ |
|
|
|
|
| |
|
| |
|
|
| |
|
- Page 4 - |
|