Class TFormulaLibMan (unit FCLibMan)

Inherits from

TForm

TFormulaLibMan - dialog window which allows the user } { manage library contents

Constructors


constructor Create(AOwner: TComponent);



Functions

procedure AddBtnClick(Sender: TObject);

Add new entry

procedure DelBtnClick(Sender: TObject);

delete current entry

procedure EditBtnClick(Sender: TObject);

Edit current entry

procedure NotebookChange(Sender: TObject; NewTab: Integer; var AllowChange: Boolean);

actual delete

function Edit(ALib: TFormulaLib; Index: Integer): Boolean;

edit library ALib } { Index = 0 - show user functions at startup } { Index = 1 - show user aliases at startup

procedure UpdateList(Page: Integer);

UpdateList refresh List: TListBox to show aliases of function

Properties

Events

Variables

AddBtn : TBitBtn;


CancelBtn : TButton;


DelBtn : TBitBtn;


EditBtn : TBitBtn;


List : TListBox;

depending on NoteBook.

Notebook : TTabbedNotebook;


OkBtn : TButton;


Lib : TFormulaLib;

user function and aliases library to edit


Constructors


constructor Create(AOwner: TComponent);


Functions


procedure AddBtnClick(Sender: TObject);

Add new entry


procedure DelBtnClick(Sender: TObject);

delete current entry


procedure EditBtnClick(Sender: TObject);

Edit current entry


procedure NotebookChange(Sender: TObject; NewTab: Integer; var AllowChange: Boolean);

actual delete


function Edit(ALib: TFormulaLib; Index: Integer): Boolean;

edit library ALib } { Index = 0 - show user functions at startup } { Index = 1 - show user aliases at startup


procedure UpdateList(Page: Integer);

UpdateList refresh List: TListBox to show aliases of function


Properties


Events


Variables


AddBtn : TBitBtn;


CancelBtn : TButton;


DelBtn : TBitBtn;


EditBtn : TBitBtn;


List : TListBox;

depending on NoteBook.PageIndex List shows aliales or functions } { from the Lib


Notebook : TTabbedNotebook;


OkBtn : TButton;


Lib : TFormulaLib;

user function and aliases library to edit