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.

478 lines
11 KiB
Plaintext

object frm_Pcd_mx: Tfrm_Pcd_mx
Left = 329
Top = 156
Width = 781
Height = 480
Caption = #27966#36710#21333
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 12
object dxDBGrid1: TdxDBGrid
Left = 0
Top = 0
Width = 353
Height = 453
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = 'LE_ID'
ShowSummaryFooter = True
SummaryGroups = <>
SummarySeparator = ', '
Align = alLeft
TabOrder = 0
Filter.Criteria = {00000000}
OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
object dxDBGrid1Column1: TdxDBGridMaskColumn
ReadOnly = True
Width = 85
BandIndex = 0
RowIndex = 0
FieldName = #20989#30005#21517#31216
SummaryFooterType = cstCount
SummaryFooterFormat = #20989#30005#25968#37327':0'
end
object dxDBGrid1HEAD_TO: TdxDBGridMaskColumn
Caption = 'TO'
ReadOnly = True
Width = 109
BandIndex = 0
RowIndex = 0
FieldName = 'HEAD_TO'
end
object dxDBGrid1Column4: TdxDBGridColumn
ReadOnly = True
Width = 47
BandIndex = 0
RowIndex = 0
FieldName = #31614#21457#20154
end
object dxDBGrid1Column5: TdxDBGridColumn
ReadOnly = True
Width = 78
BandIndex = 0
RowIndex = 0
FieldName = #31614#21457#26085#26399
end
end
object bsSkinPanel1: TbsSkinPanel
Left = 353
Top = 0
Width = 420
Height = 453
TabOrder = 1
SkinDataName = 'panel'
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 = False
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = 'bsSkinPanel1'
Align = alClient
object Label29: TLabel
Left = 29
Top = 90
Width = 48
Height = 12
Caption = #31665#22411#31665#37327
FocusControl = DBEdit14
Transparent = True
end
object Label30: TLabel
Left = 29
Top = 113
Width = 48
Height = 12
Caption = #32972#31665#22330#31449
FocusControl = DBEdit17
Transparent = True
end
object Label31: TLabel
Left = 17
Top = 136
Width = 60
Height = 12
Caption = #22330#31449#32852#31995#20154
FocusControl = DBEdit18
Transparent = True
end
object Label32: TLabel
Left = 29
Top = 159
Width = 48
Height = 12
Caption = #22330#31449#30005#35805
FocusControl = DBEdit19
Transparent = True
end
object Label33: TLabel
Left = 5
Top = 185
Width = 72
Height = 12
Caption = #35201#27714#21040#21378#26102#38388
FocusControl = DBEdit20
Transparent = True
end
object Label28: TLabel
Left = 29
Top = 206
Width = 48
Height = 12
Caption = #21378#23478#22320#22336
FocusControl = DBEdit11
Transparent = True
end
object Label34: TLabel
Left = 17
Top = 229
Width = 60
Height = 12
Caption = #21378#23478#32852#31995#20154
FocusControl = DBEdit21
Transparent = True
end
object Label35: TLabel
Left = 5
Top = 251
Width = 72
Height = 12
Caption = #21378#23478#32852#31995#30005#35805
FocusControl = DBEdit22
Transparent = True
end
object Label36: TLabel
Left = 29
Top = 274
Width = 48
Height = 12
Caption = #36820#31665#22320#22336
FocusControl = DBEdit23
Transparent = True
end
object Label37: TLabel
Left = 17
Top = 298
Width = 60
Height = 12
Caption = #36820#31665#32852#31995#20154
FocusControl = DBEdit24
Transparent = True
end
object Label38: TLabel
Left = 5
Top = 320
Width = 72
Height = 12
Caption = #36820#31665#32852#31995#30005#35805
FocusControl = DBEdit25
Transparent = True
end
object Label39: TLabel
Left = 53
Top = 344
Width = 24
Height = 12
Caption = #22791#27880
Transparent = True
end
object Label49: TLabel
Left = 178
Top = 90
Width = 36
Height = 12
Caption = #38470#36816#36153
Transparent = True
end
object Label50: TLabel
Left = 274
Top = 90
Width = 48
Height = 12
Caption = #32467#31639#26041#24335
Transparent = True
end
object Label52: TLabel
Left = 30
Top = 66
Width = 48
Height = 12
Caption = #25215#36816#36710#38431
Transparent = True
end
object bsSkinPanel3: TbsSkinPanel
Left = 1
Top = 1
Width = 418
Height = 52
TabOrder = 0
SkinData = frm_main.bsSkinData1
SkinDataName = 'panel'
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 = False
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = 'bsSkinPanel3'
Align = alTop
object Label1: TLabel
Left = 30
Top = 8
Width = 24
Height = 12
Caption = 'TO'#65306
FocusControl = DBEdit1
Transparent = True
end
object Label2: TLabel
Left = 18
Top = 31
Width = 36
Height = 12
Caption = 'ATTN'#65306
FocusControl = DBEdit2
Transparent = True
end
object DBEdit1: TDBEdit
Left = 53
Top = 4
Width = 314
Height = 20
DataField = 'HEAD_TO'
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 53
Top = 27
Width = 294
Height = 20
DataField = 'HEAD_ATTN'
TabOrder = 1
end
object Button5: TButton
Left = 347
Top = 27
Width = 20
Height = 20
Caption = #183#183#183
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
end
object DBEdit14: TDBEdit
Left = 85
Top = 86
Width = 91
Height = 20
DataField = #31665#22411#31665#37327
TabOrder = 1
end
object DBEdit17: TDBEdit
Left = 85
Top = 109
Width = 287
Height = 20
DataField = #32972#31665#22330#31449
TabOrder = 2
end
object DBEdit18: TDBEdit
Left = 85
Top = 132
Width = 288
Height = 20
DataField = #22330#31449#32852#31995#20154
TabOrder = 3
end
object DBEdit19: TDBEdit
Left = 85
Top = 155
Width = 288
Height = 20
DataField = #22330#31449#30005#35805
TabOrder = 4
end
object DBEdit20: TDBEdit
Left = 85
Top = 178
Width = 288
Height = 20
DataField = #35201#27714#21040#21378#26102#38388
TabOrder = 5
end
object DBEdit11: TDBEdit
Left = 85
Top = 201
Width = 287
Height = 20
DataField = #21378#23478#22320#22336
TabOrder = 6
end
object DBEdit21: TDBEdit
Left = 85
Top = 224
Width = 288
Height = 20
DataField = #21378#23478#32852#31995#20154
TabOrder = 7
end
object DBEdit22: TDBEdit
Left = 85
Top = 247
Width = 288
Height = 20
DataField = #21378#23478#32852#31995#30005#35805
TabOrder = 8
end
object DBEdit23: TDBEdit
Left = 85
Top = 270
Width = 287
Height = 20
DataField = #36820#31665#22320#22336
TabOrder = 9
end
object DBEdit24: TDBEdit
Left = 85
Top = 294
Width = 288
Height = 20
DataField = #36820#31665#32852#31995#20154
TabOrder = 10
end
object DBEdit25: TDBEdit
Left = 85
Top = 317
Width = 288
Height = 20
DataField = #36820#31665#32852#31995#30005#35805
TabOrder = 11
end
object DBMemo13: TDBMemo
Left = 85
Top = 340
Width = 288
Height = 61
DataField = #22791#27880
TabOrder = 12
end
object DBEdit31: TDBEdit
Left = 215
Top = 86
Width = 57
Height = 20
DataField = #38470#36816#36153
TabOrder = 13
end
object DBEdit32: TDBEdit
Left = 323
Top = 86
Width = 50
Height = 20
DataField = #32467#31639#26041#24335
TabOrder = 14
end
object RxDBLookupCombo1: TRxDBLookupCombo
Left = 85
Top = 62
Width = 221
Height = 21
DropDownCount = 8
DisplayAllFields = True
DataField = #25215#36816#36710#38431
LookupField = #23458#25143#31616#31216
LookupDisplay = #20195#30721';'#23458#25143#31616#31216
TabOrder = 15
end
end
object t_op_letter: TADOQuery
Connection = frm_main.db
CursorType = ctStatic
Parameters = <
item
Name = #32534#21495
DataType = ftString
NumericScale = 255
Precision = 255
Size = 12
Value = Null
end>
SQL.Strings = (
'select * from t_op_letter'
'where '#32534#21495'=:'#32534#21495' AND LF IS NULL order by LE_ID')
Left = 128
Top = 104
end
object t_op_letter1: TDataSource
DataSet = t_op_letter
Left = 128
Top = 136
end
object t_op_letter_pc1: TDataSource
DataSet = t_op_letter_pc
Left = 224
Top = 144
end
object t_op_letter_pc: TADOQuery
Connection = frm_main.db
CursorType = ctStatic
DataSource = t_op_letter1
Parameters = <
item
Name = 'LE_ID'
Attributes = [paSigned]
DataType = ftInteger
Precision = 10
Size = 4
Value = Null
end>
SQL.Strings = (
'select * from t_op_letter_pc'
'where LE_ID=:LE_ID')
Left = 224
Top = 104
end
end