Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Gehstock,
23. Feb 2007
MS.dwAvailVirtual dachte das ist die verfügbare und das MS.dwTotalVirtual die maximale auslagerungsdatei
die bei mir 2046 mb groß ist was laut bild für MS.dwTolatVirtual sprechen würde
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Gehstock,
22. Feb 2007
l := listview1.Items.Add;
l.Caption := 'Hauptspeicher';
l.SubItems.Add(FormatFloat('#,###" MB"', MS.dwTotalPhys / 1048576));
l := listview1.Items.Add;
l.Caption := 'Verwendet';
l.SubItems.Add(Format('%d %%', ));
l := listview1.Items.Add;
l.Caption := 'Frei';
l.SubItems.Add(FormatFloat('#,###" MB"', (MS.dwAvailPhys/ 1048576)));