Giter VIP home page Giter VIP logo

Comments (2)

zedxxx avatar zedxxx commented on August 18, 2024

Isn't this a bug in Delphi x64 compiler?

from toolbar2000.

zedxxx avatar zedxxx commented on August 18, 2024

The patch from this issue may help: SilverpointDev/sptbxlib#107

  TTBCustomAccObject = class(TTBBaseAccObject)
    ...
    class var AccessibilityFinalized: Boolean;
  end;

finalization
  DisconnectAccObjects;
  if NeedToUninitialize then
    CoUninitialize;
  if LastAccObject = nil then
    DeleteCriticalSection(LastAccObjectCritSect)
  else
    TTBCustomAccObject.AccessibilityFinalized  := True;

destructor TTBCustomAccObject.Destroy;
begin
  { Remove Self from linked list of objects }
  EnterCriticalSection(LastAccObjectCritSect);
  try
    if LastAccObject = Self then
      LastAccObject := FPrevious;
    if Assigned(FPrevious) then
      FPrevious.FNext := FNext;
    if Assigned(FNext) then
      FNext.FPrevious := FPrevious;
  finally
    LeaveCriticalSection(LastAccObjectCritSect);
  end;
  if AccessibilityFinalized and (LastAccObject = nil) then
    DeleteCriticalSection(LastAccObjectCritSect);
  inherited;
end;

from toolbar2000.

Related Issues (1)

Recommend Projects

  • React photo React

    A declarative, efficient, and flexible JavaScript library for building user interfaces.

  • Vue.js photo Vue.js

    🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.

  • Typescript photo Typescript

    TypeScript is a superset of JavaScript that compiles to clean JavaScript output.

  • TensorFlow photo TensorFlow

    An Open Source Machine Learning Framework for Everyone

  • Django photo Django

    The Web framework for perfectionists with deadlines.

  • D3 photo D3

    Bring data to life with SVG, Canvas and HTML. 📊📈🎉

Recommend Topics

  • javascript

    JavaScript (JS) is a lightweight interpreted programming language with first-class functions.

  • web

    Some thing interesting about web. New door for the world.

  • server

    A server is a program made to process requests and deliver data to clients.

  • Machine learning

    Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.

  • Game

    Some thing interesting about game, make everyone happy.

Recommend Org

  • Facebook photo Facebook

    We are working to build community through open source technology. NB: members must have two-factor auth.

  • Microsoft photo Microsoft

    Open source projects and samples from Microsoft.

  • Google photo Google

    Google ❤️ Open Source for everyone.

  • D3 photo D3

    Data-Driven Documents codes.