1 files changed, 32 insertions, 32 deletions
diff --git a/src/base/UGraphic.pas b/src/base/UGraphic.pas
index a624d14f..eea7db0b 100644
--- a/src/base/UGraphic.pas
+++ b/src/base/UGraphic.pas
@@ -767,39 +767,39 @@ begin
 end;
 
 procedure UnLoadScreens;
+var I: Integer;
 begin
-  freeandnil( ScreenMain );
-  freeandnil( ScreenName );
-  freeandnil( ScreenLevel);
-  freeandnil( ScreenSong );
-  freeandnil( ScreenSongMenu );
-  freeandnil( ScreenSing );
-  freeandnil( ScreenScore);
-  freeandnil( ScreenTop5 );
-  freeandnil( ScreenOptions );
-  freeandnil( ScreenOptionsGame );
-  freeandnil( ScreenOptionsGraphics );
-  freeandnil( ScreenOptionsSound );
-  freeandnil( ScreenOptionsLyrics );
-//  freeandnil( ScreenOptionsThemes );
-  freeandnil( ScreenOptionsRecord );
-  freeandnil( ScreenOptionsAdvanced );
-  freeandnil( ScreenEditSub );
-  freeandnil( ScreenEdit );
-  freeandnil( ScreenEditConvert );
-  freeandnil( ScreenOpen );
-  freeandnil( ScreenSingModi );
-  freeandnil( ScreenSongMenu );
-  freeandnil( ScreenSongJumpto);
-  freeandnil( ScreenPopupCheck );
-  freeandnil( ScreenPopupError );
-  freeandnil( ScreenPartyNewRound );
-  freeandnil( ScreenPartyScore    );
-  freeandnil( ScreenPartyWin     );
-  freeandnil( ScreenPartyOptions  );
-  freeandnil( ScreenPartyPlayer   );
-  freeandnil( ScreenStatMain     );
-  freeandnil( ScreenStatDetail    );
+  ScreenMain.Destroy;
+  ScreenName.Destroy;
+  ScreenLevel.Destroy;
+  ScreenSong.Destroy;
+  ScreenSing.Destroy;
+  ScreenScore.Destroy;
+  ScreenTop5.Destroy;
+  ScreenOptions.Destroy;
+  ScreenOptionsGame.Destroy;
+  ScreenOptionsGraphics.Destroy;
+  ScreenOptionsSound.Destroy;
+  ScreenOptionsLyrics.Destroy;
+//  ScreenOptionsThemes.Destroy;
+  ScreenOptionsRecord.Destroy;
+  ScreenOptionsAdvanced.Destroy;
+  ScreenEditSub.Destroy;
+  ScreenEdit.Destroy;
+  ScreenEditConvert.Destroy;
+  ScreenOpen.Destroy;
+  ScreenSingModi.Destroy;
+  ScreenSongMenu.Destroy;
+  ScreenSongJumpto.Destroy;
+  ScreenPopupCheck.Destroy;
+  ScreenPopupError.Destroy;
+  ScreenPartyNewRound.Destroy;
+  ScreenPartyScore.Destroy;
+  ScreenPartyWin.Destroy;
+  ScreenPartyOptions.Destroy;
+  ScreenPartyPlayer.Destroy;
+  ScreenStatMain.Destroy;
+  ScreenStatDetail.Destroy;
 end;
 
 end.