home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Logiciels PC 26
/
LogicielsPC_26.iso
/
Accuses
/
Nouveau
/
PandaMoney
/
_SETUP.1
/
financing.exe
/
0
/
RCDATA
/
TMODIFYFORM
/
TMODIFYFORM.txt
Wrap
Text File
|
1999-09-06
|
15KB
|
572 lines
object ModifyForm: TModifyForm
Left = 202
Top = 129
BorderIcons = [biMinimize]
BorderStyle = bsSingle
Caption = 'Modify'
ClientHeight = 231
ClientWidth = 443
Color = clBtnFace
Constraints.MaxHeight = 258
Constraints.MaxWidth = 451
Constraints.MinHeight = 258
Constraints.MinWidth = 451
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnActivate = FormActivate
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object ControlPanel: TPanel
Left = 0
Top = 0
Width = 443
Height = 231
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object LLastBalance: TLabel
Left = 8
Top = 31
Width = 126
Height = 16
Caption = 'Last Balance ...............'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object LDate: TLabel
Left = 8
Top = 53
Width = 131
Height = 16
Caption = 'Date..................................'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object LAccountType: TLabel
Left = 8
Top = 77
Width = 131
Height = 16
Caption = 'Account Type................'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object LDescription: TLabel
Left = 8
Top = 101
Width = 131
Height = 16
Caption = 'Description.....................'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object AFForm_Btn: TSpeedButton
Left = 142
Top = 99
Width = 21
Height = 21
Hint = 'Call AutoFill Form'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
3333333373FF7333333333333000333333333333377733333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
ParentFont = False
ParentShowHint = False
ShowHint = True
OnClick = AFForm_BtnClick
end
object LExpenses: TLabel
Left = 8
Top = 125
Width = 132
Height = 16
Caption = 'Amount ............................'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object BtNewBalance: TSpeedButton
Left = 4
Top = 147
Width = 91
Height = 21
Caption = 'New Balance'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = BtNewBalanceClick
end
object LRemark: TLabel
Left = 10
Top = 173
Width = 130
Height = 16
Caption = 'Remarks ........................'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object WithdrawBevel: TBevel
Left = 12
Top = 197
Width = 423
Height = 3
Style = bsRaised
end
object TBSave: TSpeedButton
Left = 280
Top = 205
Width = 73
Height = 21
Caption = 'Save'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = TBSaveClick
end
object TBClose: TSpeedButton
Left = 361
Top = 205
Width = 69
Height = 21
Caption = 'Close'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = TBCloseClick
end
object DepositSpeedButton: TSpeedButton
Left = 284
Top = 29
Width = 73
Height = 20
Caption = 'Deposit'
Flat = True
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
Margin = 25
ParentFont = False
OnClick = DepositSpeedButtonClick
end
object WithdrawSpeedButton: TSpeedButton
Left = 358
Top = 29
Width = 74
Height = 20
Caption = ' Withdraw'
Flat = True
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
Margin = 20
ParentFont = False
OnClick = WithdrawSpeedButtonClick
end
object DotLabel: TLabel
Left = 95
Top = 150
Width = 45
Height = 16
Caption = '...............'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object AMForm_Btn: TSpeedButton
Left = 142
Top = 76
Width = 21
Height = 21
Hint = 'Edit bank accounts'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
55555575555555775F55509999999901055557F55555557F75F5001111111101
105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
01105777F555557F75F75500FFFFFF0FF0105577F555FF7F57575550FF700008
8F0055575FF7777555775555000888888F005555777FFFFFFF77555550000000
0F055555577777777F7F555550FFFFFF0F05555557F5FFF57F7F555550F000FF
0005555557F777557775555550FFFFFF0555555557F555FF7F55555550FF7000
05555555575FF777755555555500055555555555557775555555}
NumGlyphs = 2
ParentFont = False
ParentShowHint = False
ShowHint = True
OnClick = AMForm_BtnClick
end
object LLastBalanceShow: TPanel
Left = 142
Top = 29
Width = 137
Height = 19
BevelInner = bvLowered
BevelOuter = bvNone
Caption = '0.0'
Color = 12579047
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 0
end
object TimePicker: TDateTimePicker
Left = 142
Top = 51
Width = 291
Height = 21
CalAlignment = dtaLeft
Date = 35826.451703587960000000
Time = 35826.451703587960000000
Color = 12579047
DateFormat = dfLong
DateMode = dmComboBox
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Kind = dtkDate
ParseInput = False
ParentFont = False
TabOrder = 3
OnKeyPress = TimePickerKeyPress
end
object EAccoType: TComboBox
Left = 166
Top = 75
Width = 267
Height = 21
Style = csDropDownList
Color = 12579047
ItemHeight = 13
Items.Strings = (
'Checking'
'Saving'
'Credit Card'
'Other'
'Unknown')
MaxLength = 100
TabOrder = 4
OnKeyPress = EAccoTypeKeyPress
end
object EDescript: TComboBox
Left = 164
Top = 99
Width = 269
Height = 21
Color = 12579047
ItemHeight = 13
MaxLength = 100
TabOrder = 5
Text = 'EDescript'
OnKeyPress = EDescriptKeyPress
end
object EAmount: TEdit
Tag = 2
Left = 142
Top = 123
Width = 291
Height = 21
CharCase = ecUpperCase
Color = 12579047
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 12
ParentFont = False
TabOrder = 6
Text = '0.0'
OnChange = EAmountChange
OnKeyPress = EAmountKeyPress
end
object EBalance: TEdit
Tag = 3
Left = 142
Top = 147
Width = 291
Height = 21
Color = 12579047
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = 'Float'
ParentFont = False
ReadOnly = True
TabOrder = 7
Text = '0.0'
OnKeyPress = EBalanceKeyPress
end
object ERemark: TEdit
Left = 142
Top = 171
Width = 291
Height = 21
Color = 12579047
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 50
ParentFont = False
TabOrder = 8
Text = 'ERemark'
OnKeyPress = ERemarkKeyPress
end
object DepositRadio: TRadioButton
Left = 287
Top = 33
Width = 15
Height = 14
Color = clInactiveCaptionText
ParentColor = False
TabOrder = 1
OnClick = DepositRadioClick
end
object WithdrawRadio: TRadioButton
Left = 363
Top = 33
Width = 14
Height = 14
Caption = 'WithdrawRadio'
TabOrder = 2
OnClick = WithdrawRadioClick
end
object CalculatorPanel: TPanel
Left = 142
Top = 143
Width = 121
Height = 52
BevelInner = bvLowered
BorderWidth = 3
Caption = 'CalculatorPanel'
TabOrder = 9
Visible = False
object LCDPanel: TPanel
Left = 5
Top = 5
Width = 111
Height = 20
Align = alBottom
BevelOuter = bvNone
BorderWidth = 3
Caption = '0.0'
Color = clNavy
Font.Charset = DEFAULT_CHARSET
Font.Color = clYellow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object ClearBtn: TSpeedButton
Left = 0
Top = 0
Width = 111
Height = 20
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Layout = blGlyphBottom
ParentFont = False
OnClick = ClearBtnClick
end
end
object KeysPanel: TPanel
Left = 5
Top = 25
Width = 111
Height = 22
Align = alBottom
TabOrder = 1
object PlusBtn: TSpeedButton
Left = 2
Top = 2
Width = 18
Height = 18
Caption = '+'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Layout = blGlyphBottom
ParentFont = False
OnClick = PlusBtnClick
end
object MinusBtn: TSpeedButton
Left = 22
Top = 2
Width = 18
Height = 18
Caption = '-'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Layout = blGlyphBottom
ParentFont = False
OnClick = MinusBtnClick
end
object MultiplyBtn: TSpeedButton
Left = 42
Top = 2
Width = 18
Height = 18
Caption = 'x'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Layout = blGlyphBottom
ParentFont = False
OnClick = MultiplyBtnClick
end
object DevideBtn: TSpeedButton
Left = 62
Top = 2
Width = 18
Height = 18
Caption = '/'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Layout = blGlyphBottom
ParentFont = False
OnClick = DevideBtnClick
end
object OKBtn: TSpeedButton
Left = 82
Top = 2
Width = 27
Height = 18
Caption = 'OK'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Layout = blGlyphBottom
ParentFont = False
OnClick = OKBtnClick
end
end
end
object TipPanel: TPanel
Left = 9
Top = 2
Width = 423
Height = 21
Alignment = taLeftJustify
BevelInner = bvSpace
BevelOuter = bvNone
Caption =
' Tip: PandaMoney recommends you to use Enter key instead of T' +
'AB.'
Color = clNavy
Font.Charset = ANSI_CHARSET
Font.Color = clYellow
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 10
end
end
end