?? cformcorplist.dfm
字號:
inherited formCorpList: TformCorpList
Width = 688
Height = 519
OnCreate = IWAppFormCreate
DesignLeft = 55
DesignTop = -11
inherited iwbTitle: TIWLabel
Left = 159
Top = 56
Width = 145
Caption = #21333#20301#21015#34920
end
inherited IWImage1: TIWImage
Width = 688
end
object iwgCorp: TIWDBGrid [2]
Left = 160
Top = 88
Width = 513
Height = 297
Cursor = crAuto
Anchors = [akLeft, akTop, akRight, akBottom]
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
BorderColors.Color = clNone
BorderColors.Light = clNone
BorderColors.Dark = clNone
BGColor = clNone
BorderSize = 1
BorderStyle = tfDefault
CellPadding = 0
CellSpacing = 0
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
FrameBuffer = 40
Lines = tlNone
UseFrame = True
UseSize = True
Columns = <
item
Alignment = taLeftJustify
BGColor = clNone
DoSubmitValidation = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Header = False
Height = '0'
VAlign = vaMiddle
Visible = False
Width = '0'
Wrap = False
BlobCharLimit = 0
CompareHighlight = hcNone
DataField = 'No'
RawText = False
Title.Alignment = taLeftJustify
Title.BGColor = clNone
Title.DoSubmitValidation = True
Title.Font.BackColor = clNone
Title.Font.Color = clNone
Title.Font.Enabled = True
Title.Font.Size = 10
Title.Font.Style = []
Title.Header = False
Title.Height = '0'
Title.Text = #24207#21495
Title.VAlign = vaMiddle
Title.Visible = True
Title.Width = '0'
Title.Wrap = False
end
item
Alignment = taLeftJustify
BGColor = clNone
DoSubmitValidation = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Header = False
Height = '0'
VAlign = vaMiddle
Visible = True
Width = '0'
Wrap = False
BlobCharLimit = 0
CompareHighlight = hcNone
DataField = 'ChnName'
LinkField = 'CorpID'
RawText = False
OnClick = iwgCorpColumns1Click
Title.Alignment = taLeftJustify
Title.BGColor = clNone
Title.DoSubmitValidation = True
Title.Font.BackColor = clNone
Title.Font.Color = clNone
Title.Font.Enabled = True
Title.Font.Size = 10
Title.Font.Style = []
Title.Header = False
Title.Height = '0'
Title.Text = #20013#25991#21517#31216
Title.VAlign = vaMiddle
Title.Visible = True
Title.Width = '0'
Title.Wrap = False
end
item
Alignment = taLeftJustify
BGColor = clNone
DoSubmitValidation = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Header = False
Height = '0'
VAlign = vaMiddle
Visible = True
Width = '0'
Wrap = False
BlobCharLimit = 0
CompareHighlight = hcNone
DataField = 'EngName'
RawText = False
Title.Alignment = taLeftJustify
Title.BGColor = clNone
Title.DoSubmitValidation = True
Title.Font.BackColor = clNone
Title.Font.Color = clNone
Title.Font.Enabled = True
Title.Font.Size = 10
Title.Font.Style = []
Title.Header = False
Title.Height = '0'
Title.Text = #33521#25991#21517#31216
Title.VAlign = vaMiddle
Title.Visible = True
Title.Width = '0'
Title.Wrap = False
end
item
Alignment = taLeftJustify
BGColor = clNone
DoSubmitValidation = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Header = False
Height = '0'
VAlign = vaMiddle
Visible = True
Width = '0'
Wrap = False
BlobCharLimit = 0
CompareHighlight = hcNone
DataField = 'Phone'
RawText = False
Title.Alignment = taLeftJustify
Title.BGColor = clNone
Title.DoSubmitValidation = True
Title.Font.BackColor = clNone
Title.Font.Color = clNone
Title.Font.Enabled = True
Title.Font.Size = 10
Title.Font.Style = []
Title.Header = False
Title.Height = '0'
Title.Text = #30005#35805
Title.VAlign = vaMiddle
Title.Visible = True
Title.Width = '0'
Title.Wrap = False
end
item
Alignment = taLeftJustify
BGColor = clNone
DoSubmitValidation = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Header = False
Height = '0'
VAlign = vaMiddle
Visible = True
Width = '0'
Wrap = False
BlobCharLimit = 0
CompareHighlight = hcNone
DataField = 'Fax'
RawText = False
Title.Alignment = taLeftJustify
Title.BGColor = clNone
Title.DoSubmitValidation = True
Title.Font.BackColor = clNone
Title.Font.Color = clNone
Title.Font.Enabled = True
Title.Font.Size = 10
Title.Font.Style = []
Title.Header = False
Title.Height = '0'
Title.Text = #20256#30495
Title.VAlign = vaMiddle
Title.Visible = True
Title.Width = '0'
Title.Wrap = False
end>
DataSource = dmHR.dsCorp
FooterRowCount = 0
FromStart = False
HighlightColor = clHotLight
HighlightRows = False
Options = [dgIndicator, dgShowTitles]
RefreshMode = rmAutomatic
RowLimit = 3
RollOver = False
RowClick = False
RollOverColor = clDefault
RowHeaderColor = clMoneyGreen
RowAlternateColor = clGradientInactiveCaption
RowCurrentColor = clSkyBlue
end
object iwnCorp: TIWDBNavigator [3]
Left = 272
Top = 58
Width = 161
Height = 25
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
Confirmations.Delete = #26159#21542#30830#23450#35201#21024#38500#24403#21069#35760#24405#65311
Confirmations.Post = 'Are you sure you want to update this record?'
Confirmations.Cancel = 'Are you sure you want to cancel your changes to this record?'
DataSource = dmHR.dsCorp
ImageHeight = 21
ImageWidth = 21
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbRefresh]
Orientation = orHorizontal
OnEdit = iwnCorpEdit
OnInsert = iwnCorpInsert
end
object iwdmChnInfo: TIWDBMemo [4]
Left = 160
Top = 412
Width = 217
Height = 93
Cursor = crAuto
Anchors = [akLeft, akBottom]
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
BGColor = clWebWHITE
Editable = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
ScriptEvents = <>
HorizScrollBar = False
ReadOnly = False
Required = False
TabOrder = 0
WantReturns = False
AutoEditable = False
DataField = 'ChnInfo'
DataSource = dmHR.dsCorp
end
object iwdmEngInfo: TIWDBMemo [5]
Left = 400
Top = 412
Width = 233
Height = 93
Cursor = crAuto
Anchors = [akLeft, akBottom]
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
BGColor = clWebWHITE
Editable = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
ScriptEvents = <>
HorizScrollBar = False
ReadOnly = False
Required = False
TabOrder = 1
WantReturns = False
AutoEditable = False
DataField = 'EngInfo'
DataSource = dmHR.dsCorp
end
object iwbIWLabel1: TIWLabel [6]
Left = 160
Top = 395
Width = 132
Height = 20
Cursor = crAuto
Anchors = [akLeft, akBottom]
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
Alignment = taLeftJustify
Color = clNone
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
NoWrap = False
Caption = #20013#25991#20844#21496#20449#24687
end
object iwbIWLabel2: TIWLabel [7]
Left = 401
Top = 395
Width = 132
Height = 20
Cursor = crAuto
Anchors = [akLeft, akBottom]
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
Alignment = taLeftJustify
Color = clNone
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
NoWrap = False
Caption = #33521#25991#20844#21496#20449#24687
end
object iwbLastPage: TIWButton [8]
Left = 512
Top = 56
Width = 75
Height = 25
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
ButtonType = btButton
Caption = '<'#19978#19968#39029
Color = clBtnFace
DoSubmitValidation = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
ScriptEvents = <>
TabOrder = 2
OnClick = iwbLastPageClick
end
object iwbNextPage: TIWButton [9]
Left = 592
Top = 56
Width = 75
Height = 25
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
ButtonType = btButton
Caption = #19979#19968#39029'>'
Color = clBtnFace
DoSubmitValidation = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
ScriptEvents = <>
TabOrder = 3
OnClick = iwbNextPageClick
end
object iwbDelete: TIWButton [10]
Left = 434
Top = 56
Width = 75
Height = 25
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
ButtonType = btButton
Caption = #21024#38500#20844#21496
Color = clBtnFace
Confirmation = #26159#21542#30830#23450#35201#21024#38500#35813#20844#21496#65311
DoSubmitValidation = True
Font.BackColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
ScriptEvents = <>
TabOrder = 4
OnClick = iwbDeleteClick
end
inherited FrameMenu1: TFrameMenu
Width = 145
Height = 470
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -