| Class TForm1 (unit dbread) |
TForm
| Constructors |
| Functions |
procedure Button1Click(Sender: TObject);| Properties |
| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;| Constructors |
| Functions |
procedure Button1Click(Sender: TObject);AirliftRecType = record { Record of airlift exceptions } SupplyType : AirliftTypeE; { Either FUEL or CARGO } Base : BaseTypeE; { One of the three airbases } WeaponItem : WpnTypeE; { Weapon type if exception is weapon } SupplyItem : BAssetsTypeE; { Base asset } Quantity : longint; { Quantity not airlifted } end;
| Properties |
| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;