diff --git a/Projects/Simba/simbaunit.pas b/Projects/Simba/simbaunit.pas index c668f77..6d13b57 100644 --- a/Projects/Simba/simbaunit.pas +++ b/Projects/Simba/simbaunit.pas @@ -46,7 +46,7 @@ uses CastaliaSimplePasPar, v_AutoCompleteForm, PSDump; const - SimbaVersion = 686; + SimbaVersion = 687; type diff --git a/Units/MMLAddon/PSInc/Wrappers/dtm.inc b/Units/MMLAddon/PSInc/Wrappers/dtm.inc index 888c8cf..f4270d7 100644 --- a/Units/MMLAddon/PSInc/Wrappers/dtm.inc +++ b/Units/MMLAddon/PSInc/Wrappers/dtm.inc @@ -106,6 +106,7 @@ end; function ps_SDTMToMDTM(Const DTM: TSDTM): TMDTM;extdecl; begin result := SDTMToMDTM(DTM); + CurrThread.Client.MDTMs.AddDTM(result); end; function ps_CreateDTMPoint(x,y,c,t,asz : integer; bp : boolean) : TMDTMPoint;