終了時にアクセスバイオレーションが出るようになった。

[gikonavigoeson/gikonavi.git] / RoundData.pas

diff --git a/RoundData.pas b/RoundData.pas
index 883a42d..981aad6 100644 (file)
--- a/RoundData.pas
+++ b/RoundData.pas
@@ -102,7 +102,7 @@ begin
        Clear;
        FBoardList.Free;
        FItemList.Free;
-       inherited;
+       //inherited;
 end;
 
 function TRoundList.Add(Board: TBoard): Integer;