You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

476 lines
16 KiB
Plaintext

11 months ago
object frm_ch_invoice_add: Tfrm_ch_invoice_add
Left = 527
Top = 397
BorderIcons = []
BorderStyle = bsDialog
Caption = #28155#21152#21457#31080
ClientHeight = 208
ClientWidth = 283
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Label48: TLabel
Left = 4
Top = 34
Width = 48
Height = 12
Caption = #21457#31080#24065#21035
Transparent = True
end
object Label63: TLabel
Left = 4
Top = 58
Width = 48
Height = 12
Caption = #23458#25143#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Transparent = True
end
object Label1: TLabel
Left = 4
Top = 10
Width = 48
Height = 12
Caption = #21457#31080#21495#30721
Transparent = True
end
object Label2: TLabel
Left = 4
Top = 81
Width = 48
Height = 12
Caption = #20998#37096#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Transparent = True
end
object Label3: TLabel
Left = 8
Top = 104
Width = 24
Height = 12
Caption = #22791#27880
end
object Edit2: TEdit
Left = 56
Top = 54
Width = 178
Height = 20
ImeName = #35895#27468#25340#38899#36755#20837#27861' 2'
ReadOnly = True
TabOrder = 9
Visible = False
end
object wwDBLookupCombo6: TwwDBLookupCombo
Left = 56
Top = 30
Width = 197
Height = 20
DropDownAlignment = taLeftJustify
Selected.Strings = (
#24065#21035#9'3'#9#24065#21035#9'F'#9
#20013#25991#21517#9'20'#9#20013#25991#21517#9'F'#9)
LookupTable = frm_data_share.t_code_currency
LookupField = #24065#21035
Color = clWhite
ImeName = #35895#27468#25340#38899#36755#20837#27861' 2'
TabOrder = 1
AutoDropDown = True
ShowButton = True
PreciseEditRegion = False
AllowClearKey = False
ShowMatchText = True
end
object RxDBLookupCombo3: TRxDBLookupCombo
Left = 56
Top = 54
Width = 197
Height = 20
DropDownCount = 20
DropDownWidth = 200
DisplayAllFields = True
Color = clWhite
DisplayEmpty = '<'#26080'>'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ImeName = #35895#27468#25340#38899#36755#20837#27861' 2'
LookupField = #23458#25143#31616#31216
LookupDisplay = #20195#30721';'#23458#25143#31616#31216
LookupSource = frm_data_share.t_crm_client_all1
ParentFont = False
TabOrder = 2
end
object Edit1: TEdit
Left = 56
Top = 6
Width = 197
Height = 20
ImeName = #35895#27468#25340#38899#36755#20837#27861' 2'
TabOrder = 0
OnKeyPress = Edit1KeyPress
end
object bsSkinCheckRadioBox7: TbsSkinCheckRadioBox
Left = 25
Top = 144
Width = 68
Height = 25
TabOrder = 4
SkinData = frm_main.bsSkinData1
SkinDataName = 'radiobox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
Flat = False
CanFocused = False
Radio = True
Checked = True
GroupIndex = 1
Caption = #31354#30333
end
object bsSkinCheckRadioBox8: TbsSkinCheckRadioBox
Left = 105
Top = 144
Width = 68
Height = 25
TabOrder = 5
SkinData = frm_main.bsSkinData1
SkinDataName = 'radiobox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
Flat = False
CanFocused = False
Radio = True
Checked = False
GroupIndex = 1
Caption = #22797#21046
end
object bsSkinCheckRadioBox1: TbsSkinCheckRadioBox
Left = 185
Top = 144
Width = 73
Height = 25
TabOrder = 6
SkinData = frm_main.bsSkinData1
SkinDataName = 'radiobox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
Flat = False
CanFocused = False
Radio = True
Checked = False
GroupIndex = 1
Caption = #30003#35831#21457#31080
end
object bsSkinButton1: TbsSkinButton
Left = 57
Top = 171
Width = 75
Height = 25
TabOrder = 7
SkinData = frm_main.bsSkinData1
SkinDataName = 'button'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
RepeatMode = False
RepeatInterval = 100
AllowAllUp = False
TabStop = True
CanFocused = True
Down = False
GroupIndex = 0
Caption = #30830#23450#28155#21152
Glyph.Data = {
36060000424D3606000000000000360400002800000020000000100000000100
08000000000000020000C40E0000C40E0000000100000000000000000000FFFF
FF00FF00FF00491F3F00761E0700811E00007F1E01005FFEFF007FFEFF0083FA
FB0092FFFF0093FFFF0098FFFF0099FFFF00A0FFFF00B7FFFF00C6FFFF00DCFF
FF00F0FFFF00FBFFFF0073FAFE0078FBFE0089FBFE009FFBFE0054F6FF0057F7
FE0068F6FF00A3F3FF00A7E9F3003FE3FE00EDFAFC0030C9E900B6F2FF0031B5
D30054DEFF0074E0F800DAF8FF00E5FAFF0012CBFE0020CEFE001CAAD30048CF
F20030B0DA000791C5000788BC00108BBC000386C1000274A9000479AF00058B
C70003689A0005669500086B9A000268A300F8FAFE00A5B6FC00AABAFC00CAD4
FE00DCE3FE00EAEEFE00284BFB003557FB003859FB003C5CFB003F5FFB006480
FB00758EFC008097FC00CED7FE000C2EFA002B4DFB00011FFA000120FA00092A
FA00111FB800FEFEFE0000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000020202020202
0505050505050505020201010101010101010101010101010101020233333333
054B4B4B42374B05020201010101010101010101010101010101022F1F262722
054B364147404B050202010101010101010101010101010101012F141D262722
053946473C4844050202010101010101010101010101010101012F141D262722
053E49383B453D060202010101010101010101010101010101012F141D262722
053A444B4B4347030202010101010101010101010101010101012F171B202425
054B4B4B4B4B3F470202010101010101010101010101010101012F1C282B2C2D
050505050505044A4702010101010101010101010101010101012F211D262722
232A3532020202024747010101010101010101010101010101012F141D262722
232A2E33020202020247010101010101010101010101010101012F141D262722
232A2E33020202020202010101010101010101010101010101012F141D262722
232A2E33020202020202010101010101010101010101010101012F151A180708
16293133020202020202010101010101010101010101010101012F1312100E0C
0C0B19330202020202020101010101010101010101010101010102301E110F0D
0A0934020202020202020101010101010101010101010101010102022F2F2F2F
2F2F020202020202020201010101010101010101010101010101}
NumGlyphs = 2
Spacing = 1
ModalResult = 1
OnClick = bsSkinButton1Click
end
object bsSkinButton2: TbsSkinButton
Left = 157
Top = 171
Width = 75
Height = 25
TabOrder = 8
SkinData = frm_main.bsSkinData1
SkinDataName = 'button'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
RepeatMode = False
RepeatInterval = 100
AllowAllUp = False
TabStop = True
CanFocused = True
Down = False
GroupIndex = 0
Caption = #25918#24323#36864#20986
Glyph.Data = {
36060000424D360600000000000036040000280000001F000000100000000100
08000000000000020000C40E0000C40E0000000100000000000000000000FFFF
FF00FF00FF004071FA004274FF00497AFC00275AFF002C5FFF003664FA00386B
FF00174AFD001A4CFF001B4DFF001D50FF002355FF002558FF002655FA002E5B
F9002D59F400325DF1003B66F3000030FC000132FF000134FF000C3CFF00103D
FB00103BF4001342FF001743F6001847FF001A48F9001A47F8001B46F6001D4B
FF001C47F6001D48F6001D49F600214EFC00204BF800204CF800224DF800224C
F400224DF1002550F400002CF800002DF800002CF600002AF300012DF600032B
F2000431FE000733F600123BF100143EF40000009A0000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000020202020202
0202020202020202020201010101010101010101010101010100020202020202
0202020202020202020201010101010101010101010101010100020202363602
02020202023636020202010101010101010101010101010101000202360A1A36
02020202362C15360202010101010101010101010101010101000202361F0B34
3602023630162F3602020101010101010101010101010101010002020236220C
3536362D17313602020201010101010101010101010101010100020202023623
0D1932162E360202020201010101010101010101010101010100020202020236
1E1B183336020202020201010101010101010101010101010100020202020236
25211D1C36020202020201010101010101010101010101010100020202023611
0728260E20360202020201010101010101010101010101010100020202360809
123636290F243602020201010101010101010101010101010100020236030413
360202362A062736020201010101010101010101010101010100020236051436
02020202362B1036020201010101010101010101010101010100020202363602
0202020202363602020201010101010101010101010101010100020202020202
0202020202020202020201010101010101010101010101010100020202020202
0202020202020202020201010101010101010101010101010100}
NumGlyphs = 2
Spacing = 1
ModalResult = 2
OnClick = bsSkinButton2Click
end
object RxDBLookupCombo1: TRxDBLookupCombo
Left = 56
Top = 77
Width = 97
Height = 20
DropDownCount = 20
DropDownWidth = 200
DisplayAllFields = True
Color = clWhite
DisplayEmpty = '<'#26080'>'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ImeName = #35895#27468#25340#38899#36755#20837#27861' 2'
LookupField = #20998#37096#21517#31216
LookupDisplay = #20998#37096#21517#31216
LookupSource = frm_data_share.t_code_subcomp1
ParentFont = False
TabOrder = 3
end
object bsSkinCheckRadioBox2: TbsSkinCheckRadioBox
Left = 157
Top = 77
Width = 112
Height = 25
TabOrder = 10
Visible = False
SkinData = frm_main.bsSkinData1
SkinDataName = 'radiobox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
Flat = False
CanFocused = False
Radio = True
Checked = False
GroupIndex = 0
Caption = #21516#26102#29983#25104#21040#31246#25511
end
object Memo1: TMemo
Left = 35
Top = 103
Width = 217
Height = 30
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
Lines.Strings = (
'Memo1')
TabOrder = 11
end
object bsBusinessSkinForm1: TbsBusinessSkinForm
UseSkinFontInMenu = True
ShowIcon = False
MaximizeOnFullScreen = False
AlphaBlend = False
AlphaBlendAnimation = False
AlphaBlendValue = 100
ShowObjectHint = False
MenusAlphaBlend = False
MenusAlphaBlendAnimation = False
MenusAlphaBlendValue = 0
DefCaptionFont.Charset = GB2312_CHARSET
DefCaptionFont.Color = clBtnText
DefCaptionFont.Height = -12
DefCaptionFont.Name = #23435#20307
DefCaptionFont.Style = []
DefInActiveCaptionFont.Charset = GB2312_CHARSET
DefInActiveCaptionFont.Color = clBtnShadow
DefInActiveCaptionFont.Height = -12
DefInActiveCaptionFont.Name = #23435#20307
DefInActiveCaptionFont.Style = []
DefMenuItemHeight = 20
DefMenuItemFont.Charset = GB2312_CHARSET
DefMenuItemFont.Color = clWindowText
DefMenuItemFont.Height = -12
DefMenuItemFont.Name = #23435#20307
DefMenuItemFont.Style = []
UseDefaultSysMenu = True
SkinData = frm_main.bsSkinData1
MinHeight = 0
MinWidth = 0
Magnetic = False
MagneticSize = 10
BorderIcons = [biMinimize]
Left = 360
Top = 44
end
object p_invoice_no: TADOStoredProc
Connection = frm_main.db
ProcedureName = 'p_invoice_no;1'
Parameters = <
item
Name = '@RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = Null
end
item
Name = 'inv_no'
Attributes = [paNullable]
DataType = ftString
Direction = pdInputOutput
Size = 20
Value = Null
end>
Left = 104
end
end