- onHide -> onHide

- onShow -> OnShow

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@1885 b956fd51-792f-4845-bead-9b4dfca2ff2c

2 files changed, 4 insertions, 4 deletions

diff --git a/unicode/src/base/UFont.pas b/unicode/src/base/UFont.pas
index 32764be3..473e8f95 100644
--- a/unicode/src/base/UFont.pas
+++ b/unicode/src/base/UFont.pas
@@ -818,7 +818,7 @@ var
   LineLength: integer;
   EOT: boolean; // End-Of-Text
 begin
-  // split lines on newline (there is no UCS4String version of ExtractStrings)
+  // split lines on newline
   SetLength(Lines, 0);
   EOT := false;
   LineStart := 0;
diff --git a/unicode/src/base/UGraphic.pas b/unicode/src/base/UGraphic.pas
index 9c12d998..edbdd0b6 100644
--- a/unicode/src/base/UGraphic.pas
+++ b/unicode/src/base/UGraphic.pas
@@ -466,7 +466,7 @@ begin
   // load icon image (must be 32x32 for win32)
   Icon := LoadImage(ResourcesPath.Append(WINDOW_ICON));
   if (Icon <> nil) then
-    SDL_WM_SetIcon(Icon, 0);
+    SDL_WM_SetIcon(Icon, nil);
 
   SDL_WM_SetCaption(PChar(Title), nil);
 
@@ -667,7 +667,7 @@ end;
 procedure LoadLoadingScreen;
 begin
   ScreenLoading := TScreenLoading.Create;
-  ScreenLoading.onShow;
+  ScreenLoading.OnShow;
   
   Display.CurrentScreen := @ScreenLoading;
 
@@ -682,7 +682,7 @@ end;
 procedure LoadScreens;
 begin
 {  ScreenLoading := TScreenLoading.Create;
-  ScreenLoading.onShow;
+  ScreenLoading.OnShow;
   Display.CurrentScreen := @ScreenLoading;
   ScreenLoading.Draw;
   Display.Draw;