free instead of delete

PiotrMi · Feb 19, 2022 · cb4db2f · cb4db2f
1 parent b30bc69
commit cb4db2f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/Cheat Engine/MainUnit.pas b/Cheat Engine/MainUnit.pas
@@ -4196,7 +4196,7 @@ procedure TMainForm.UpdateMenu;
   while miTable.Count > 5 do
   begin
     if miTable.Items[4] <> miLuaFormsSeperator then
-      miTable.Delete(4)
+      miTable[4].Free
     else
       break;
   end;
@@ -4259,7 +4259,7 @@ procedure TMainForm.UpdateMenu;
 
   //and now the files
   while miTable.Count > miTable.indexOf(miAddFile) + 1 do
-    miTable.Delete(miTable.indexOf(miAddFile) + 1);
+    miTable[miTable.indexOf(miAddFile) + 1].free;
 
   for i := 0 to luafiles.Count - 1 do
   begin