Below is a code execution error when using a ComboBox on the change event
Win32RichmemoProc.pas
function VScriptPosToEffects(vpos: TVScriptPos): LongWord;
const
EffMask : array [TVScriptPos] of LongWord = (0, CFE_SUBSCRIPT, CFE_SUPERSCRIPT);
begin
Result:=EffMask[vpos]; <--- ERROR IS HERE
end;
This is the code in the code event of the comboxbox.
As well, I also tested it on a normal button and the code works fine and changes my font size
var
fnt : TFontParams;
begin
fnt.Name:='';
fnt.Style:= []; //[fsBold or Italic];
fnt.Size:=24;
txtNote1.SetTextAttributes(txtNote1.SelStart, txtNote1.SelLength, fnt);
txtNote1.SetFocus();
So, something in RichMemo doesn't like the combo change event or my code