Componentes.Terceros.Mustan.../official/1.7.0/EasyListview/Demos/ThumbScroller/Unit1.dfm
david 778b05bf9f Importación inicial
- Mustangpeak Common Library - 1.7.0
  - EasyListview - 1.7.0

git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.Mustangpeak@2 60b41242-d4b9-2247-b156-4ccd40706241
2007-09-11 08:33:06 +00:00

122 lines
3.0 KiB
Plaintext

object Form1: TForm1
Left = 193
Top = 115
Caption = 'Form1'
ClientHeight = 442
ClientWidth = 686
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Shell Dlg 2'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Image1: TImage
Left = 89
Top = 13
Width = 597
Height = 272
Align = alClient
Stretch = True
ExplicitHeight = 267
end
object Label1: TLabel
Left = 0
Top = 0
Width = 686
Height = 13
Align = alTop
Caption =
'WARNING: This Demo is not to show off my graphics (in)abilities' +
'. It is slow so don'#39't load too many images.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Shell Dlg 2'
Font.Style = [fsBold]
ParentFont = False
ExplicitWidth = 598
end
object Panel1: TPanel
Left = 0
Top = 285
Width = 686
Height = 157
Align = alBottom
TabOrder = 0
object EasyScrollButton2: TEasyScrollButton
Left = 1
Top = 1
Width = 17
Height = 155
Align = alLeft
AutoScroll = True
OnClick = EasyScrollButton2Click
TabOrder = 0
end
object EasyScrollButton3: TEasyScrollButton
Left = 668
Top = 1
Width = 17
Height = 155
Align = alRight
AutoScroll = True
Direction = sbdRight
OnClick = EasyScrollButton3Click
TabOrder = 1
end
object EasyListview1: TEasyListview
Left = 18
Top = 1
Width = 650
Height = 155
Align = alClient
UseDockManager = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Shell Dlg 2'
Font.Style = []
GroupFont.Charset = DEFAULT_CHARSET
GroupFont.Color = clWindowText
GroupFont.Height = -11
GroupFont.Name = 'MS Shell Dlg 2'
GroupFont.Style = []
Header.Font.Charset = DEFAULT_CHARSET
Header.Font.Color = clWindowText
Header.Font.Height = -11
Header.Font.Name = 'MS Shell Dlg 2'
Header.Font.Style = []
PaintInfoGroup.MarginBottom.CaptionIndent = 4
ParentFont = False
Scrollbars.HorzEnabled = False
Scrollbars.VertEnabled = False
Selection.MouseButtonSelRect = [cmbLeft, cmbRight]
TabOrder = 2
View = elsFilmStrip
OnItemFreeing = EasyListview1ItemFreeing
OnItemSelectionChanged = EasyListview1ItemSelectionChanged
OnItemThumbnailDraw = EasyListview1ItemThumbnailDraw
end
end
object Panel2: TPanel
Left = 0
Top = 13
Width = 89
Height = 272
Align = alLeft
TabOrder = 1
object Button1: TButton
Left = 8
Top = 8
Width = 75
Height = 25
Caption = 'Browse...'
TabOrder = 0
OnClick = Button1Click
end
end
end