object Multiptf: TMultiptf Left = 228 Top = 222 HorzScrollBar.Visible = False VertScrollBar.Visible = False ActiveControl = ListBox1 BorderStyle = bsToolWindow Caption = 'Slide Configuration' ClientHeight = 157 ClientWidth = 356 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panel2: TPanel Left = 0 Top = 0 Width = 356 Height = 157 Align = alClient BevelOuter = bvNone TabOrder = 0 object PageControl1: TPageControl Left = 0 Top = 0 Width = 356 Height = 157 ActivePage = TabSheet1 Align = alClient TabOrder = 0 object TabSheet1: TTabSheet Caption = 'Main' object Image2: TImage Left = 236 Top = 88 Width = 109 Height = 41 Picture.Data = {} Visible = False end object Image3: TImage Left = 235 Top = 88 Width = 109 Height = 41 Picture.Data = {} Visible = False end object Label2: TLabel Left = 124 Top = 88 Width = 112 Height = 13 Caption = 'Effect for selected Slide' end object PaintBox1: TPaintBox Left = 240 Top = 44 Width = 105 Height = 37 end object SpeedButton1: TSpeedButton Left = 236 Top = 0 Width = 29 Height = 21 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000 333333777777777F33333330B00000003333337F7777777F3333333000000000 333333777777777F333333330EEEEEE033333337FFFFFF7F3333333300000000 333333377777777F3333333330BFBFB03333333373333373F33333330BFBFBFB 03333337F33333F7F33333330FBFBF0F03333337F33337F7F33333330BFBFB0B 03333337F3F3F7F7333333330F0F0F0033333337F7F7F773333333330B0B0B03 3333333737F7F7F333333333300F0F03333333337737F7F33333333333300B03 333333333377F7F33333333333330F03333333333337F7F33333333333330B03 3333333333373733333333333333303333333333333373333333} NumGlyphs = 2 OnClick = ArrowBtn1Click end object SpeedButton2: TSpeedButton Left = 236 Top = 21 Width = 29 Height = 21 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333033333 33333333373F33333333333330B03333333333337F7F33333333333330F03333 333333337F7FF3333333333330B00333333333337F773FF33333333330F0F003 333333337F7F773F3333333330B0B0B0333333337F7F7F7F3333333300F0F0F0 333333377F73737F33333330B0BFBFB03333337F7F33337F33333330F0FBFBF0 3333337F7333337F33333330BFBFBFB033333373F3333373333333330BFBFB03 33333337FFFFF7FF3333333300000000333333377777777F333333330EEEEEE0 33333337FFFFFF7FF3333333000000000333333777777777F33333330000000B 03333337777777F7F33333330000000003333337777777773333} NumGlyphs = 2 OnClick = ArrowBtn2Click end object SpeedButton3: TSpeedButton Left = 320 Top = 104 Width = 25 Height = 25 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 0333337F777FFFFF7F3333000000000003333377777777777333} NumGlyphs = 2 OnClick = Button1Click end object SpeedButton4: TSpeedButton Left = 272 Top = 104 Width = 21 Height = 21 Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000 00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333 70E337F3333F333337F3E0F33303333370E337F3337FF33337F3E0F333003333 70E337F33377FF3337F3E0F33300033370E337F333777FF337F3E0F333000033 70E337F33377773337F3E0F33300033370E337F33377733337F3E0F333003333 70E337F33377333337F3E0F33303333370E337F33373333337F3E0F333333333 70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000 00E33777777777777733EEEEEEEEEEEEEEE33333333333333333} NumGlyphs = 2 OnClick = SpeedButton4Click end object ListBox1: TListBox Left = 124 Top = 0 Width = 109 Height = 85 ItemHeight = 13 Style = lbOwnerDrawFixed TabOrder = 0 OnClick = ListBox1Click end object RadioGroup1: TRadioGroup Left = 8 Top = 56 Width = 109 Height = 69 Caption = 'Selected Slide Style' ItemIndex = 0 Items.Strings = ( 'Empty' 'Text' 'Bitmap') TabOrder = 1 OnClick = RadioGroup1Click end object ComboBox1: TComboBox Left = 124 Top = 104 Width = 149 Height = 21 ItemHeight = 13 Items.Strings = ( '00 - Random' '01 - None' '02 - Wipe Top To Bottom' '03 - Wipe Bottom To Top' '04 - Wipe Left To Right' '05 - Wipe Right To Left' '06 - Stretch Up' '07 - Stretch Down' '08 - Stretch Left' '09 - Stretch Right' '10 - Close Horizontal Curtain' '11 - Open Horizontal Curtain' '12 - Close Vertical Curtain' '13 - Open Vertical Curtain' '14 - Vertical Interlace' '15 - Horizontal Interlace' '16 - Left-Right Doppel' '17 - Top-Bottom Doppel' '18 - Right-Left Doppel' '19 - Bottom-Top Doppel' '20 - Left-Right Doppel In Out' '21 - Top-Bottom Doppel In Out' '22 - Right-Left Doppel In Out' '23 - Bottom-Top Doppel In Out' '24 - Left-Top To Right-Bottom Wipe' '25 - Left-Bottom To Right-Top Wipe' '26 - Right-Top To Left-Bottom Wipe' '27 - Right-Bottom To Left-Top Wipe' '28 - LTRB Closing Curtain' '29 - RTLB Closing Curtain' '30 - Quad Vertical Interlace' '31 - Quad Horizontal Interlace' '32 - Doppel Vertical Interlace' '33 - Doppel Horizontal Interlace' '34 - Vertical Quad Up' '35 - Vertical Doppel Down' '36 - Vetical Quad Down' '37 - Vertical Doppel Up' '38 - Wipe Effect 1' '39 - Wipe Effect 2' '40 - Wipe Effect 3' '41 - BitBlt' '42 - Drip Vertical' '43 - Drip Horizontal' '44 - Step Wipe Vertical' '45 - Step Wipe Horizontal' '46 - Screen Off' '47 - Fade Down' '48 - Wipe Effect 4' '49 - Wipe Effect 5' '50 - Wipe Effect 6' '51 - Horizontal Quad Left' '52 - Horizontal Doppel Right' '53 - Horizontal Quad Right' '54 - Horizontal Doppel Left') TabOrder = 2 OnChange = ComboBox1Change end object BitBtn1: TBitBtn Left = 4 Top = 4 Width = 109 Height = 21 Caption = 'Add Slide' TabOrder = 3 OnClick = Button8Click end object BitBtn2: TBitBtn Left = 4 Top = 24 Width = 109 Height = 21 Caption = 'Delete Slide' TabOrder = 4 OnClick = Button9Click end end object TabSheet2: TTabSheet Caption = 'Text' object Label1: TLabel Left = 4 Top = 0 Width = 135 Height = 13 Caption = 'Insert the Text to be shown :' end object Memo1: TMemo Left = 4 Top = 16 Width = 337 Height = 109 TabOrder = 0 OnExit = Memo1Exit end end object TabSheet3: TTabSheet Caption = 'Bitmap' object Panel1: TPanel Left = 4 Top = 4 Width = 205 Height = 121 BevelInner = bvLowered BorderWidth = 3 TabOrder = 0 object Image1: TImage Left = 5 Top = 5 Width = 195 Height = 111 Align = alClient Center = True end end object BitBtn3: TBitBtn Left = 236 Top = 104 Width = 105 Height = 21 Caption = 'Insert Bitmap' TabOrder = 1 OnClick = Office97Btn3Click end end end end object OpenPictureDialog1: TOpenPictureDialog DefaultExt = '*.bmp' Filter = 'Bitmaps|*.bmp' Title = 'Select Bitmap' Left = 300 Top = 32 end end