Small fix in MCI parser
This commit is contained in:
parent
226fac328c
commit
5b81e856b1
|
@ -3985,3 +3985,6 @@
|
|||
and their directories (if they do not already exist). See MUTIL.CFG for
|
||||
more information.
|
||||
|
||||
! The MCI parser for |!x MCI codes now checks for validity of the number
|
||||
or otherwise does not parse the code.
|
||||
|
||||
|
|
|
@ -377,11 +377,16 @@ Begin
|
|||
End;
|
||||
|
||||
Case Code[1] of
|
||||
'!' : Begin
|
||||
'!' : If Code[2] in ['0'..'9'] Then Begin
|
||||
A := strS2I(Code[2]);
|
||||
|
||||
ScreenInfo[A].X := Screen.CursorX;
|
||||
ScreenInfo[A].Y := Screen.CursorY;
|
||||
ScreenInfo[A].A := Screen.TextAttr;
|
||||
End Else Begin
|
||||
Result := False;
|
||||
|
||||
Exit;
|
||||
End;
|
||||
'$' : Case Code[2] of
|
||||
'C' : Begin
|
||||
|
|
|
@ -100,6 +100,7 @@ FUTURE / IDEAS / WORK IN PROGRESS / NOTES
|
|||
- So much cool stuff to do with the new themes
|
||||
- LastOn revamp make sure its not global and new stuff is populated
|
||||
- ANSI online help that can execute menu commands/restore screen
|
||||
- MPL fAppend? Why didnt I add that?
|
||||
|
||||
RANDOM DRUNKEN BRAINDUMP AKA DESIGN DETAILS
|
||||
===========================================
|
||||
|
|
Loading…
Reference in New Issue