hanxuntao
/
DONGSHENG6
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
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.
master
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'master'
${ noResults }
DONGSHENG6/业务订舱/U_MSG.dfm

501 lines
17 KiB
Plaintext
Raw Permalink Blame History

object frm_MSG: Tfrm_MSG
Left = 374
Top = 148
AutoScroll = False
BorderIcons = [biSystemMenu, biMinimize]
Caption = #27807#36890#28040#24687
ClientHeight = 497
ClientWidth = 583
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object spl1: TSplitter
Left = 0
Top = 406
Width = 583
Height = 6
Cursor = crVSplit
Align = alBottom
end
object pnl1: TPanel
Left = 0
Top = 0
Width = 583
Height = 384
Align = alClient
Caption = 'pnl1'
TabOrder = 0
object dxDBGrid: TdxDBGrid
Left = 1
Top = 1
Width = 581
Height = 382
Bands = <
item
Caption = #28040#24687#23646#24615
Width = 170
end
item
Caption = #28040#24687#20869#23481
Width = 218
end>
DefaultLayout = False
HeaderPanelRowCount = 2
KeyField = 'GID'
ShowGroupPanel = True
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PopupMenu = pm1
TabOrder = 0
BandFont.Charset = DEFAULT_CHARSET
BandFont.Color = clWindowText
BandFont.Height = -11
BandFont.Name = 'MS Sans Serif'
BandFont.Style = [fsBold]
DataSource = ds1
DefaultRowHeight = 22
Filter.Active = True
Filter.Criteria = {00000000}
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = clWindowText
HeaderFont.Height = -11
HeaderFont.Name = 'MS Sans Serif'
HeaderFont.Style = []
LookAndFeel = lfFlat
OptionsBehavior = [edgoEditing, edgoEnterShowEditor, edgoExtMultiSelect, edgoImmediateEditor, edgoTabThrough, edgoVertThrough]
OptionsCustomize = [edgoBandMoving, edgoBandSizing, edgoColumnMoving, edgoColumnSizing, edgoHeaderPanelSizing, edgoNotHideColumn, edgoRowSizing]
OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
OptionsView = [edgoAutoWidth, edgoIndicator, edgoUseBitmap]
PreviewFont.Charset = DEFAULT_CHARSET
PreviewFont.Color = clBlue
PreviewFont.Height = -11
PreviewFont.Name = 'MS Sans Serif'
PreviewFont.Style = []
RowSeparatorLineWidth = 2
ShowBands = True
ShowNewItemRow = True
OnCustomDraw = dxDBGridCustomDraw
object colFX: TdxDBGridColumn
Alignment = taLeftJustify
Caption = #25910'/'#21457
HeaderAlignment = taCenter
ReadOnly = True
Width = 38
BandIndex = 0
RowIndex = 0
FieldName = 'Received'
DisableFilter = True
end
object colSenderCompany: TdxDBGridColumn
Caption = #21457#20449#20844#21496
HeaderAlignment = taCenter
Width = 124
BandIndex = 0
RowIndex = 1
FieldName = 'SENDERCOMPANYNAME'
DisableFilter = True
StoredRowIndex = 1
end
object colSender: TdxDBGridColumn
Caption = #21457#20449#20154
HeaderAlignment = taCenter
ReadOnly = True
Width = 46
BandIndex = 0
RowIndex = 1
FieldName = 'SENDERNAME'
DisableFilter = True
StoredRowIndex = 1
end
object colMESDate: TdxDBGridColumn
Alignment = taCenter
Caption = #21457#20449#26102#38388
HeaderAlignment = taCenter
ReadOnly = True
Width = 110
BandIndex = 0
RowIndex = 0
FieldName = 'MSGDate'
DisableFilter = True
end
object colFieldValue: TdxDBGridMemoColumn
Caption = #28040#24687#20869#23481
HeaderAlignment = taCenter
ReadOnly = True
TabStop = False
Width = 325
BandIndex = 1
RowIndex = 0
FieldName = 'FieldValue'
ScrollBars = ssVertical
end
object dxDBGridColumn6: TdxDBGridColumn
Visible = False
BandIndex = 0
RowIndex = 0
end
end
end
object pnl2: TPanel
Left = 0
Top = 412
Width = 583
Height = 85
Align = alBottom
TabOrder = 1
object mmo2: TMemo
Left = 1
Top = 1
Width = 492
Height = 83
Align = alClient
Ctl3D = False
ParentCtl3D = False
ScrollBars = ssVertical
TabOrder = 1
end
object pnl3: TPanel
Left = 493
Top = 1
Width = 89
Height = 83
Align = alRight
Caption = 'pnl3'
TabOrder = 0
object btn1: TButton
Left = 0
Top = 0
Width = 89
Height = 83
Caption = #21457#20986'(Ctrl+Enter)'
TabOrder = 0
OnClick = btn1Click
end
end
end
object pnl4: TPanel
Left = 0
Top = 384
Width = 583
Height = 22
Align = alBottom
Ctl3D = False
ParentCtl3D = False
TabOrder = 2
object bsSkinButton1: TbsSkinButton
Left = 241
Top = 0
Width = 97
Height = 22
TabOrder = 1
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 = #21047#26032'(F5)'
Glyph.Data = {
E60A0000424DE60A00000000000036000000280000002F000000130000000100
180000000000B00A0000C30E0000C30E00000000000000000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E6E6E6E2E2E2F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7DADADAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F5F5F5B8
B8B88282826363636363636565658F8F8FD9D9D9F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7DADADAFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F0F0F08D8D8D636363737373A2A2A2AAAAAA9090906363
63636363B3B3B3F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7DADADAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78D8D8D636363B1
B1B1F7F7F7F7F7F7F7F7F7F7F7F7DBDBDB737373636363C3C3C3F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7DADADAFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000F7F7F7F7F7F7
F7F7F7F7F7F7CDCDCD636363AEAEAEF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7E2E2E26666666D6D6DF2F2F2F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7DADADAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000F7F7F7F7F7F7F7F7F7F7F7F7979797686868F0F0F0F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79B9B9B636363CDCDCDF7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7DADADAFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000F7F7F7F7F7F7
F7F7F7F7F7F77F7F7F868686F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7E9E9E9B3B3B3F0F0F0F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7DADADAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000F7F7F7F7F7F7F7F7F7F7F7F77B7B7B818181F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7DADADAFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000F7F7F7F7F7F7
F7F7F7F7F7F7929292656565E9E9E9F7F7F7F7F7F7F7F7F7F7F7F7E2E2E2F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7DADADAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000F7F7F7F7F7F7F7F7F7F7F7F7C1C1C1636363A3A3A3F7
F7F7F7F7F7F7F7F7F7F7F7848484888888D8D8D8F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7DADADAFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000F7F7F7F7F7F7
F7F7F7F7F7F7F5F5F5898989636363A7A7A7F2F2F2F7F7F7F7F7F7EEEEEE8484
84636363959595E2E2E2F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7DADADAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7EEEEEE7D7D7D63
63637171719090909E9E9E8686866565656363636363636A6A6AF2F2F2F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7DADADAFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F5F5F5BABABA8282826565656363636A6A6A7B7B
7B636363656565C1C1C1F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7DADADAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7A7A7A7656565C1C1C1F7F7F7F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7DADADAFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F4F4F46C6C
6CBFBFBFF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7DADADAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7E4E4E4F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7DADADAFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFF000000}
NumGlyphs = 2
Spacing = 1
OnClick = bsSkinButton1Click
end
object bsSkinButton2: TbsSkinButton
Left = 1
Top = 0
Width = 24
Height = 22
TabOrder = 0
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
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000
000077777777777777770FFFFFFFFFFFFFF07F3333FFF33333370FFFF777FFFF
FFF07F333777333333370FFFFFFFFFFFFFF07F3333FFFFFF33370FFFF777777F
FFF07F33377777733FF70FFFFFFFFFFF99907F3FFF33333377770F777FFFFFFF
9CA07F77733333337F370FFFFFFFFFFF9A907FFFFFFFFFFF7FF7000000000000
0000777777777777777733333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
Spacing = 1
OnClick = bsSkinButton2Click
end
object chk1: TCheckBox
Left = 24
Top = 3
Width = 217
Height = 17
Caption = #21457#20986#28040#24687#21516#26102#21457#20986#37038#20214'(Shift_Enter)'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
end
end
object MT1: TkbmMemTable
DesignActivation = True
AttachedAutoRefresh = True
AttachMaxCount = 1
FieldDefs = <>
IndexDefs = <>
SortOptions = []
PersistentBackup = False
ProgressFlags = [mtpcLoad, mtpcSave, mtpcCopy]
FilterOptions = []
Version = '3.05'
LanguageID = 0
SortID = 0
SubLanguageID = 1
LocaleID = 1024
Left = 112
Top = 144
object MT1GID: TStringField
FieldName = 'GID'
Size = 50
end
object MT1BSNO: TStringField
FieldKind = fkCalculated
FieldName = 'BSNO'
Calculated = True
end
object MT1MSGDate: TStringField
FieldKind = fkCalculated
FieldName = 'MSGDate'
Calculated = True
end
object MT1SENDERNAME: TStringField
FieldKind = fkCalculated
FieldName = 'SENDERNAME'
Size = 50
Calculated = True
end
object MT1SENDERCOMPANYNAME: TStringField
FieldKind = fkCalculated
FieldName = 'SENDERCOMPANYNAME'
Calculated = True
end
object MT1FieldValue: TStringField
FieldKind = fkCalculated
FieldName = 'FieldValue'
Size = 200
Calculated = True
end
object MT1RECDate: TStringField
FieldKind = fkCalculated
FieldName = 'RECDate'
Size = 40
Calculated = True
end
object MT1Received: TStringField
FieldKind = fkCalculated
FieldName = 'Received'
Calculated = True
end
object MT1SendMail: TStringField
FieldKind = fkCalculated
FieldName = 'SendMail'
Calculated = True
end
end
object ds1: TDataSource
DataSet = MT1
Left = 112
Top = 200
end
object pm1: TPopupMenu
Left = 288
Top = 152
object N4: TMenuItem
Caption = #22797#21046'(Ctrl+C)'
OnClick = N4Click
end
object N2: TMenuItem
Caption = #23558#27492#26465#20449#24687#35774#20026#24050#35835
OnClick = N2Click
end
object N1: TMenuItem
Caption = '-'
end
object N3: TMenuItem
Caption = #23558#20840#37096#26410#35835#35774#20026#24050#35835
OnClick = N3Click
end
end
object actlst1: TActionList
Left = 80
Top = 424
object act1: TAction
Caption = 'act1'
ShortCut = 16397
OnExecute = act1Execute
end
object act2: TAction
Caption = 'act2'
ShortCut = 8205
OnExecute = act2Execute
end
object act3: TAction
Caption = 'act3'
ShortCut = 116
OnExecute = act3Execute
end
end
object Qry1: TADOQuery
Connection = frm_main.db
Parameters = <>
Left = 184
Top = 232
end
object QryGetOpseae: TADOQuery
Connection = frm_main.db
Parameters = <
item
Name = #35746#33329#24207#21015#21495
Attributes = [paNullable]
DataType = ftString
NumericScale = 255
Precision = 255
Size = 50
Value = Null
end>
SQL.Strings = (
'select * from t_op_seae where '#35746#33329#24207#21015#21495'=:'#35746#33329#24207#21015#21495)
Left = 248
Top = 232
end
end
Reference in New Issue View Git Blame Copy Permalink