home *** CD-ROM | disk | FTP | other *** search
- object FinanceDlg: TFinanceDlg
- Left = 301
- Top = 191
- BorderIcons = [biMinimize]
- BorderStyle = bsDialog
- Caption = 'Finances'
- ClientHeight = 140
- ClientWidth = 239
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object CashLabel: TLabel
- Left = 8
- Top = 12
- Width = 24
- Height = 13
- Caption = 'Cash'
- end
- object BankLabel: TLabel
- Left = 8
- Top = 44
- Width = 25
- Height = 13
- Caption = 'Bank'
- end
- object DebtLabel: TLabel
- Left = 8
- Top = 76
- Width = 23
- Height = 13
- Caption = 'Debt'
- end
- object Image1: TImage
- Left = 8
- Top = 112
- Width = 32
- Height = 21
- AutoSize = True
- Picture.Data = {<image000.bmp>}
- Transparent = True
- end
- object OKBtn: TButton
- Left = 80
- Top = 112
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- end
- object BDCash: TEdit
- Left = 48
- Top = 8
- Width = 97
- Height = 21
- ReadOnly = True
- TabOrder = 1
- end
- object BDBank: TEdit
- Left = 48
- Top = 40
- Width = 97
- Height = 21
- ReadOnly = True
- TabOrder = 2
- end
- object BDDebt: TEdit
- Left = 48
- Top = 72
- Width = 97
- Height = 21
- ReadOnly = True
- TabOrder = 3
- end
- object DepositBtn: TBitBtn
- Left = 160
- Top = 8
- Width = 75
- Height = 25
- Caption = 'Deposit'
- TabOrder = 4
- OnClick = DepositBtnClick
- end
- object WithdrawBtn: TBitBtn
- Left = 160
- Top = 40
- Width = 75
- Height = 25
- Caption = 'Withdraw'
- TabOrder = 5
- OnClick = WithdrawBtnClick
- end
- object PayloanBtn: TBitBtn
- Left = 160
- Top = 72
- Width = 75
- Height = 25
- Caption = 'Pay loan'
- TabOrder = 6
- OnClick = PayloanBtnClick
- end
- object CAncelBtn: TButton
- Left = 160
- Top = 112
- Width = 75
- Height = 25
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 7
- end
- end
-