Anyone else having this kind of error?
Error: Out Of Range at line 509
The following DTMs were not freed: [SRL - Lamp bitmap, SRL - Book of Knowledge, 2]
The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Minimap Mask bitmap, 3]
the code that is causing it:
Simba Code:
function R_GetUpText: String;
var
Options: TStringArray;
begin
Options := R_GetMenuOptions;
if ((High(Options) - 1) > 0) then
Result := Options[0] + ' / ' + ToStr(High(Options) - 1) + ' more options'
else
Result := Options[0];
if (Result = 'Cancel') then
Result := '';
end;