object Form1: TForm1 Left = 454 Top = 253 Caption = 'Transitions Demo - www.ImageEn.com' ClientHeight = 513 ClientWidth = 745 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object ImageEnView1: TImageEnView Left = 0 Top = 0 Width = 571 Height = 513 Background = clBlack BorderStyle = bsNone ZoomFilter = rfLanczos3 AutoFit = True EnableInteractionHints = True Align = alClient TabOrder = 0 OnClick = btnNextTransitionClick OnKeyPress = ImageEnView1KeyPress end object Panel1: TPanel Left = 571 Top = 0 Width = 174 Height = 513 Align = alRight ParentBackground = False ParentColor = True TabOrder = 1 object Label1: TLabel Left = 19 Top = 464 Width = 137 Height = 39 Alignment = taCenter AutoSize = False Caption = 'In Full Screen mode use mouse click to change slide, and press E' + 'SC to exit.' WordWrap = True end object Label2: TLabel Left = 16 Top = 40 Width = 81 Height = 13 Caption = 'Transition Name:' end object lblTransName: TLabel Left = 16 Top = 56 Width = 12 Height = 13 Caption = '---' end object lblTrans: TLabel Left = 16 Top = 13 Width = 71 Height = 13 Caption = 'Transition #: 1' end object btnNextTransition: TButton Left = 11 Top = 120 Width = 153 Height = 25 Caption = 'Next Transition' TabOrder = 0 OnClick = btnNextTransitionClick end object btnFullScreen: TButton Left = 11 Top = 432 Width = 153 Height = 25 Caption = 'Full Screen' TabOrder = 1 OnClick = btnFullScreenClick end object spnTransition: TUpDown Left = 139 Top = 8 Width = 25 Height = 22 Min = -10000 Max = 10000 Position = 1 TabOrder = 2 OnClick = spnTransitionClick end object btnShowTransition: TButton Left = 11 Top = 80 Width = 153 Height = 25 Caption = 'Show Transition' TabOrder = 3 OnClick = btnShowTransitionClick end object grpWordTransition: TGroupBox Left = 11 Top = 290 Width = 153 Height = 113 Caption = 'Word Options' Enabled = False TabOrder = 4 object lblWord: TLabel Left = 13 Top = 18 Width = 113 Height = 13 Caption = 'Specify Letter or Word:' Enabled = False end object cmbFont: TComboBox Left = 13 Top = 63 Width = 121 Height = 21 Style = csDropDownList Enabled = False ItemHeight = 13 ItemIndex = 0 TabOrder = 1 Text = 'Arial' OnChange = cmbFontChange Items.Strings = ( 'Arial' 'Arial Black' 'Comic Sans MS' 'Georgia' 'Impact' 'Tahoma' 'Times New Roman' 'Webdings' 'Wingdings') end object edtWord: TEdit Left = 13 Top = 36 Width = 121 Height = 21 Enabled = False TabOrder = 0 Text = 'BLAM' end object chkBold: TCheckBox Left = 13 Top = 90 Width = 97 Height = 17 Caption = 'Bold' Checked = True Enabled = False State = cbChecked TabOrder = 2 end end object grOptions: TGroupBox Left = 11 Top = 174 Width = 153 Height = 107 Caption = 'General Options' TabOrder = 5 object lblDuration: TLabel Left = 10 Top = 24 Width = 99 Height = 13 Caption = 'Duration: 2000 msec' end object lblDrawAlternative: TLabel Left = 29 Top = 70 Width = 95 Height = 26 Caption = '(Display a variation of this transition)' WordWrap = True end object chkDrawAlternative: TCheckBox Left = 11 Top = 52 Width = 126 Height = 17 Caption = 'Alternative Drawing' TabOrder = 0 OnClick = chkDrawAlternativeClick end object spnDuration: TUpDown Left = 121 Top = 19 Width = 21 Height = 22 Min = 400 Max = 10000 Increment = 200 Position = 2000 TabOrder = 1 OnClick = spnDurationClick end end end end