aboutsummaryrefslogtreecommitdiffstats
path: root/src/screens/UScreenEditConvert.pas
diff options
context:
space:
mode:
authork-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2010-02-22 18:27:15 +0000
committerk-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2010-02-22 18:27:15 +0000
commit54f567282784181b99a3012fd9db03dae60f361e (patch)
tree205ceb321c1d36601e86bd53854b904d67107065 /src/screens/UScreenEditConvert.pas
parentfa98e12acb82de42206e6aafba731255cac41eba (diff)
downloadusdx-54f567282784181b99a3012fd9db03dae60f361e.tar.gz
usdx-54f567282784181b99a3012fd9db03dae60f361e.tar.xz
usdx-54f567282784181b99a3012fd9db03dae60f361e.zip
screens code cleanup
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2146 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/screens/UScreenEditConvert.pas')
-rw-r--r--src/screens/UScreenEditConvert.pas5
1 files changed, 2 insertions, 3 deletions
diff --git a/src/screens/UScreenEditConvert.pas b/src/screens/UScreenEditConvert.pas
index b2fb7773..8b13d410 100644
--- a/src/screens/UScreenEditConvert.pas
+++ b/src/screens/UScreenEditConvert.pas
@@ -602,15 +602,15 @@ begin
end;
procedure TScreenEditConvert.OnShow;
+{$IFDEF UseMIDIPort}
var
T: integer; // track
N: integer; // note
- {$IFDEF UseMIDIPort}
MidiTrack: TMidiTrack;
MidiEvent: PMidiEvent;
- {$ENDIF}
FileOpened: boolean;
KMIDITrackIndex, SMFTrackIndex: integer;
+{$ENDIF}
begin
inherited;
@@ -731,7 +731,6 @@ var
Y: real;
Height: real;
YSkip: real;
- TrackName: UTF8String;
begin
// draw static menu
inherited Draw;