BSOne.SFC/EM.Lib/ImageEn_SRC/Demos/Multi/Thumbnails2/Unit1.dfm

209 lines
4.1 KiB
Plaintext

object Form1: TForm1
Left = 468
Top = 233
ActiveControl = ImageEnMView1
Caption = 'Thumbnails demo'
ClientHeight = 615
ClientWidth = 826
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object Splitter1: TSplitter
Left = 164
Top = 0
Height = 596
end
object GroupBox1: TPanel
Left = 0
Top = 0
Width = 164
Height = 596
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 485
Width = 24
Height = 13
Caption = 'Style'
end
object Label2: TLabel
Left = 8
Top = 538
Width = 42
Height = 13
Caption = 'Sel Color'
end
object Label3: TLabel
Left = 8
Top = 514
Width = 25
Height = 13
Caption = 'Color'
end
object DriveComboBox1: TDriveComboBox
Left = 8
Top = 12
Width = 145
Height = 19
DirList = DirectoryListBox1
TabOrder = 0
end
object DirectoryListBox1: TDirectoryListBox
Left = 8
Top = 40
Width = 145
Height = 297
TabOrder = 1
OnChange = DirectoryListBox1Change
end
object CheckBox2: TCheckBox
Left = 24
Top = 352
Width = 97
Height = 17
Caption = 'Soft Shadow'
TabOrder = 2
OnClick = CheckBox2Click
end
object CheckBox4: TCheckBox
Left = 24
Top = 376
Width = 97
Height = 17
Caption = 'Wallpaper'
TabOrder = 3
OnClick = CheckBox4Click
end
object CheckBox7: TCheckBox
Left = 24
Top = 400
Width = 97
Height = 17
Caption = 'Rounded'
TabOrder = 4
OnClick = CheckBox7Click
end
object Edit1: TEdit
Left = 36
Top = 482
Width = 33
Height = 21
ReadOnly = True
TabOrder = 5
Text = '0'
end
object UpDown1: TUpDown
Left = 69
Top = 482
Width = 16
Height = 21
Associate = Edit1
TabOrder = 6
OnClick = UpDown1Click
end
object Button1: TButton
Left = 55
Top = 534
Width = 33
Height = 22
Caption = '...'
TabOrder = 7
OnClick = Button1Click
end
object Button2: TButton
Left = 55
Top = 510
Width = 33
Height = 22
Caption = '...'
TabOrder = 8
OnClick = Button2Click
end
object CheckBox1: TCheckBox
Left = 24
Top = 424
Width = 97
Height = 17
Caption = 'Preview'
Checked = True
State = cbChecked
TabOrder = 9
OnClick = CheckBox1Click
end
object CheckBox3: TCheckBox
Left = 24
Top = 448
Width = 97
Height = 17
Caption = 'Show Text'
TabOrder = 10
OnClick = CheckBox3Click
end
object Button3: TButton
Left = 24
Top = 568
Width = 113
Height = 25
Caption = 'Reload Selected'
TabOrder = 11
OnClick = Button3Click
end
end
object ImageEnMView1: TImageEnMView
Left = 167
Top = 0
Width = 419
Height = 596
StoreType = ietThumb
ThumbWidth = 150
ThumbHeight = 150
HorizBorder = 4
VertBorder = 4
OnImageSelect = ImageEnMView1ImageSelect
MouseInteract = [mmiScroll, mmiSelect]
GridWidth = -1
SelectionWidth = 3
SelectionColor = clRed
Style = iemsFlat
ThumbnailsBorderColor = clBlack
WallPaperStyle = iewoTile
Align = alLeft
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object StatusBar1: TStatusBar
Left = 0
Top = 596
Width = 826
Height = 19
Panels = <>
end
object ImageEnView1: TImageEnView
Left = 586
Top = 0
Width = 240
Height = 596
AutoFit = True
BackgroundStyle = iebsGradient
EnableInteractionHints = True
MouseWheelParams.Action = iemwZoom
Align = alRight
TabOrder = 3
end
object ColorDialog1: TColorDialog
Left = 262
Top = 114
end
end