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/UScreenEditConvert.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'unicode/src/screens/UScreenEditConvert.pas') diff --git a/unicode/src/screens/UScreenEditConvert.pas b/unicode/src/screens/UScreenEditConvert.pas index 28182097..6c84ecad 100644 --- a/unicode/src/screens/UScreenEditConvert.pas +++ b/unicode/src/screens/UScreenEditConvert.pas @@ -122,10 +122,10 @@ type public constructor Create; override; - procedure onShow; override; + procedure OnShow; override; function ParseInput(PressedKey: cardinal; CharCode: UCS4Char; PressedDown: boolean): boolean; override; function Draw: boolean; override; - procedure onHide; override; + procedure OnHide; override; end; var @@ -691,7 +691,7 @@ begin Result := true; end; -procedure TScreenEditConvert.onHide; +procedure TScreenEditConvert.OnHide; begin {$IFDEF UseMIDIPort} MidiFile.Free; -- cgit v1.2.3