Início
![[Soucer Codigo] Uso de memoria pelo delphi7 Empty](https://2img.net/i/empty.gif)
por 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
![[Soucer Codigo] Uso de memoria pelo delphi7 Attachment](https://2img.net/i/fa/attachment.png)
memoria ram delphi7.zip - Você não tem permissão para fazer download dos arquivos anexados.
- (201 Kb) Baixado 0 vez(es)
![[Soucer Codigo] Uso de memoria pelo delphi7 I_vote_lcap](https://2img.net/s/t/17/08/32/i_vote_lcap.png){kind=small}
![[Soucer Codigo] Uso de memoria pelo delphi7 I_voting_bar](https://2img.net/s/t/17/08/32/i_voting_bar.png){kind=small}
![[Soucer Codigo] Uso de memoria pelo delphi7 I_vote_rcap](https://2img.net/s/t/17/08/32/i_vote_rcap.png){kind=small}