| Class Tfm_BaseCount (unit fm_BaseCount1) |
TForm
| Constructors |
| Functions |
procedure bt_OKClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure tx_BaseChange(Sender: TObject);| Properties |
| Events |
| Variables |
bt_Cancel : TButton;
bt_OK : TButton;
Label1 : TLabel;
Label2 : TLabel;
tx_Base : TEdit;
tx_Count : TEdit;
LastBase : integer;
LastCount : integer;| Constructors |
| Functions |
procedure bt_OKClick(Sender: TObject);------------------------------------------------------
procedure FormClose(Sender: TObject; var Action: TCloseAction);------------------------------------------------------
procedure FormCreate(Sender: TObject);------------------------------------------------------
procedure FormShow(Sender: TObject);------------------------------------------------------
procedure tx_BaseChange(Sender: TObject);------------------------------------------------------
| Properties |
| Events |
| Variables |
bt_Cancel : TButton;
bt_OK : TButton;
Label1 : TLabel;
Label2 : TLabel;
tx_Base : TEdit;
tx_Count : TEdit;
LastBase : integer;Public declarations
LastCount : integer;