tcomponent

type tcomponent = class(tpersistent)

public

  procedure WriteState(); virtual;

  constructor Create(); virtual;

  destructor Destroy; override;

  procedure BeforeDestruction; override;

  procedure DestroyComponents;

  procedure Destroying;

  function ExecuteAction(); dynamic;

  function FindComponent();

  function findtagcomponent();

  procedure FreeNotification();

  procedure RemoveFreeNotification();

  procedure FreeOnRelease;

  function GetNamePath; override;

  function GetParentComponent; dynamic;

  function HasParent; dynamic;

  procedure InsertComponent();

  procedure RemoveComponent();

  function SafeCallException(); override;

  procedure SetSubComponent();

  function UpdateAction(); dynamic;

  property Components []: tcomponent; [r]

  property ComponentCount: Integer; [r]

  property ComponentIndex: Integer; [rw]

  property ComponentState: TComponentState; [r]

  property ComponentStyle: TComponentStyle; [r]

  property DesignInfo: LongInt; [rw]

  property Owner: tcomponent; [r]

  property VCLComObject: Pointer; [rw]

  property tagpo: pointer; [rw]

published

  property Name: TComponentName; [rws]

  property Tag: PtrInt; [rw]

end;

tcomponent

tpersistent

TObject