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.

282 lines
7.7 KiB
Plaintext

11 months ago
object frm_chart_message: Tfrm_chart_message
Left = 210
Top = 192
Width = 696
Height = 480
Align = alClient
Caption = #28040' '#24687' '#23460
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object dxDBGrid4: TdxDBGrid
Left = 0
Top = 0
Width = 269
Height = 442
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = #25152#22312#30005#33041
ShowSummaryFooter = True
SummaryGroups = <>
SummarySeparator = ', '
Align = alLeft
TabOrder = 0
OnExit = dxDBGrid4Exit
DataSource = frm_main.t_chat_man1
Filter.Criteria = {00000000}
OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
object dxDBGrid4Column1: TdxDBGridMaskColumn
ReadOnly = True
Width = 53
BandIndex = 0
RowIndex = 0
FieldName = #22312#32447#32844#21592
end
object dxDBGrid4Column3: TdxDBGridColumn
ReadOnly = True
Width = 55
BandIndex = 0
RowIndex = 0
FieldName = #25152#23646#37096#38376
end
object dxDBGrid4Column2: TdxDBGridMaskColumn
ReadOnly = True
Width = 90
BandIndex = 0
RowIndex = 0
FieldName = #25152#22312#30005#33041
SummaryFooterType = cstCount
SummaryFooterFormat = #22312#32447#20154#25968':0'
end
object dxDBGrid4Column4: TdxDBGridCheckColumn
Width = 36
BandIndex = 0
RowIndex = 0
FieldName = #21457#24067
ValueChecked = 'True'
ValueUnchecked = 'False'
end
end
object bsSkinPanel1: TbsSkinPanel
Left = 269
Top = 0
Width = 411
Height = 442
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 = bvNone
CaptionMode = False
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = 'bsSkinPanel1'
Align = alClient
object bsSkinPanel3: TbsSkinPanel
Left = 0
Top = 392
Width = 411
Height = 50
TabOrder = 0
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 = bvNone
CaptionMode = False
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = 'bsSkinPanel3'
Align = alBottom
object bsSkinButton1: TbsSkinButton
Left = 372
Top = 0
Width = 39
Height = 50
TabOrder = 0
SkinDataName = 'resizebutton'
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 = #21457#36865
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
F033777777777337F73309999990FFF0033377777777FFF77333099999000000
3333777777777777333333399033333333333337773333333333333903333333
3333333773333333333333303333333333333337333333333333}
NumGlyphs = 2
Spacing = 1
Layout = blGlyphTop
Align = alRight
OnClick = bsSkinButton1Click
end
object bsSkinPanel2: TbsSkinPanel
Left = 0
Top = 0
Width = 65
Height = 50
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 = bvNone
CaptionMode = False
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = 'bsSkinPanel2'
Align = alLeft
object bsSkinCheckRadioBox1: TbsSkinCheckRadioBox
Left = 11
Top = 15
Width = 49
Height = 19
TabOrder = 0
SkinDataName = 'checkbox'
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 = False
Checked = False
GroupIndex = 0
Caption = #31169#32842
end
end
object Memo1: TMemo
Left = 65
Top = 0
Width = 307
Height = 50
Align = alClient
MaxLength = 200
TabOrder = 2
end
end
object ChatMsgRichEdit: TRichEdit
Left = 0
Top = 0
Width = 411
Height = 392
TabStop = False
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
HideSelection = False
ParentFont = False
PopupMenu = PopupMenu1
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 1
OnKeyPress = ChatMsgRichEditKeyPress
end
end
object PopupMenu1: TPopupMenu
Left = 368
Top = 104
object N1: TMenuItem
Caption = #28165#38500#21457#24067#20154#21592
Visible = False
OnClick = N1Click
end
object N3: TMenuItem
Caption = '-'
Visible = False
end
object N2: TMenuItem
Caption = #28165#38500#32842#22825#20869#23481
OnClick = N2Click
end
object N4: TMenuItem
Caption = '-'
end
object N5: TMenuItem
Caption = #32842#22825#20869#23481#21478#23384
OnClick = N5Click
end
end
object SaveDialog: TSaveDialog
FileName = 'ExpGrid'
Options = [ofOverwritePrompt, ofHideReadOnly]
Left = 240
Top = 248
end
end