Class TFormPropsDlg (unit PresrDsn)

Inherits from

TForm

TFormPropsDlg

Constructors



Functions

procedure AddButtonClick(Sender: TObject);


procedure ClearButtonClick(Sender: TObject);


procedure DeleteButtonClick(Sender: TObject);


procedure DownBtnClick(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure ListClick(Sender: TObject);


procedure PropertiesListDblClick(Sender: TObject);


procedure StoredListClick(Sender: TObject);


procedure StoredListDragDrop(Sender, Source: TObject; X, Y: Integer);


procedure StoredListDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);


procedure UpBtnClick(Sender: TObject);


procedure AddItem(IdxComp, IdxProp: Integer; AUpdate: Boolean);


procedure BuildLists(StoredProps: TStrings);


procedure CheckAddItem(const CompName, PropName: string);


procedure CheckButtons;


procedure ClearLists;


procedure DeleteProp(I: Integer);


function FindProp(const CompName, PropName: string; var IdxComp, IdxProp: Integer): Boolean;

I := ComponentsList.

procedure ListToIndex(List: TCustomListBox; Idx: Integer);

TFormPropsDlg

procedure SetStoredList(AList: TStrings);


procedure UpdateCurrent;


Properties

Events

Variables

ActiveCtrlBox : TCheckBox;


AddButton : TButton;


Bevel1 : TBevel;


CancelBtn : TButton;


ClearButton : TButton;


ComponentsList : TTextListBox;


DeleteButton : TButton;


DownBtn : TSpeedButton;


FormBox : TGroupBox;


Label2 : TLabel;


Label30 : TLabel;


Label31 : TLabel;


OkBtn : TButton;


PositionBox : TCheckBox;


PropertiesList : TTextListBox;


StateBox : TCheckBox;


StoredList : TTextListBox;


UpBtn : TSpeedButton;


FCompOwner : TComponent;

Private declarations

FDesigner : TDesigner;



Constructors


Functions


procedure AddButtonClick(Sender: TObject);


procedure ClearButtonClick(Sender: TObject);


procedure DeleteButtonClick(Sender: TObject);


procedure DownBtnClick(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure ListClick(Sender: TObject);


procedure PropertiesListDblClick(Sender: TObject);


procedure StoredListClick(Sender: TObject);


procedure StoredListDragDrop(Sender, Source: TObject; X, Y: Integer);


procedure StoredListDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);


procedure UpBtnClick(Sender: TObject);


procedure AddItem(IdxComp, IdxProp: Integer; AUpdate: Boolean);


procedure BuildLists(StoredProps: TStrings);


procedure CheckAddItem(const CompName, PropName: string);


procedure CheckButtons;


procedure ClearLists;


procedure DeleteProp(I: Integer);


function FindProp(const CompName, PropName: string; var IdxComp, IdxProp: Integer): Boolean;

I := ComponentsList.ItemIndex;


procedure ListToIndex(List: TCustomListBox; Idx: Integer);

TFormPropsDlg


procedure SetStoredList(AList: TStrings);


procedure UpdateCurrent;


Properties


Events


Variables


ActiveCtrlBox : TCheckBox;


AddButton : TButton;


Bevel1 : TBevel;


CancelBtn : TButton;


ClearButton : TButton;


ComponentsList : TTextListBox;


DeleteButton : TButton;


DownBtn : TSpeedButton;


FormBox : TGroupBox;


Label2 : TLabel;


Label30 : TLabel;


Label31 : TLabel;


OkBtn : TButton;


PositionBox : TCheckBox;


PropertiesList : TTextListBox;


StateBox : TCheckBox;


StoredList : TTextListBox;


UpBtn : TSpeedButton;


FCompOwner : TComponent;

Private declarations


FDesigner : TDesigner;