aboutsummaryrefslogtreecommitdiffstats
path: root/src/base/UGraphic.pas
diff options
context:
space:
mode:
Diffstat (limited to 'src/base/UGraphic.pas')
-rw-r--r--src/base/UGraphic.pas6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/base/UGraphic.pas b/src/base/UGraphic.pas
index f0b60b95..6df125ca 100644
--- a/src/base/UGraphic.pas
+++ b/src/base/UGraphic.pas
@@ -67,6 +67,7 @@ uses
UScreenEditConvert,
UScreenEditHeader,
UScreenOpen,
+ UScreenAbout,
UThemes,
USkins,
UScreenSongMenu,
@@ -129,6 +130,7 @@ var
ScreenEditConvert: TScreenEditConvert;
ScreenEditHeader: TScreenEditHeader;
ScreenOpen: TScreenOpen;
+ ScreenAbout: TScreenAbout;
ScreenSongMenu: TScreenSongMenu;
ScreenSongJumpto: TScreenSongJumpto;
@@ -761,6 +763,9 @@ begin
SDL_WM_SetCaption(PChar(Title + ' - Loading ScreenEditConvert & ScreenOpen'), nil);
ScreenEditConvert := TScreenEditConvert.Create;
ScreenOpen := TScreenOpen.Create;
+ SDL_WM_SetCaption(PChar(Title + ' - Loading ScreenAbout'), nil);
+ ScreenAbout := TScreenAbout.Create;
+ Log.BenchmarkEnd(3); Log.LogBenchmark('====> Screen About', 3); Log.BenchmarkStart(3);
SDL_WM_SetCaption(PChar(Title + ' - Loading ScreenSongMenu & ScreenSongJumpto'), nil);
ScreenSongMenu := TScreenSongMenu.Create;
ScreenSongJumpto := TScreenSongJumpto.Create;
@@ -813,6 +818,7 @@ begin
ScreenEdit.Free;
ScreenEditConvert.Free;
ScreenOpen.Free;
+ ScreenAbout.Free;
//ScreenSingModi.Free;
ScreenSongMenu.Free;
ScreenSongJumpto.Free;