TList sınıfı iyidir.
sepetUrun := TList.Create;
// dispose falan.
for i := 0 to sepetUrun.Count-1 do
Dispose(sepetUrun[i]);
sepetUrun.Clear;
btnSepeteAt.Caption := IntToStr(sepetUrun.Count);
// dispose falan.
for i := 0 to sepetUrun.Count-1 do
Dispose(sepetUrun[i]);
sepetUrun.Clear;
btnSepeteAt.Caption := IntToStr(sepetUrun.Count);






