Beberapa Hal Yang Menyebabkan Memory Leak

Pada artikel Mendeteksi Memory Leak sudah dijelaskan apa itu memory leak dan cara mendeteksinya. Pada artikel berikut ini akan saya berikan dua penulisan program yang akan menyebabkan memory leak.



1.Object Tidak Di Free Ketika Sudah Tidak Dipakai

Jika kita meng-create Object secara runtime maka kita berkewajiban untuk mem-Free Object tersebut. Jika kita lupa, maka akan terjadi memory leak. Lihat contoh di bawah ini :
Misalnya kita mempunyai kelas TKaryawan yang di dalamnya ada method SaveToDB.

Var
Karyawan : TKaryawan;
begin
Karyawan := TKaryawan.Create(nil);
if Karyawan.SaveToDB then
begin
ShowMessage('Berhasil Simpan Data Karyawan');
end else begin
ShowMessage('Gagal Simpan Data Karyawan');
end;
end;


Pada contoh di atas, kita meng-create object TKaryawan dengan cara
Karyawan := TKaryawan.Create(nil); Pada saat create object ini komputer akan mengalokasikan memory untuk object Karyawan. Alokasi memory inilah yang harus dibebaskan ketika object karyawan sudah tidak dipakai lagi. Pada baris kode di atas belum dilakukan hal tersebut. Seharusnya yang harus kita lakukan adalah :

Var
Karyawan : TKaryawan;
begin
Karyawan := TKaryawan.Create(nil);
try
if Karyawan.SaveToDB then
begin
ShowMessage('Berhasil Simpan Data Karyawan');
end else begin
ShowMessage('Gagal Simpan Data Karyawan');
end;
finally
Karyawan.Free;
end;
end;


2.Penggunaan Resources (Sumber Daya) Dari Luar

Contohnya adalah pada saat kita mengakses sebuah file. Lihat contoh berikut :
Var
F : TextFile;
S : String;
begin
AssignFile(F, 'c:\myFile.Txt');
Readln(F,S);
end;

Pada contoh di atas, kita lupa untuk meng-close file tersebut. Hal ini akan menyebabkan memory leak. Seharusnya yang kita lakukan adalah :

Var
F : TextFile;
S : String;
begin
try
AssignFile(F, 'c:\myFile.Txt');
Readln(F,S);
finally
CloseFile(F);
end;
end;


Hati-hati juga ketika kita melakukan koneksi ke database. Setelah sudah tidak diperlukan lagi, maka kita juga wajib menutup koneksi tersebut.