268 lines
7.0 KiB
Plaintext
268 lines
7.0 KiB
Plaintext
object FrmMain: TFrmMain
|
|
Left = 373
|
|
Top = 178
|
|
Caption = 'ImageEn Theming Demo - www.ImageEn.com'
|
|
ClientHeight = 711
|
|
ClientWidth = 989
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
Position = poScreenCenter
|
|
OnActivate = FormActivate
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Splitter2: TSplitter
|
|
Left = 363
|
|
Top = 0
|
|
Height = 711
|
|
end
|
|
object PageControl1: TPageControl
|
|
Left = 0
|
|
Top = 0
|
|
Width = 363
|
|
Height = 711
|
|
ActivePage = TabSheet1
|
|
Align = alLeft
|
|
TabOrder = 0
|
|
object TabSheet1: TTabSheet
|
|
Caption = 'Loaded Styles'
|
|
DesignSize = (
|
|
355
|
|
683)
|
|
object Label1: TLabel
|
|
Left = 3
|
|
Top = 646
|
|
Width = 123
|
|
Height = 13
|
|
Anchors = [akLeft, akBottom]
|
|
Caption = 'More styles are available:'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 132
|
|
Top = 645
|
|
Width = 73
|
|
Height = 13
|
|
Cursor = crHandPoint
|
|
Anchors = [akLeft, akBottom]
|
|
Caption = 'VCL Styles Info'
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clHotLight
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsUnderline]
|
|
ParentColor = False
|
|
ParentFont = False
|
|
OnClick = Label2Click
|
|
end
|
|
object ListBoxLoadedStyles: TListBox
|
|
Left = 3
|
|
Top = 3
|
|
Width = 342
|
|
Height = 636
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
|
ItemHeight = 13
|
|
TabOrder = 0
|
|
OnClick = ListBoxLoadedStylesClick
|
|
end
|
|
object chkImageEnTheming: TCheckBox
|
|
Left = 3
|
|
Top = 663
|
|
Width = 140
|
|
Height = 17
|
|
Anchors = [akLeft, akBottom]
|
|
Caption = 'Enable ImageEn Theming'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 1
|
|
OnClick = chkImageEnThemingClick
|
|
end
|
|
end
|
|
object TabSheet3: TTabSheet
|
|
Caption = 'Style Info'
|
|
ImageIndex = 2
|
|
OnShow = TabSheet3Show
|
|
object ListView1: TListView
|
|
Left = 5
|
|
Top = 7
|
|
Width = 342
|
|
Height = 657
|
|
Columns = <
|
|
item
|
|
Caption = 'Style'
|
|
Width = 228
|
|
end
|
|
item
|
|
Caption = 'Color'
|
|
Width = 110
|
|
end>
|
|
ReadOnly = True
|
|
RowSelect = True
|
|
SmallImages = ImageList1
|
|
TabOrder = 0
|
|
ViewStyle = vsReport
|
|
end
|
|
end
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 366
|
|
Top = 0
|
|
Width = 623
|
|
Height = 711
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
Caption = 'Panel2'
|
|
ShowCaption = False
|
|
TabOrder = 1
|
|
object Splitter1: TSplitter
|
|
Left = 0
|
|
Top = 341
|
|
Width = 623
|
|
Height = 3
|
|
Cursor = crVSplit
|
|
Align = alBottom
|
|
end
|
|
object ImageEnView1: TImageEnView
|
|
AlignWithMargins = True
|
|
Left = 3
|
|
Top = 347
|
|
Width = 617
|
|
Height = 320
|
|
Background = clBtnFace
|
|
Ctl3D = False
|
|
ParentCtl3D = False
|
|
LegacyBitmap = True
|
|
AutoShrink = True
|
|
EnableInteractionHints = True
|
|
MouseWheelParams.Action = iemwZoom
|
|
ShowRulers = [rdHorizontal, rdVertical]
|
|
Align = alBottom
|
|
TabOrder = 0
|
|
end
|
|
object ImageEnFolderMView1: TImageEnFolderMView
|
|
AlignWithMargins = True
|
|
Left = 3
|
|
Top = 3
|
|
Width = 617
|
|
Height = 335
|
|
Background = clWindow
|
|
Ctl3D = False
|
|
ParentCtl3D = False
|
|
StoreType = ietFastThumb
|
|
ThumbWidth = 130
|
|
ThumbHeight = 130
|
|
HorizBorder = 8
|
|
VertBorder = 8
|
|
TextMargin = 4
|
|
GridWidth = -1
|
|
SelectionWidth = 1
|
|
SelectionColor = 13542013
|
|
ImageCacheSize = 100
|
|
Style = iemsFlat
|
|
ThumbnailsBackground = clWindow
|
|
ThumbnailsBackgroundSelected = 16575194
|
|
EnableMultiSelect = True
|
|
MultiSelectionOptions = [iemoRegion, iemoOptimizeForDragging, iemoSelectOnRightClick]
|
|
ThumbnailsBorderWidth = 1
|
|
DefaultBottomText = iedtFilename
|
|
Align = alClient
|
|
ThumbnailResampleFilter = rfFastLinear
|
|
ThumbnailDisplayFilter = rfFastLinear
|
|
SelectedFontColor = clNone
|
|
MouseWheelParams.Action = iemwVScroll
|
|
MouseWheelParamsAlt.Action = iemwZoom
|
|
TabOrder = 1
|
|
OnClick = ImageEnFolderMView1Click
|
|
DefaultFolder = iedfMyPictures
|
|
end
|
|
object Panel3: TPanel
|
|
Left = 0
|
|
Top = 670
|
|
Width = 623
|
|
Height = 41
|
|
Align = alBottom
|
|
BevelOuter = bvNone
|
|
Caption = 'Panel3'
|
|
ShowCaption = False
|
|
TabOrder = 2
|
|
DesignSize = (
|
|
623
|
|
41)
|
|
object btnSaveAs: TButton
|
|
Left = 515
|
|
Top = 6
|
|
Width = 106
|
|
Height = 25
|
|
Anchors = [akTop, akRight]
|
|
Caption = 'Save As...'
|
|
TabOrder = 0
|
|
OnClick = btnSaveAsClick
|
|
end
|
|
object chkRulers: TCheckBox
|
|
Left = 3
|
|
Top = 23
|
|
Width = 97
|
|
Height = 17
|
|
Caption = 'Show Rulers'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 1
|
|
OnClick = chkRulersClick
|
|
end
|
|
object btnSaveProps: TButton
|
|
Left = 403
|
|
Top = 6
|
|
Width = 106
|
|
Height = 25
|
|
Anchors = [akTop, akRight]
|
|
Caption = 'Save Properties...'
|
|
TabOrder = 2
|
|
OnClick = btnSavePropsClick
|
|
end
|
|
object chkEnabled: TCheckBox
|
|
Left = 3
|
|
Top = 3
|
|
Width = 89
|
|
Height = 20
|
|
Caption = 'Enabled'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 3
|
|
OnClick = chkEnabledClick
|
|
end
|
|
end
|
|
end
|
|
object ImageList1: TImageList
|
|
Left = 288
|
|
Top = 88
|
|
end
|
|
object SaveImageEnDialog1: TSaveImageEnDialog
|
|
Ctl3D = False
|
|
Filter =
|
|
'JPEG Image (*.jpg;*.jpeg;*.jpe;*.jif)|*.jpg;*.jpeg;*.jpe;*.jif|T' +
|
|
'IFF Image (*.tif;*.tiff;*.fax;*.g3n;*.g3f;*.xif)|*.tif;*.tiff;*.' +
|
|
'fax;*.g3n;*.g3f;*.xif|GIF Image (*.gif)|*.gif|PaintBrush (*.pcx)' +
|
|
'|*.pcx|Windows Bitmap (*.bmp;*.dib;*.rle)|*.bmp;*.dib;*.rle|Wind' +
|
|
'ows Icon (*.ico)|*.ico|Portable Network Graphics (*.png)|*.png|D' +
|
|
'ICOM Medical Image (*.dcm;*.dic;*.dicom;*.v2)|*.dcm;*.dic;*.dico' +
|
|
'm;*.v2|Targa Image (*.tga;*.targa;*.vda;*.icb;*.vst;*.pix)|*.tga' +
|
|
';*.targa;*.vda;*.icb;*.vst;*.pix|Portable Pixmap, Graymap, Bitma' +
|
|
'p (*.pxm;*.ppm;*.pgm;*.pbm)|*.pxm;*.ppm;*.pgm;*.pbm|Wireless Bit' +
|
|
'map (*.wbmp)|*.wbmp|JPEG2000 (*.jp2)|*.jp2|JPEG2000 Code Stream ' +
|
|
'(*.j2k;*.jpc;*.j2c)|*.j2k;*.jpc;*.j2c|PostScript (*.ps;*.eps)|*.' +
|
|
'ps;*.eps|Adobe PDF (*.pdf)|*.pdf|Multipage PCX (*.dcx)|*.dcx|Pho' +
|
|
'toshop PSD (*.psd;*.psb)|*.psd;*.psb|Vectorial Objects (*.iev)|*' +
|
|
'.iev|ImageEn Layers (*.ien;*.imageen;*.lyr)|*.ien;*.imageen;*.ly' +
|
|
'r|Layers and Objects (*.all)|*.all|Microsoft HD Photo (*.wdp;*.h' +
|
|
'dp;*.jxr)|*.wdp;*.hdp;*.jxr|Video for Windows (*.avi)|*.avi'
|
|
ExOptions = [sdShowPreview, sdShowAdvanced]
|
|
Left = 913
|
|
Top = 606
|
|
end
|
|
end
|