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