📄 kxianmain.dfm
字号:
object FormKXianMain: TFormKXianMain
Left = 273
Top = 145
Width = 618
Height = 303
ActiveControl = EditCode
BorderIcons = [biSystemMenu, biMinimize]
Caption = 'K线图之星'
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
Menu = MainFormMenu
OldCreateOrder = False
WindowState = wsMaximized
OnActivate = PaintBoxMainPaint
OnShow = FormShow
PixelsPerInch = 120
TextHeight = 14
object PaintBoxMain: TPaintBox
Left = 0
Top = 0
Width = 610
Height = 207
Align = alClient
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
OnMouseDown = PaintBoxMainMouseDown
OnPaint = PaintBoxMainPaint
end
object PanelMain: TPanel
Left = 0
Top = 207
Width = 610
Height = 40
Align = alBottom
TabOrder = 0
object LabelCode: TLabel
Left = 372
Top = 11
Width = 98
Height = 14
Anchors = [akRight, akBottom]
Caption = '请输入证券代码'
end
object EditCode: TEdit
Left = 479
Top = 5
Width = 120
Height = 25
Anchors = [akRight, akBottom]
BiDiMode = bdRightToLeft
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = '宋体'
Font.Style = []
MaxLength = 6
ParentBiDiMode = False
ParentFont = False
TabOrder = 0
OnKeyDown = EditCodeKeyDown
end
end
object MainFormMenu: TMainMenu
Left = 88
Top = 8
object NXiTongGongJu: TMenuItem
Caption = '系统工具(&T)'
object NShuJuYuanSheZhi: TMenuItem
Caption = '数据源设置(&D)'
OnClick = NShuJuYuanSheZhiClick
end
end
object NTuiChu: TMenuItem
Caption = '退出(&X)'
OnClick = NTuiChuClick
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -