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.

395 lines
9.0 KiB
Plaintext

object frm_check_modify: Tfrm_check_modify
Left = 642
Top = 384
BorderIcons = []
BorderStyle = bsDialog
Caption = #28155#21152#22266#23450#36153#29992
ClientHeight = 186
ClientWidth = 339
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 bsSkinGroupBox2: TbsSkinGroupBox
Left = 0
Top = 0
Width = 330
Height = 140
TabOrder = 0
SkinData = frm_main.bsSkinData1
SkinDataName = 'groupbox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
AutoEnabledControls = True
CheckedMode = False
Checked = False
DefaultAlignment = taLeftJustify
DefaultCaptionHeight = 22
BorderStyle = bvFrame
CaptionMode = True
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = #36153#29992#20449#24687
object Label47: TLabel
Left = 4
Top = 28
Width = 48
Height = 12
Caption = #36153#29992#21517#31216
Transparent = True
end
object Label49: TLabel
Left = 6
Top = 50
Width = 48
Height = 12
Caption = #23458#25143#21517#31216
Transparent = True
end
object Label50: TLabel
Left = 4
Top = 74
Width = 48
Height = 12
Caption = #26631' '#20934
Transparent = True
end
object Label51: TLabel
Left = 158
Top = 73
Width = 48
Height = 12
Caption = #21333' '#20215
Transparent = True
end
object Label52: TLabel
Left = 5
Top = 98
Width = 48
Height = 12
Caption = #25968' '#37327
Transparent = True
end
object Label53: TLabel
Left = 159
Top = 97
Width = 48
Height = 12
Caption = #37329' '#39069
Transparent = True
end
object Label54: TLabel
Left = 4
Top = 120
Width = 48
Height = 12
Caption = #24065' '#21035
Transparent = True
end
object Label55: TLabel
Left = 159
Top = 120
Width = 48
Height = 12
Caption = #27719' '#29575
Transparent = True
end
object wwDBLookupCombo4: TwwDBLookupCombo
Left = 54
Top = 70
Width = 100
Height = 20
DropDownAlignment = taLeftJustify
Selected.Strings = (
'one'#9'10'#9'one'#9'F'#9)
DataField = #26631#20934
LookupTable = t_bz_balance
LookupField = 'two'
TabOrder = 2
AutoDropDown = True
ShowButton = True
PreciseEditRegion = False
AllowClearKey = True
ShowMatchText = True
OnChange = wwDBLookupCombo4Change
end
object wwDBLookupCombo3: TwwDBLookupCombo
Left = 54
Top = 116
Width = 100
Height = 20
DropDownAlignment = taLeftJustify
Selected.Strings = (
#24065#21035#9'3'#9#24065#21035#9#9
#20013#25991#21517#9'20'#9#20013#25991#21517#9#9)
LookupTable = frm_data_share.t_code_currency
LookupField = #24065#21035
TabOrder = 3
AutoDropDown = True
ShowButton = True
PreciseEditRegion = False
AllowClearKey = True
ShowMatchText = True
OnChange = wwDBLookupCombo3Change
end
object RxDBLookupCombo1: TRxDBLookupCombo
Left = 55
Top = 25
Width = 271
Height = 20
DropDownCount = 20
DisplayAllFields = True
Color = clWhite
DisplayEmpty = '<'#26080'>'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
LookupField = #20013#25991#21517
LookupDisplay = #20195#30721';'#20013#25991#21517
LookupSource = frm_data_share.t_code_fee1
ParentFont = False
TabOrder = 0
end
object RxDBLookupCombo2: TRxDBLookupCombo
Left = 55
Top = 46
Width = 270
Height = 20
DropDownCount = 20
DisplayAllFields = True
Color = clWhite
DataField = #23458#25143#21517#31216
DisplayEmpty = '<'#26080'>'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
LookupField = #23458#25143#31616#31216
LookupDisplay = #20195#30721';'#23458#25143#31616#31216
LookupSource = frm_data_share.t_crm_client_huodai1
ParentFont = False
TabOrder = 1
end
object Edit1: TEdit
Left = 55
Top = 95
Width = 96
Height = 20
TabOrder = 4
Text = '1'
end
object Edit2: TEdit
Left = 217
Top = 69
Width = 105
Height = 20
TabOrder = 5
Text = '1'
OnChange = Edit2Change
end
object Edit3: TEdit
Left = 217
Top = 93
Width = 107
Height = 20
TabOrder = 6
Text = '1'
end
object Edit4: TEdit
Left = 217
Top = 115
Width = 107
Height = 20
TabOrder = 7
Text = '1'
end
end
object ywlb: TEdit
Left = 48
Top = 203
Width = 121
Height = 20
TabOrder = 1
end
object chk_pay: TEdit
Left = 176
Top = 203
Width = 121
Height = 20
TabOrder = 2
end
object bsSkinButton16: TbsSkinButton
Left = 59
Top = 149
Width = 75
Height = 25
TabOrder = 3
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#35748#28155#21152
NumGlyphs = 2
Spacing = 1
ModalResult = 1
OnClick = bsSkinButton16Click
end
object bsSkinButton17: TbsSkinButton
Left = 144
Top = 149
Width = 75
Height = 25
TabOrder = 4
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 = #21462#28040
NumGlyphs = 2
Spacing = 1
ModalResult = 2
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 = 328
Top = 404
end
object table_new1: TDataSource
Left = 232
Top = 32
end
object t_bz_balance: TRxMemoryData
FieldDefs = <
item
Name = 'one'
DataType = ftString
Size = 10
end
item
Name = 'two'
DataType = ftString
Size = 10
end
item
Name = 'three'
DataType = ftFloat
end>
Left = 545
Top = 528
end
object RxMemoryData1: TRxMemoryData
FieldDefs = <
item
Name = 'one'
DataType = ftString
Size = 10
end
item
Name = 'two'
DataType = ftString
Size = 10
end
item
Name = 'three'
DataType = ftFloat
end>
Left = 545
Top = 528
end
object p_op_gain: TADOStoredProc
Connection = frm_main.db
ProcedureName = 'p_op_gain;1'
Parameters = <
item
Name = '@RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = Null
end
item
Name = '@con_no'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end>
Left = 568
Top = 56
end
end