| Class TEditFAM (unit Isifam) |
TForm
| Constructors |
| Functions |
procedure BitBtn1Click(Sender: TObject);
procedure BukaFAMClick(Sender: TObject);
procedure ComboBox1Change(Sender: TObject);
procedure FAMSelectCell(Sender: TObject; Col, Row: Longint;
var CanSelect: Boolean);
procedure FormActivate(Sender: TObject);
procedure OKClick(Sender: TObject);
procedure SimpanFAM1Click(Sender: TObject);
procedure Popupitemclick;| Properties |
| Events |
| Variables |
BitBtn1 : TBitBtn;
BitBtn2 : TBitBtn;
BukaFAM : TBitBtn;
BukaFAM1 : TOpenDialog;
ComboBox1 : TComboBox;
FAM : TStringGrid;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
NamaFile : TPanel;
NB1 : TMenuItem;
NM1 : TMenuItem;
NS1 : TMenuItem;
OK : TBitBtn;
PB1 : TMenuItem;
PM1 : TMenuItem;
PopupMenu1 : TPopupMenu;
PS1 : TMenuItem;
SimpanFAM : TSaveDialog;
SimpanFAM1 : TBitBtn;
ZE1 : TMenuItem;| Constructors |
| Functions |
procedure BitBtn1Click(Sender: TObject);
procedure BukaFAMClick(Sender: TObject);
procedure ComboBox1Change(Sender: TObject);
procedure FAMSelectCell(Sender: TObject; Col, Row: Longint;
var CanSelect: Boolean);
procedure FormActivate(Sender: TObject);
procedure OKClick(Sender: TObject);
procedure SimpanFAM1Click(Sender: TObject);
procedure Popupitemclick;Private declarations
| Properties |
| Events |
| Variables |
BitBtn1 : TBitBtn;
BitBtn2 : TBitBtn;
BukaFAM : TBitBtn;
BukaFAM1 : TOpenDialog;
ComboBox1 : TComboBox;
FAM : TStringGrid;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
NamaFile : TPanel;
NB1 : TMenuItem;
NM1 : TMenuItem;
NS1 : TMenuItem;
OK : TBitBtn;
PB1 : TMenuItem;
PM1 : TMenuItem;
PopupMenu1 : TPopupMenu;
PS1 : TMenuItem;
SimpanFAM : TSaveDialog;
SimpanFAM1 : TBitBtn;
ZE1 : TMenuItem;