Scripter7.1 Library Browser access violation error

BIZ TMS Scripter
1
  1. Project contain class TBcd. 
    2. Open IDE, go to View/Library Browser.
    3. Access violation error... ocured in module fLibraryBrowser.pas line 263.

    Resolution:
    Lines 260-275 



if AClass.ClassRef = TObject then
      Result := false
    else
    if AClass.ClassRef.InheritsFrom(TatInternalObject) then
      Result := false
    else
    if AClass.ClassRef.InheritsFrom(TatScripterLibrary) then
      Result := false
    else
    if (AClass.ClassRef = TScriptBaseObject) or (AClass.ClassRef = Scripter.ScriptBaseObjectClass) then
      Result := false
    else
    if (AClass.ClassRef = Scripter.ScriptFormClass) then
      Result := false;

replace to:



if assigned(AClass.ClassRef)then
  begin
    if AClass.ClassRef = TObject then
      Result := false
    else
    if AClass.ClassRef.InheritsFrom(TatInternalObject) then
      Result := false
    else
    if AClass.ClassRef.InheritsFrom(TatScripterLibrary) then
      Result := false
    else
    if (AClass.ClassRef = TScriptBaseObject) or (AClass.ClassRef = Scripter.ScriptBaseObjectClass) then
      Result := false
    else
    if (AClass.ClassRef = Scripter.ScriptFormClass) then
      Result := false;
  end;

Then rebuild package TMSScripter_IDE.
2

Thank you for the catch we have released a fix in 7.1.1 version.Wagner Landgraf2016-02-24 02:42:46