OSDN Git Service

PluginMenuはDeleteだけだとメモリリークするのでFreeするようにした
authorh677 <h677>
Sun, 4 Apr 2004 14:10:26 +0000 (14:10 +0000)
committerh677 <h677>
Sun, 4 Apr 2004 14:10:26 +0000 (14:10 +0000)
ExternalBoardPlugInMain.pas

index 41064ca..dbfedb7 100644 (file)
@@ -473,7 +473,7 @@ begin
 
                Result := newItem.Handle;
        except
-               Result := 0;
+               Result := 0;
        end;
 
 end;
@@ -490,7 +490,8 @@ begin
 
        for i := GikoForm.PlugInMenu.Count - 1 downto 0 do begin
                if GikoForm.PlugInMenu.Items[ i ].Handle = inHandle then begin
-                       GikoForm.PlugInMenu.Delete( i );
+            GikoForm.PlugInMenu.items[i].Free;
+                       //GikoForm.PlugInMenu.Delete( i );
                        Break;
                end;
        end;