📄 flyingmain.dfm
字号:
object FlyingMainForm: TFlyingMainForm
Left = 67
Top = 20
BorderStyle = bsSingle
Caption = 'ExpressSpreadSheet Demo : G-RSFT Load Sheet'
ClientHeight = 626
ClientWidth = 851
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Image1: TImage
Left = 472
Top = 8
Width = 319
Height = 576
AutoSize = True
Transparent = True
end
object Pb: TPaintBox
Left = 472
Top = 8
Width = 319
Height = 576
OnPaint = PbPaint
end
object Image2: TImage
Left = 8
Top = 431
Width = 457
Height = 154
Stretch = True
end
object Bevel1: TBevel
Left = 0
Top = 0
Width = 851
Height = 9
Align = alTop
Shape = bsTopLine
Style = bsRaised
end
object cxSheetBook: TcxSpreadSheetBook
Left = 8
Top = 8
Width = 457
Height = 421
ScrollBars = sbsNone
DefaultStyle.Brush.BackgroundColor = 57
DefaultStyle.Brush.ForegroundColor = 57
DefaultStyle.Font.Name = 'MS Sans Serif'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = clWindowText
HeaderFont.Height = -11
HeaderFont.Name = 'MS Sans Serif'
HeaderFont.Style = []
ShowCaptionBar = False
OnActiveCellChanging = cxSheetBookActiveCellChanging
OnAfterCalculation = cxSheetBookAfterCalculation
OnSetSelection = cxSheetBookSetSelection
OnSheetPopupMenu = cxSheetBookSheetPopupMenu
OnTopLeftChanging = cxSheetBookTopLeftChanging
end
object StatusBar: TStatusBar
Left = 0
Top = 607
Width = 851
Height = 19
Panels = <
item
Width = 800
end>
SimplePanel = False
end
object ssPm: TPopupMenu
Left = 152
Top = 72
object pmWizard: TMenuItem
Caption = 'Wizard...'
OnClick = pmWizardClick
end
object pmoFormat: TMenuItem
Caption = 'Format...'
OnClick = pmoFormatClick
end
end
object MainMenu1: TMainMenu
Left = 184
Top = 72
object File1: TMenuItem
Caption = '&File'
object mmExit: TMenuItem
Caption = 'E&xit'
OnClick = mmExitClick
end
end
object mmOptions: TMenuItem
Caption = '&Options'
object moToday: TMenuItem
Caption = 'Todays Date'
OnClick = moTodayClick
end
object moFuelTabs: TMenuItem
Caption = 'Fuel to Tabs'
OnClick = moFuelTabsClick
end
end
object mmAircraft: TMenuItem
Caption = '&Select Aircraft'
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -