Adicione:
2 Label
1 Button
De 1 Clique no Button em properties vai ter uma opição chamada caption coloque esse nome >> Ver memoria do seu computador <<
De 2 cliques no Button e adicione esse codigo:
Código:
Esse programa ele permite que vocês vejam o uso de memoria do seu computador!
Scan
2 Label
1 Button
De 1 Clique no Button em properties vai ter uma opição chamada caption coloque esse nome >> Ver memoria do seu computador <<
De 2 cliques no Button e adicione esse codigo:
Código:
- Código:
procedure TForm1.Button1Click(Sender: TObject);
var v_MS: TMemoryStatus;
begin
GlobalMemoryStatus(v_MS);
Label1.Caption:='Memória Total: ' + FormatFloat('#,###" KB"', v_MS.dwTotalPhys / 1024);
Label2.Caption:='Memória em Uso: ' + Format('%d %%', [v_MS.dwMemoryLoad]);
end;
end.
Esse programa ele permite que vocês vejam o uso de memoria do seu computador!
Scan
- Anexos
- memoria ram delphi7.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (201 Kb) Baixado 0 vez(es)