home *** CD-ROM | disk | FTP | other *** search
- object SlideDlg: TSlideDlg
- Left = 79
- Top = 123
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Slide Show Setup'
- ClientHeight = 397
- ClientWidth = 627
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object GroupBox1: TGroupBox
- Left = 479
- Top = 13
- Width = 137
- Height = 372
- Caption = 'Slide Show Images'
- TabOrder = 0
- object Images: TListBox
- Left = 2
- Top = 15
- Width = 133
- Height = 355
- Align = alClient
- DragCursor = crSizeNS
- DragMode = dmAutomatic
- ItemHeight = 13
- TabOrder = 0
- OnClick = ImagesClick
- OnDragDrop = ImagesDragDrop
- OnDragOver = ImagesDragOver
- end
- end
- object GroupBox2: TGroupBox
- Left = 219
- Top = 13
- Width = 137
- Height = 372
- Caption = 'Image List'
- TabOrder = 1
- object FileListBox1: TFileListBox
- Left = 2
- Top = 15
- Width = 133
- Height = 355
- Align = alClient
- DragMode = dmAutomatic
- ItemHeight = 16
- MultiSelect = True
- ShowGlyphs = True
- TabOrder = 0
- OnChange = FileListBox1Change
- OnDblClick = BitBtn1Click
- end
- end
- object GroupBox3: TGroupBox
- Left = 15
- Top = 13
- Width = 183
- Height = 183
- Caption = 'Image Directory'
- TabOrder = 2
- object DriveComboBox1: TDriveComboBox
- Left = 19
- Top = 125
- Width = 145
- Height = 19
- DirList = DirectoryListBox1
- TabOrder = 0
- end
- object DirectoryListBox1: TDirectoryListBox
- Left = 19
- Top = 21
- Width = 145
- Height = 97
- FileList = FileListBox1
- ItemHeight = 16
- TabOrder = 1
- end
- object FilterComboBox1: TFilterComboBox
- Left = 19
- Top = 151
- Width = 145
- Height = 21
- FileList = FileListBox1
- TabOrder = 2
- end
- end
- object Panel1: TPanel
- Left = 365
- Top = 19
- Width = 108
- Height = 94
- BevelInner = bvLowered
- BevelWidth = 2
- TabOrder = 3
- object preview: TPMultiImage
- Left = 4
- Top = 4
- Width = 100
- Height = 86
- GrabHandCursor = 5
- Align = alClient
- Center = True
- Scrolling = False
- ShowScrollbars = True
- B_W_CopyFlags = [C_DEL]
- Color = clBtnFace
- Picture.Data = {07544269746D617000000000}
- ImageReadRes = lAutoMatic
- BlitMode = sLight
- ImageWriteRes = sAutoMatic
- TifSaveCompress = sNONE
- TiffPage = 1
- TiffAppend = False
- JPegSaveQuality = 25
- JPegSaveSmooth = 5
- RubberBandBtn = mbLeft
- ScrollbarWidth = 12
- ParentColor = True
- StretchRatio = True
- TextLeft = 0
- TextTop = 0
- TextRotate = 0
- TabOrder = 0
- TabStop = False
- ZoomBy = 10
- end
- end
- object BitBtn1: TBitBtn
- Left = 383
- Top = 152
- Width = 75
- Height = 25
- Caption = 'Add'
- TabOrder = 4
- OnClick = BitBtn1Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333FF3333333333333447333333333333377FFF33333333333744473333333
- 333337773FF3333333333444447333333333373F773FF3333333334444447333
- 33333373F3773FF3333333744444447333333337F333773FF333333444444444
- 733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999
- 999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC
- 33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333
- 333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333
- 33333777333333333333CC333333333333337733333333333333}
- NumGlyphs = 2
- end
- object BitBtn2: TBitBtn
- Left = 383
- Top = 186
- Width = 75
- Height = 25
- Caption = 'Remove'
- Enabled = False
- TabOrder = 5
- OnClick = BitBtn2Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333FF3333333333333003333333333333377F33333333333307
- 733333FFF333337773333C003333307733333777FF333777FFFFC0CC03330770
- 000077777FF377777777C033C03077FFFFF077FF77F777FFFFF7CC00000F7777
- 777077777777777777773CCCCC00000000003777777777777777333330030FFF
- FFF03333F77F7F3FF3F7333C0C030F00F0F03337777F7F77373733C03C030FFF
- FFF03377F77F7F3F333733C03C030F0FFFF03377F7737F733FF733C000330FFF
- 0000337777F37F3F7777333CCC330F0F0FF0333777337F737F37333333330FFF
- 0F03333333337FFF7F7333333333000000333333333377777733}
- NumGlyphs = 2
- end
- object BitBtn3: TBitBtn
- Left = 383
- Top = 220
- Width = 75
- Height = 25
- Caption = 'Clear'
- Enabled = False
- TabOrder = 6
- OnClick = BitBtn3Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
- 555557777F777555F55500000000555055557777777755F75555005500055055
- 555577F5777F57555555005550055555555577FF577F5FF55555500550050055
- 5555577FF77577FF555555005050110555555577F757777FF555555505099910
- 555555FF75777777FF555005550999910555577F5F77777775F5500505509990
- 3055577F75F77777575F55005055090B030555775755777575755555555550B0
- B03055555F555757575755550555550B0B335555755555757555555555555550
- BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
- 50BB555555555555575F555555555555550B5555555555555575}
- NumGlyphs = 2
- end
- object cbpreview: TCheckBox
- Left = 389
- Top = 119
- Width = 64
- Height = 17
- Caption = 'Preview'
- Checked = True
- State = cbChecked
- TabOrder = 7
- OnClick = cbpreviewClick
- end
- object BitBtn4: TBitBtn
- Left = 383
- Top = 252
- Width = 75
- Height = 25
- Caption = 'Run'
- Enabled = False
- TabOrder = 8
- OnClick = BitBtn4Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333000003333333333F777773FF333333008877700
- 33333337733FFF773F33330887000777033333733F777FFF73F330880FAFAF07
- 703337F37733377FF7F33080F00000F07033373733777337F73F087F00A2200F
- 77037F3737333737FF7F080A0A2A220A07037F737F3333737F7F0F0F0AAAA20F
- 07037F737F3333737F7F0F0A0FAA2A0A08037F737FF33373737F0F7F00FFA00F
- 780373F737FFF737F3733080F00000F0803337F73377733737F330F80FAFAF08
- 8033373F773337733733330F8700078803333373FF77733F733333300FFF8800
- 3333333773FFFF77333333333000003333333333377777333333}
- NumGlyphs = 2
- end
- object BitBtn5: TBitBtn
- Left = 382
- Top = 359
- Width = 75
- Height = 25
- Caption = 'Close'
- TabOrder = 9
- OnClick = BitBtn5Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333000003333333333F777773FF333333008877700
- 33333337733FFF773F33330887000777033333733F777FFF73F330880F9F9F07
- 703337F37733377FF7F33080F00000F07033373733777337F73F087F0091100F
- 77037F3737333737FF7F08090919110907037F737F3333737F7F0F0F0999910F
- 07037F737F3333737F7F0F090F99190908037F737FF33373737F0F7F00FF900F
- 780373F737FFF737F3733080F00000F0803337F73377733737F330F80F9F9F08
- 8033373F773337733733330F8700078803333373FF77733F733333300FFF8800
- 3333333773FFFF77333333333000003333333333377777333333}
- NumGlyphs = 2
- end
- object PageControl1: TPageControl
- Left = 15
- Top = 204
- Width = 183
- Height = 182
- ActivePage = TabSheet1
- TabOrder = 10
- object TabSheet1: TTabSheet
- Caption = 'Options'
- object Label1: TLabel
- Left = 40
- Top = 11
- Width = 27
- Height = 13
- Caption = 'Delay'
- end
- object Label2: TLabel
- Left = 9
- Top = 40
- Width = 58
- Height = 13
- Caption = 'Background'
- end
- object delay: TEdit
- Left = 75
- Top = 8
- Width = 32
- Height = 21
- TabOrder = 0
- Text = '3'
- end
- object rgstretch: TRadioGroup
- Left = 12
- Top = 63
- Width = 151
- Height = 80
- Caption = 'Stretch'
- ItemIndex = 0
- Items.Strings = (
- 'Original Size'
- 'Full Screen'
- 'Full Screen Aspect')
- TabOrder = 1
- end
- object pbgColor: TPanel
- Left = 75
- Top = 35
- Width = 32
- Height = 25
- TabOrder = 2
- OnClick = pbgColorClick
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Transitions'
- object lthickness: TLabel
- Left = 6
- Top = 44
- Width = 49
- Height = 13
- Alignment = taRightJustify
- Caption = 'Thickness'
- end
- object lSpeed: TLabel
- Left = 24
- Top = 16
- Width = 31
- Height = 13
- AutoSize = False
- Caption = 'Speed'
- end
- object thickness: TTrackBar
- Left = 57
- Top = 42
- Width = 90
- Height = 20
- Max = 20
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = thicknessChange
- end
- object trantype: TRadioGroup
- Left = 6
- Top = 72
- Width = 163
- Height = 78
- Caption = 'Type'
- Columns = 2
- Items.Strings = (
- 'None'
- 'Horizontal'
- 'Vertical'
- 'Diagonal'
- 'Squares'
- 'Rectangle')
- TabOrder = 1
- end
- object Speed: TTrackBar
- Left = 57
- Top = 14
- Width = 90
- Height = 20
- Max = 100
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = SpeedChange
- end
- object sspeed: TStaticText
- Left = 148
- Top = 16
- Width = 10
- Height = 17
- Caption = '0'
- TabOrder = 3
- end
- object sthickness: TStaticText
- Left = 148
- Top = 44
- Width = 10
- Height = 17
- Caption = '0'
- TabOrder = 4
- end
- end
- object TabSheet3: TTabSheet
- Caption = 'Caption'
- object cbname: TCheckBox
- Left = 9
- Top = 33
- Width = 97
- Height = 17
- Alignment = taLeftJustify
- Caption = 'Show File Name'
- TabOrder = 0
- end
- object rgposition: TRadioGroup
- Left = 8
- Top = 82
- Width = 86
- Height = 65
- Caption = 'Position'
- ItemIndex = 0
- Items.Strings = (
- 'Top'
- 'Middle'
- 'Bottom')
- TabOrder = 1
- end
- object scaption: TEdit
- Left = 9
- Top = 7
- Width = 155
- Height = 21
- TabOrder = 2
- end
- object Button1: TButton
- Left = 98
- Top = 91
- Width = 75
- Height = 25
- Caption = 'Font'
- TabOrder = 3
- OnClick = Button1Click
- end
- object cbtransparent: TCheckBox
- Left = 30
- Top = 50
- Width = 76
- Height = 17
- Alignment = taLeftJustify
- Caption = 'Transparent'
- TabOrder = 4
- end
- object cbshadow: TCheckBox
- Left = 48
- Top = 67
- Width = 58
- Height = 17
- Alignment = taLeftJustify
- Caption = 'Shadow'
- TabOrder = 5
- end
- object BitBtn8: TBitBtn
- Left = 98
- Top = 121
- Width = 75
- Height = 25
- Caption = 'Shadow Color'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- OnClick = Button2Click
- end
- end
- end
- object BitBtn6: TBitBtn
- Left = 383
- Top = 290
- Width = 75
- Height = 25
- Caption = 'Open'
- TabOrder = 11
- OnClick = BitBtn6Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
- 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
- 07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
- 0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
- 33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
- B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
- 3BB33773333773333773B333333B3333333B7333333733333337}
- NumGlyphs = 2
- end
- object BitBtn7: TBitBtn
- Left = 383
- Top = 323
- Width = 75
- Height = 25
- Caption = 'Save As'
- Enabled = False
- TabOrder = 12
- OnClick = BitBtn7Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
- 7700333333337777777733333333008088003333333377F73377333333330088
- 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
- 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
- FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
- 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
- 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
- 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
- 93337FFFF7737777733300000033333333337777773333333333}
- NumGlyphs = 2
- end
- object od: TOpenDialog
- Filter = '2020 Slide Show|*.SS2'
- Title = 'Open 20/20 Slide Show'
- Left = 119
- Top = 3
- end
- object sd: TSaveDialog
- Filter = '20/20 Slide Show|*.SS2'
- Title = 'Save Slide Show'
- Left = 155
- Top = 2
- end
- object fd: TFontDialog
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MinFontSize = 0
- MaxFontSize = 0
- Left = 186
- Top = 4
- end
- object cd: TColorDialog
- Ctl3D = True
- Options = [cdFullOpen]
- Left = 88
- Top = 5
- end
- end
-