Class TAmort (unit Bcalc)

Inherits from

TForm

Constructors



Functions

procedure About1Click(Sender: TObject);

If we have reached this point then we have four valid numeric values

procedure amtintExit(Sender: TObject);


procedure amtLoanamtExit(Sender: TObject);


procedure amtnumyrsExit(Sender: TObject);

If we have reached this point then we have four valid numeric values

procedure amtppyrExit(Sender: TObject);


procedure calcamt;


procedure ExitItemClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure Notes1Click(Sender: TObject);


procedure OpenItemClick(Sender: TObject);


procedure SaveItemClick(Sender: TObject);


procedure ShowHint(Sender: TObject);


procedure ViewAmortClick(Sender: TObject);


Properties

Events

Variables

About1 : TMenuItem;


amortgrid : TStringGrid;


amtint : TEdit;


amtLoanamt : TEdit;


amtnumyrs : TEdit;


amtppyr : TEdit;


ExitItem : TMenuItem;


FileMenu : TMenuItem;


Help1 : TMenuItem;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


MainMenu : TMainMenu;


Memo1 : TMemo;


N1 : TMenuItem;


Notes1 : TMenuItem;


OpenDialog : TOpenDialog;


Panel1 : TPanel;


Panel2 : TPanel;


Panel3 : TPanel;


SaveDialog : TSaveDialog;


SaveItem : TMenuItem;


StatusBar : TStatusBar;


TabbedNotebook1 : TTabbedNotebook;


totalfld : TEdit;


ViewAmort : TMenuItem;


ViewMenu : TMenuItem;



Constructors


Functions


procedure About1Click(Sender: TObject);

If we have reached this point then we have four valid numeric values


procedure amtintExit(Sender: TObject);


procedure amtLoanamtExit(Sender: TObject);


procedure amtnumyrsExit(Sender: TObject);

If we have reached this point then we have four valid numeric values


procedure amtppyrExit(Sender: TObject);


procedure calcamt;


procedure ExitItemClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure Notes1Click(Sender: TObject);


procedure OpenItemClick(Sender: TObject);


procedure SaveItemClick(Sender: TObject);


procedure ShowHint(Sender: TObject);


procedure ViewAmortClick(Sender: TObject);


Properties


Events


Variables


About1 : TMenuItem;


amortgrid : TStringGrid;


amtint : TEdit;


amtLoanamt : TEdit;


amtnumyrs : TEdit;


amtppyr : TEdit;


ExitItem : TMenuItem;


FileMenu : TMenuItem;


Help1 : TMenuItem;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


MainMenu : TMainMenu;


Memo1 : TMemo;


N1 : TMenuItem;


Notes1 : TMenuItem;


OpenDialog : TOpenDialog;


Panel1 : TPanel;


Panel2 : TPanel;


Panel3 : TPanel;


SaveDialog : TSaveDialog;


SaveItem : TMenuItem;


StatusBar : TStatusBar;


TabbedNotebook1 : TTabbedNotebook;


totalfld : TEdit;


ViewAmort : TMenuItem;


ViewMenu : TMenuItem;