Apple-2-Tools
/
microm8-gui
mirror of https://github.com/paleotronic/microm8-gui.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

remove debug

This commit is contained in:
April Ayres-Griffiths 2019-04-19 09:23:12 +10:00
parent a54d35f784
commit 8d6662d6ae
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
backup/main.pas
View File

@ -2894,6 +2894,7 @@ begin
// insert smartport here
InsertDisk( 'local:'+filename, 2 );
ShowM8;
SendOSDMessage('SmartPort Volume Connected');
end;
end;
end;

2
main.pas
View File

@ -3171,7 +3171,7 @@ begin
code := MapKeyCode(Key,Shift,false);
if code <> 0 then
SendKey( code, 0, 1, MapShiftState(Key, Shift) );
StatusBar1.SimpleText := IntToStr(code) + ' ' + keydesc;
//StatusBar1.SimpleText := IntToStr(code) + ' ' + keydesc;
end;
procedure TGUIForm.FormKeyPress(Sender: TObject; var Key: char);