📄 gifmain.dfm
字号:
object AnimatorForm: TAnimatorForm
Left = 207
Top = 110
BorderIcons = [biSystemMenu, biMinimize]
AutoScroll = False
ClientHeight = 421
ClientWidth = 366
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OnActivate = FormActivate
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyPress = FormKeyPress
OnShow = FormActivate
PixelsPerInch = 96
TextHeight = 13
object Bevel: TBevel
Left = 4
Top = 40
Width = 157
Height = 357
Shape = bsFrame
end
object Frame1Lbl: TLabel
Left = 12
Top = 119
Width = 39
Height = 13
Caption = 'Frame #'
Transparent = True
Visible = False
end
object Frame2Lbl: TLabel
Tag = 1
Left = 12
Top = 206
Width = 39
Height = 13
Caption = 'Frame #'
Transparent = True
Visible = False
end
object Frame3Lbl: TLabel
Tag = 2
Left = 12
Top = 292
Width = 39
Height = 13
Caption = 'Frame #'
Transparent = True
Visible = False
end
object Frame4Lbl: TLabel
Tag = 3
Left = 12
Top = 379
Width = 39
Height = 13
Caption = 'Frame #'
Transparent = True
Visible = False
end
object No1: TLabel
Left = 62
Top = 119
Width = 24
Height = 13
Alignment = taRightJustify
Caption = '2000'
Visible = False
end
object No2: TLabel
Tag = 1
Left = 62
Top = 206
Width = 24
Height = 13
Alignment = taRightJustify
Caption = '2000'
Visible = False
end
object No3: TLabel
Tag = 2
Left = 62
Top = 292
Width = 24
Height = 13
Alignment = taRightJustify
Caption = '2000'
Visible = False
end
object No4: TLabel
Tag = 3
Left = 62
Top = 379
Width = 24
Height = 13
Alignment = taRightJustify
Caption = '2000'
Visible = False
end
object Status: TLabel
Left = 8
Top = 403
Width = 152
Height = 13
AutoSize = False
Transparent = True
end
object SpeedBar: TSpeedBar
Left = 0
Top = 0
Width = 366
Height = 31
ParentFont = True
BoundLines = [blBottom]
Options = [sbFlatBtns, sbGrayedBtns]
BtnOffsetHorz = 3
BtnOffsetVert = 3
BtnWidth = 24
BtnHeight = 23
IniStorage = Storage
Images = ToolbarImages
BevelOuter = bvNone
TabOrder = 4
OnDblClick = SpeedBarDblClick
InternalVer = 1
object SpeedbarSection1: TSpeedbarSection
Caption = 'File'
end
object SpeedbarSection2: TSpeedbarSection
Caption = 'Edit'
end
object SpeedbarSection3: TSpeedbarSection
Caption = 'Image'
end
object SpeedbarSection4: TSpeedbarSection
Caption = 'Help'
end
object NewBtn: TSpeedItem
Caption = 'New'
Hint = 'New|'
ImageIndex = 8
Spacing = 1
Left = 11
Top = 3
Visible = True
OnClick = NewBtnClick
SectionName = 'File'
end
object OpenBtn: TSpeedItem
Caption = 'Open'
Hint = 'Open|'
ImageIndex = 9
Spacing = 1
Left = 35
Top = 3
Visible = True
OnClick = OpenBtnClick
SectionName = 'File'
end
object SaveBtn: TSpeedItem
Caption = 'Save'
Enabled = False
Hint = 'Save|'
ImageIndex = 12
Spacing = 1
Left = 59
Top = 3
Visible = True
OnClick = SaveBtnClick
SectionName = 'File'
end
object SaveAsBtn: TSpeedItem
Caption = 'SaveAs'
Enabled = False
Hint = 'SaveAs|'
ImageIndex = 13
Spacing = 1
Left = 83
Top = 3
Visible = True
OnClick = SaveAsBtnClick
SectionName = 'File'
end
object InsertBtn: TSpeedItem
Caption = 'Insert'
Hint = 'Insert|'
ImageIndex = 5
Spacing = 1
Left = 107
Top = 3
Visible = True
OnClick = InsertBtnClick
SectionName = 'File'
end
object CutBtn: TSpeedItem
Caption = 'Cut'
Enabled = False
Hint = 'Cut|'
ImageIndex = 3
Spacing = 1
Left = 139
Top = 3
Visible = True
OnClick = CutBtnClick
SectionName = 'Edit'
end
object CopyBtn: TSpeedItem
Caption = 'Copy'
Enabled = False
Hint = 'Copy|'
ImageIndex = 2
Spacing = 1
Left = 163
Top = 3
Visible = True
OnClick = CopyBtnClick
SectionName = 'Edit'
end
object PasteBtn: TSpeedItem
Caption = 'Paste'
Enabled = False
Hint = 'Paste|'
ImageIndex = 10
Spacing = 1
Left = 187
Top = 3
Visible = True
OnClick = PasteBtnClick
SectionName = 'Edit'
end
object DeleteBtn: TSpeedItem
Caption = 'Delete'
Enabled = False
Hint = 'Delete|'
ImageIndex = 4
Spacing = 1
Left = 211
Top = 3
Visible = True
OnClick = DeleteBtnClick
SectionName = 'Edit'
end
object UpBtn: TSpeedItem
Caption = 'Move Up'
Enabled = False
Hint = 'Move Up|'
ImageIndex = 7
Spacing = 1
Left = 243
Top = 3
Visible = True
OnClick = UpBtnClick
SectionName = 'Image'
end
object DownBtn: TSpeedItem
Caption = 'Move Down'
Enabled = False
Hint = 'Move Down|'
ImageIndex = 6
Spacing = 1
Left = 267
Top = 3
Visible = True
OnClick = DownBtnClick
SectionName = 'Image'
end
object GrayscaleBtn: TSpeedItem
Caption = 'Grayscale'
Hint = 'Grayscale|'
ImageIndex = 0
Spacing = 1
Left = 323
Top = 3
OnClick = GrayscaleBtnClick
SectionName = 'Image'
end
object PreviewBtn: TSpeedItem
Caption = 'Preview'
Enabled = False
Hint = 'Preview|'
ImageIndex = 11
Spacing = 1
Left = 299
Top = 3
Visible = True
OnClick = PreviewBtnClick
SectionName = 'Image'
end
object AboutBtn: TSpeedItem
Caption = 'About'
Hint = 'About|'
ImageIndex = 1
Spacing = 1
Left = 331
Top = 3
OnClick = AboutBtnClick
SectionName = 'Help'
end
end
object Pages: TPageControl
Left = 168
Top = 40
Width = 191
Height = 357
ActivePage = OptionsTab
TabOrder = 6
object OptionsTab: TTabSheet
Caption = 'Options'
object Label1: TLabel
Left = 16
Top = 245
Width = 101
Height = 13
Caption = 'Color Depth Method: '
FocusControl = ColorDepthCombo
end
object ThumbnailsLabel: TRxLabel
Left = 30
Top = 27
Width = 125
Height = 26
Caption = 'Thumbnails Reflect Image'#13#10'Position'
FocusControl = ThumbnailsBox
ShadowSize = 0
ShowFocus = True
OnMouseDown = CheckLabelMouseDown
end
object AlwaysOnTopLabel: TRxLabel
Left = 30
Top = 99
Width = 100
Height = 26
Caption = 'Main Dialog Window'#13#10'Always On Top'
FocusControl = AlwaysOnTop
ShadowSize = 0
ShowFocus = True
OnMouseDown = CheckLabelMouseDown
end
object ColorDepthCombo: TComboBox
Left = 16
Top = 261
Width = 153
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'Frequency of use'
'Quantizing'
'Truncate 7x8x4'
'Truncate 6x6x6'
'Tripel ')
TabOrder = 1
OnChange = ColorDepthComboChange
end
object ThumbnailsBox: TCheckBox
Left = 13
Top = 31
Width = 17
Height = 17
State = cbChecked
TabOrder = 0
OnClick = ThumbnailsBoxClick
end
object FlatBtns: TCheckBox
Left = 13
Top = 67
Width = 148
Height = 17
Caption = 'Flat Toolbar Buttons '
State = cbChecked
TabOrder = 2
OnClick = FlatBtnsClick
end
object AlwaysOnTop: TCheckBox
Left = 13
Top = 103
Width = 17
Height = 17
TabOrder = 3
OnClick = AlwaysOnTopClick
end
end
object AnimationTab: TTabSheet
Caption = 'Animation'
object Bevel6: TBevel
Left = 106
Top = 85
Width = 69
Height = 21
end
object Bevel3: TBevel
Left = 106
Top = 60
Width = 69
Height = 21
end
object Label2: TLabel
Left = 7
Top = 213
Width = 90
Height = 13
Caption = '&Trailing Comment: '
FocusControl = TrailingComment
end
object Label4: TLabel
Left = 7
Top = 15
Width = 86
Height = 13
Caption = 'Animation Width: '
end
object Label5: TLabel
Left = 7
Top = 40
Width = 89
Height = 13
Caption = 'Animation Height: '
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -