From ceaaf48e88ba705e47cbf491720f05fda814e33b Mon Sep 17 00:00:00 2001 From: tobigun Date: Thu, 23 Jul 2009 19:11:48 +0000 Subject: - onHide -> onHide - onShow -> OnShow git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@1885 b956fd51-792f-4845-bead-9b4dfca2ff2c --- unicode/src/screens/UScreenTop5.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'unicode/src/screens/UScreenTop5.pas') diff --git a/unicode/src/screens/UScreenTop5.pas b/unicode/src/screens/UScreenTop5.pas index 48b2b54c..f9c86643 100644 --- a/unicode/src/screens/UScreenTop5.pas +++ b/unicode/src/screens/UScreenTop5.pas @@ -58,7 +58,7 @@ type constructor Create; override; function ParseInput(PressedKey: cardinal; CharCode: UCS4Char; PressedDown: boolean): boolean; override; function ParseMouse(MouseButton: integer; BtnDown: boolean; X, Y: integer): boolean; override; - procedure onShow; override; + procedure OnShow; override; function Draw: boolean; override; end; @@ -137,7 +137,7 @@ begin end; -procedure TScreenTop5.onShow; +procedure TScreenTop5.OnShow; var I: integer; PMax: integer; -- cgit v1.2.3