BSOne.SFC/EM.Lib/ImageEn_SRC/Demos/ImageEditing/Dithering/umain.dfm

155 lines
3.2 KiB
Plaintext

object MainForm: TMainForm
Left = 271
Top = 105
Caption = 'Dithering Demo - www.ImageEn.com'
ClientHeight = 615
ClientWidth = 888
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = True
Position = poScreenCenter
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object Splitter1: TSplitter
Left = 175
Top = 0
Height = 615
Beveled = True
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 175
Height = 615
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 139
Width = 61
Height = 13
Caption = 'Palette Type'
end
object Label2: TLabel
Left = 8
Top = 60
Width = 59
Height = 13
Caption = 'Pixel Format'
end
object Label3: TLabel
Left = 8
Top = 330
Width = 56
Height = 13
Caption = 'Dither Type'
end
object Label4: TLabel
Left = 8
Top = 496
Width = 102
Height = 13
Caption = 'Resulting palette size'
end
object LabelPaletteSize: TLabel
Left = 8
Top = 515
Width = 7
Height = 13
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 8
Top = 8
Width = 161
Height = 42
AutoSize = False
Caption = 'Select Pixel Format, Palette Type and Dither Type'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
end
object ListBoxPixelFormat: TListBox
Left = 14
Top = 78
Width = 147
Height = 49
ItemHeight = 13
Items.Strings = (
'1bpp (Black/White)'
'8bpp (Gray Scale)'
'8bpp (Palette)')
TabOrder = 0
OnClick = ListBoxPixelFormatClick
end
object ListBoxPaletteType: TListBox
Left = 14
Top = 157
Width = 147
Height = 164
ItemHeight = 13
TabOrder = 1
OnClick = ListBoxPaletteTypeClick
end
object ListBoxDitherType: TListBox
Left = 14
Top = 348
Width = 147
Height = 133
ItemHeight = 13
TabOrder = 2
OnClick = ListBoxDitherTypeClick
end
end
object ImageEnView1: TImageEnView
Left = 178
Top = 0
Width = 710
Height = 615
Background = clBtnFace
BorderStyle = bsNone
LegacyBitmap = False
EnableInteractionHints = True
Align = alClient
TabOrder = 1
end
object MainMenu1: TMainMenu
Left = 104
Top = 24
object File1: TMenuItem
Caption = '&File'
object Open1: TMenuItem
Caption = '&Open...'
OnClick = Open1Click
end
object miSaveAs: TMenuItem
Caption = 'Save as...'
OnClick = miSaveAsClick
end
object N1: TMenuItem
Caption = '-'
end
object Exit1: TMenuItem
Caption = '&Exit'
end
end
end
end