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/UScreenEditSub.pas | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'unicode/src/screens/UScreenEditSub.pas') diff --git a/unicode/src/screens/UScreenEditSub.pas b/unicode/src/screens/UScreenEditSub.pas index 1d0649b4..8567e88b 100644 --- a/unicode/src/screens/UScreenEditSub.pas +++ b/unicode/src/screens/UScreenEditSub.pas @@ -116,11 +116,11 @@ type Tex_Background: TTexture; FadeOut: boolean; constructor Create; override; - procedure onShow; override; + procedure OnShow; override; function ParseInput(PressedKey: cardinal; CharCode: UCS4Char; PressedDown: boolean): boolean; override; function ParseInputEditText(PressedKey: cardinal; CharCode: UCS4Char; PressedDown: boolean): boolean; function Draw: boolean; override; - procedure onHide; override; + procedure OnHide; override; end; implementation @@ -1258,13 +1258,13 @@ begin end; -procedure TScreenEditSub.onShow; +procedure TScreenEditSub.OnShow; var FileExt: IPath; begin inherited; - Log.LogStatus('Initializing', 'TEditScreen.onShow'); + Log.LogStatus('Initializing', 'TEditScreen.OnShow'); Lyric := TEditorLyrics.Create; ResetSingTemp; @@ -1440,7 +1440,7 @@ begin Result := true; end; -procedure TScreenEditSub.onHide; +procedure TScreenEditSub.OnHide; begin {$IFDEF UseMIDIPort} MidiOut.Close; -- cgit v1.2.3