TBrowserInfoList

type TBrowserInfoList = class(TList)

protected

  procedure SetBrowserIsClosing();

  function GetBrowserIsClosing();

  function GetBrowserIsValid();

  function GetBrowser();

  function GetFirstBrowser;

  function GetFirstID;

public

  destructor Destroy; override;

  function AddBrowser();

  function RemoveBrowser();

  function SearchBrowser();

  procedure FreeAndClearAllItems;

  procedure CloseAllBrowsers;

  property BrowserIsClosing []: Boolean; [rw]

  property BrowserIsValid []: Boolean; [r]

  property Browser []: ICefBrowser; [r]

  property FirstBrowser: ICefBrowser; [r]

  property FirstID: Integer; [r]

end;

TBrowserInfoList

TObject