From fb174160559b9823a932fc238b55eb44619c47e8 Mon Sep 17 00:00:00 2001 From: k-m_schindler Date: Sat, 22 Nov 2014 23:21:19 +0000 Subject: Remove unused variables and fix warnings with ifdefed variables. Thanks to rudi_s. git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@3103 b956fd51-792f-4845-bead-9b4dfca2ff2c --- src/screens/UScreenEditSub.pas | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'src/screens/UScreenEditSub.pas') diff --git a/src/screens/UScreenEditSub.pas b/src/screens/UScreenEditSub.pas index fb3f04ce..b2b29860 100644 --- a/src/screens/UScreenEditSub.pas +++ b/src/screens/UScreenEditSub.pas @@ -83,13 +83,15 @@ type {$IFDEF UseMIDIPort} MidiOut: TMidiOutput; - {$endif} + {$ENDIF} MidiStart: real; MidiStop: real; MidiTime: real; MidiPos: real; + {$IFDEF UseMIDIPort} MidiLastNote: integer; + {$ENDIF} TextEditMode: boolean; editText: UTF8String; //backup of current text in text-edit-mode @@ -1428,8 +1430,8 @@ var pos: real; br: real; - line, note: integer; - numLines, numNotes: integer; + line: integer; + numLines: integer; begin numLines := Length(Lines[0].Line); -- cgit v1.2.3