Programın o anda kullandığı hafıza miktarı

[P206]

Herkese Merhabalar,

Program çalışırken (Rapor Programı) bazen Hafızada çok fazla yer kaplıyor ve serverda ağırlaşmaya neden oluyor. Programın hafızada kendi kullandığı miktarı nasıl bulabilirim. Eğer belirli değerleri geçtiyse ona göre farklı işlemler yaptıracağım.

Teşekkürler.

[aslangeri]

S.A.
windowsun kullanabileceği bellek miktarı ile sistem kaynaklarını aşağıdaki şekilde bulabilirsin ama işine yararmı bilmiyorum. yani program kendi kullandığı mktarı nasıl bulunur bilemiyorum.

Kod: Tümünü seç

procedure TAboutBox.FormCreate(Sender: TObject);
var
  MS: TMemoryStatus;
begin
  ProgramIcon.Picture.Icon := Application.Icon ;
  GlobalMemoryStatus(MS);
//windowsun kullanabileceği bellek miktarı
  PhysMem.Caption := FormatFloat('#,###" KB"', MS.dwTotalPhys / 1024);
//sistem kaynakları
  FreeRes.Caption := Format('%d %%', [MS.dwMemoryLoad]);
end ;

Kolay gelsin.

[P206]

Sağol Onu biliyordum. O anki hafızada kapladığı yeri bularak programı belirli bir büyüklükle sınırlama imkanını sağlamaya çalışıyorum. Çünkü 20 adet kullanıcı var programda kişilere hak vererek o programı nekadar a kadar server üzerinde kullanabileceklerini ayarlamaya çalışıyorum.