TRSChooseOption.optionsExist throws access violation error
re: title
TRSChooseOption.optionsExist throws an access violation error something because of it's code:
Simba Code:
function TRSChooseOption.optionsExist(options: TStringArray; matchPercent: extended = 1.00): boolean;
var
opts: __TOptionArray;
i, j: integer;
begin
result := false;
if (not self.isOpen(false)) then
exit;
opts := self.__getOptions();
{a line should be added here to check that the length is indeed above 0 before starting the for loop}
for i := 0 to high(opts) do
if (isArrInStr(options, opts[i].str)) then
begin
print('TRSChooseOptions.optionsExist(): result = true');
exit(true);
end;
print('TRSChooseOptions.optionsExist(): result = false');
end;