Search results for 'free memory space'. 1 post(s) found.
- 2007/08/25 How To Find Out Total And Available Memory
Get the total and available memory in your system. (Total free memory space in your system)
procedure TForm1.Button1Click(Sender: TObject);
var
memory:TMemoryStatus;
begin
memory.dwLength:=sizeof(memory);
GlobalMemoryStatus(memory);
ShowMessage('Total RAM / total memory: '+inttostr(memory.dwTotalPhys)+' Bytes');
ShowMessage('Freie RAM / available memory: '+inttostr(memory.dwavailPhys)+' Bytes');
end;
var
memory:TMemoryStatus;
begin
memory.dwLength:=sizeof(memory);
GlobalMemoryStatus(memory);
ShowMessage('Total RAM / total memory: '+inttostr(memory.dwTotalPhys)+' Bytes');
ShowMessage('Freie RAM / available memory: '+inttostr(memory.dwavailPhys)+' Bytes');
end;
Another posts included in "Delphi"
| How To Get Windows Uptime (0) | 2007/08/25 |
| How To Make Rounded Windows (0) | 2007/08/25 |
| How To Pass The Focus To The Next/prior Control (0) | 2007/08/25 |
| How To Change The System Time (0) | 2007/08/25 |
| How To Get The Windows OS Version (0) | 2007/08/25 |
| How To Change The Desktop Wallpaper (0) | 2007/08/25 |
| How To Get The Windows Language (0) | 2007/08/25 |
| How To Make A Gradient Filled Form (0) | 2007/08/25 |
Trackback : Cannot send a trackbact to this post.
-
Subject different money making ideas
2010/01/29 00:09
moneyideas
-
Subject different money making ideas
2010/01/29 08:21
moneyideas
-
Subject different money making ideas
2010/01/31 16:41
moneyideas

Prev

Rss Feed