home *** CD-ROM | disk | FTP | other *** search
Text File | 2004-04-06 | 53.1 KB | 1,693 lines |
- object FormCreatePhotoShow: TFormCreatePhotoShow
- Left = 223
- Top = 631
- AutoScroll = False
- Caption = 'Create FotoShow'
- ClientHeight = 337
- ClientWidth = 458
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object PanelButtons: TPanel
- Left = 0
- Top = 301
- Width = 458
- Height = 36
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 0
- DesignSize = (
- 458
- 36)
- object Bevel1: TBevel
- Left = 0
- Top = 0
- Width = 458
- Height = 2
- Align = alTop
- Shape = bsBottomLine
- end
- object BtnCancel: TButton
- Left = 377
- Top = 8
- Width = 75
- Height = 25
- Anchors = [akTop, akRight]
- Caption = 'Cancel'
- TabOrder = 0
- OnClick = BtnCancelClick
- end
- object BtnGo: TButton
- Left = 273
- Top = 8
- Width = 75
- Height = 25
- Anchors = [akTop, akRight]
- Caption = 'Go'
- TabOrder = 1
- OnClick = BtnGoClick
- end
- object BtnBack: TButton
- Left = 190
- Top = 8
- Width = 75
- Height = 25
- Anchors = [akTop, akRight]
- Caption = 'BtnBack'
- TabOrder = 2
- OnClick = BtnBackClick
- end
- end
- object nbCreateShow: TNotebook
- Left = 0
- Top = 0
- Width = 458
- Height = 301
- Align = alClient
- PageIndex = 2
- TabOrder = 1
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbAskSelection'
- object PanelIntro: TPanel
- Left = 0
- Top = 0
- Width = 458
- Height = 301
- Align = alClient
- BevelOuter = bvNone
- Caption = 'PanelIntro'
- TabOrder = 0
- object Image9: TImage
- Left = 0
- Top = 0
- Width = 165
- Height = 301
- Align = alLeft
- end
- object Panel5: TPanel
- Left = 165
- Top = 0
- Width = 293
- Height = 301
- Align = alClient
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 0
- object LblSel1: TLabel
- Left = 32
- Top = 146
- Width = 228
- Height = 13
- Caption = 'Which images do you wish to use for the show ?'
- end
- object Label34: TLabel
- Left = 10
- Top = 23
- Width = 272
- Height = 20
- Caption = 'Welcome to the FotoShow Wizard'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- WordWrap = True
- end
- object Label36: TLabel
- Left = 32
- Top = 52
- Width = 237
- Height = 26
- Caption =
- 'Using this wizard, you can create a movie that will display your' +
- ' photos with transitions and music.'
- WordWrap = True
- end
- object Label1: TLabel
- Left = 32
- Top = 89
- Width = 245
- Height = 26
- Caption =
- 'The resulting file makes it easy to share a collection of images' +
- ' without requiring any additional software.'
- WordWrap = True
- end
- object rbSelected: TRadioButton
- Left = 59
- Top = 168
- Width = 232
- Height = 17
- Caption = 'Selected images'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object rbAll: TRadioButton
- Left = 59
- Top = 188
- Width = 231
- Height = 17
- Caption = 'All displayed images'
- TabOrder = 1
- end
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbVideoOptions'
- object PanelVideoSettings: TPanel
- Left = 0
- Top = 49
- Width = 458
- Height = 252
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object Bevel3: TBevel
- Left = 0
- Top = 0
- Width = 458
- Height = 4
- Align = alTop
- Shape = bsTopLine
- end
- object GroupBox1: TGroupBox
- Left = 40
- Top = 12
- Width = 380
- Height = 133
- Caption = 'Video settings'
- TabOrder = 0
- object Label5: TLabel
- Left = 17
- Top = 19
- Width = 48
- Height = 13
- Caption = 'Video size'
- end
- object Label9: TLabel
- Left = 17
- Top = 41
- Width = 51
- Height = 13
- Caption = 'Transitions'
- end
- object LblImageDuration: TLabel
- Left = 17
- Top = 62
- Width = 70
- Height = 13
- Caption = 'Image duration'
- end
- object LblTransitionDuration: TLabel
- Left = 17
- Top = 86
- Width = 87
- Height = 13
- Caption = 'Transition duration'
- end
- object LblAutoAdjusted: TLabel
- Left = 160
- Top = 66
- Width = 65
- Height = 13
- Caption = 'Auto adjusted'
- Visible = False
- end
- object cbVideoSize: TComboBox
- Left = 113
- Top = 13
- Width = 175
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- OnChange = OnChangedSettings
- Items.Strings = (
- '160x120 (small)'
- '320x240 (medium)'
- '640x480 (large)')
- end
- object cbTransitions: TComboBox
- Left = 113
- Top = 37
- Width = 175
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- ItemIndex = 0
- TabOrder = 1
- Text = 'Random'
- OnChange = OnChangedSettings
- Items.Strings = (
- 'Random'
- 'Fade'
- 'Swip')
- end
- object EditImageDuration: TEdit
- Left = 113
- Top = 62
- Width = 42
- Height = 21
- Enabled = False
- TabOrder = 2
- Text = '4'
- OnChange = OnChangedSettings
- end
- object EditTransitionDuration: TEdit
- Left = 113
- Top = 86
- Width = 42
- Height = 21
- Enabled = False
- TabOrder = 3
- Text = '1'
- OnChange = OnChangedSettings
- end
- object cbTransitionToFirstSlide: TCheckBox
- Left = 19
- Top = 111
- Width = 150
- Height = 17
- Caption = 'Transition to first slide'
- TabOrder = 4
- OnClick = OnChangedSettings
- end
- object cbIncludeCaptions: TCheckBox
- Left = 168
- Top = 111
- Width = 121
- Height = 17
- Caption = 'Include captions'
- TabOrder = 5
- OnClick = OnChangedSettings
- end
- end
- object GroupBox2: TGroupBox
- Left = 40
- Top = 153
- Width = 380
- Height = 92
- TabOrder = 1
- object LabelAudioFileName: TLabel
- Left = 17
- Top = 23
- Width = 71
- Height = 13
- Caption = 'Soundtrack file'
- end
- object BtnSelMusic: TSpeedButton
- Left = 312
- Top = 19
- Width = 23
- Height = 22
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 18000000000000030000C40E0000C40E00000000000000000000808000808000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000808000808000009F9F60CFCF60CFCF60CFCF60CFCF60CFCF60
- CFCF60CFCF60CFCF60CFCF60CFCF60CFCF60CFCF60CFCF000000808000009F9F
- CFFFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FCF
- FF9FCFFF60CFCF000000808000009F9FCFFFFF9FFFFF9FFFFF9FFFFF9FCFFF9F
- FFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FCFFF60CFCF000000808000009F9F
- CFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFF
- FF9FCFFF60CFCF000000808000009F9FCFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9F
- FFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFFFF60CFCF000000808000009F9F
- CFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FCFFF9FFF
- FF9FCFFF60CFCF000000808000009F9FCFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9F
- FFFF9FFFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFFFF60CFCF000000808000009F9F
- CFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFF
- FF9FCFFF60CFCF000000808000009F9FCFFFFFCFFFFFCFFFFFCFFFFFCFFFFFCF
- FFFFCFFFFFCFFFFFCFFFFFCFFFFFCFFFFF9FFFFF60CFCF000000808000009F9F
- 60CFCF60CFCF60CFCF60CFCF60CFCF60CFCF60CFCF009F9F009F9F009F9F009F
- 9F009F9F009F9F808000808000808000009F9FF0F0F0CFFFFFCFFFFF9FFFFF9F
- FFFF009F9F000000808000808000808000808000808000808000808000808000
- 808000009F9F009F9F009F9F009F9F009F9F0000008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000}
- OnClick = BtnSelMusicClick
- end
- object LblFadeoutDuration: TLabel
- Left = 17
- Top = 45
- Width = 70
- Height = 13
- Caption = 'Fadeout (secs)'
- end
- object EditAudioFile: TEdit
- Left = 113
- Top = 20
- Width = 192
- Height = 21
- Color = clScrollBar
- ReadOnly = True
- TabOrder = 0
- OnChange = OnChangedSettings
- end
- object EditFadeAudioDuration: TEdit
- Left = 113
- Top = 43
- Width = 51
- Height = 21
- TabOrder = 1
- Text = '3'
- OnChange = OnChangedSettings
- end
- object cbAutoDurations: TCheckBox
- Left = 19
- Top = 67
- Width = 266
- Height = 17
- Caption = 'Auto adjust image duration to match length of audio'
- TabOrder = 2
- OnClick = OnChangedSettings
- end
- end
- object cbPlayAudio: TCheckBox
- Left = 50
- Top = 151
- Width = 140
- Height = 17
- Caption = 'Include audio with movie'
- TabOrder = 2
- OnClick = OnChangedSettings
- end
- end
- object PanelVideoSettingsHeading: TPanel
- Left = 0
- Top = 0
- Width = 458
- Height = 49
- Align = alTop
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 1
- object Label6: TLabel
- Left = 13
- Top = 8
- Width = 44
- Height = 13
- Caption = 'Options'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label7: TLabel
- Left = 96
- Top = 8
- Width = 241
- Height = 13
- Caption = 'Use the video and options settings below to control'
- end
- object Label3: TLabel
- Left = 96
- Top = 23
- Width = 157
- Height = 13
- Caption = 'the generation of your FotoShow.'
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbCaptionOptions'
- object PanelCaptionOptionsHeading: TPanel
- Left = 0
- Top = 0
- Width = 458
- Height = 49
- Align = alTop
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 0
- object Label12: TLabel
- Left = 96
- Top = 8
- Width = 240
- Height = 13
- Caption = 'Use caption settings below to control how captions'
- end
- object Label33: TLabel
- Left = 13
- Top = 8
- Width = 50
- Height = 13
- Caption = 'Captions'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label35: TLabel
- Left = 96
- Top = 23
- Width = 132
- Height = 13
- Caption = 'display within the slideshow.'
- end
- end
- object PanelCaptionOptions: TPanel
- Left = 0
- Top = 49
- Width = 458
- Height = 252
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 1
- object Bevel10: TBevel
- Left = 0
- Top = 0
- Width = 458
- Height = 4
- Align = alTop
- Shape = bsTopLine
- end
- object GroupBox4: TGroupBox
- Left = 40
- Top = 168
- Width = 380
- Height = 81
- Caption = 'Text Properties'
- TabOrder = 0
- object Label39: TLabel
- Left = 16
- Top = 20
- Width = 80
- Height = 13
- Caption = 'Caption Location'
- end
- object Label37: TLabel
- Left = 16
- Top = 52
- Width = 36
- Height = 13
- Caption = 'Opacity'
- end
- object cbCaptionLocation: TComboBox
- Left = 107
- Top = 16
- Width = 145
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- ItemIndex = 4
- TabOrder = 0
- Text = 'Bottom Center'
- OnChange = Fontchange
- Items.Strings = (
- 'Top Left'
- 'Top Center'
- 'Top Right'
- 'Bottom Left'
- 'Bottom Center'
- 'Bottom Right')
- end
- object tbOpacity: TTrackBar
- Left = 101
- Top = 47
- Width = 150
- Height = 25
- Max = 255
- Frequency = 16
- Position = 255
- TabOrder = 1
- ThumbLength = 12
- OnChange = Fontchange
- end
- end
- object GroupBox5: TGroupBox
- Left = 40
- Top = 6
- Width = 380
- Height = 155
- Caption = 'Font'
- TabOrder = 1
- object Label43: TLabel
- Left = 16
- Top = 115
- Width = 38
- Height = 13
- Caption = 'Preview'
- end
- object dxBarDockControl1: TdxBarDockControl
- Left = 30
- Top = 15
- Width = 199
- Height = 79
- Align = dalNone
- BarManager = dxBarManager1
- end
- object FontPreview: TPanel
- Left = 72
- Top = 97
- Width = 281
- Height = 49
- BevelOuter = bvLowered
- Caption = 'AaBbYyZz'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clYellow
- Font.Height = -13
- Font.Name = 'Arial Black'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbGenerating'
- object PanelCreatingShow: TPanel
- Left = 0
- Top = 49
- Width = 458
- Height = 252
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- DesignSize = (
- 458
- 252)
- object Label13: TLabel
- Left = 98
- Top = 96
- Width = 263
- Height = 13
- Alignment = taCenter
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption = 'Please wait...'
- end
- object Bevel5: TBevel
- Left = 0
- Top = 0
- Width = 458
- Height = 4
- Align = alTop
- Shape = bsTopLine
- end
- object pbCreating: TProgressBar
- Left = 98
- Top = 72
- Width = 263
- Height = 16
- Anchors = [akLeft, akTop, akRight]
- TabOrder = 0
- end
- end
- object PanelCreatingShowHeading: TPanel
- Left = 0
- Top = 0
- Width = 458
- Height = 49
- Align = alTop
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 1
- object Label8: TLabel
- Left = 13
- Top = 8
- Width = 83
- Height = 13
- Caption = 'Creating Show'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label10: TLabel
- Left = 105
- Top = 8
- Width = 224
- Height = 13
- Caption = 'Once the creation process is complete, you will '
- end
- object Label11: TLabel
- Left = 105
- Top = 24
- Width = 164
- Height = 13
- Caption = 'be able to preview your FotoShow.'
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbPreview'
- object PanelPreview: TPanel
- Left = 0
- Top = 49
- Width = 458
- Height = 252
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- DesignSize = (
- 458
- 252)
- object Bevel2: TBevel
- Left = 0
- Top = 0
- Width = 458
- Height = 2
- Align = alTop
- Shape = bsBottomLine
- end
- object SpeedButton3: TSpeedButton
- Left = 89
- Top = 233
- Width = 17
- Height = 17
- Hint = 'Play'
- Anchors = [akLeft, akBottom]
- Flat = True
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 18000000000000030000120B0000120B00000000000000000000FFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA64C4CFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFA64C4CA64C4CFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA64C4CA6
- 4C4CA64C4CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFA64C4CA64C4CA64C4CA64C4CFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA64C4CA6
- 4C4CA64C4CA64C4CA64C4CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFA64C4CA64C4CA64C4CA64C4CFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA64C4CA6
- 4C4CA64C4CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFA64C4CA64C4CFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA64C4CFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
- ParentShowHint = False
- ShowHint = True
- OnClick = btnPlayClick
- end
- object SpeedButton4: TSpeedButton
- Left = 132
- Top = 233
- Width = 17
- Height = 17
- Hint = 'Stop'
- Anchors = [akLeft, akBottom]
- Flat = True
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 18000000000000030000120B0000120B00000000000000000000FFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA64C4CA64C4CA64C4CA6
- 4C4CA64C4CA64C4CA64C4CA64C4CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA64C4CA64C4CA64C4CA6
- 4C4CA64C4CA64C4CA64C4CA64C4CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA64C4CA64C4CA64C4CA6
- 4C4CA64C4CA64C4CA64C4CA64C4CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CA64C4CFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA64C4CA64C4CA64C4CA6
- 4C4CA64C4CA64C4CA64C4CA64C4CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
- ParentShowHint = False
- ShowHint = True
- OnClick = BtnStopClick
- end
- object SpeedButton5: TSpeedButton
- Left = 110
- Top = 233
- Width = 17
- Height = 17
- Hint = 'Pause'
- Anchors = [akLeft, akBottom]
- Flat = True
- Glyph.Data = {
- 36050000424D3605000000000000360400002800000010000000100000000100
- 08000000000000010000120B0000120B00000001000003000000A64C4C00FFFF
- FF00FFFFFF000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000010101010101
- 0101010101010101010101010101010101010101010101010101010101010101
- 0101010101010101010101010101010101010101010101010101010101010000
- 0001010000000101010101010101000000010100000001010101010101010000
- 0001010000000101010101010101000000010100000001010101010101010000
- 0001010000000101010101010101000000010100000001010101010101010000
- 0001010000000101010101010101000000010100000001010101010101010101
- 0101010101010101010101010101010101010101010101010101010101010101
- 0101010101010101010101010101010101010101010101010101}
- ParentShowHint = False
- ShowHint = True
- OnClick = btnPauseClick
- end
- object PanelPlayer: TPanel
- Left = 87
- Top = 5
- Width = 281
- Height = 222
- Anchors = [akLeft, akTop, akRight, akBottom]
- BevelInner = bvLowered
- BevelOuter = bvLowered
- Color = clBlack
- TabOrder = 0
- end
- object pbPlaying: TProgressBar
- Left = 158
- Top = 236
- Width = 220
- Height = 8
- Anchors = [akLeft, akBottom]
- Smooth = True
- TabOrder = 1
- end
- end
- object PanelPreviewShowHeading: TPanel
- Left = 0
- Top = 0
- Width = 458
- Height = 49
- Align = alTop
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 1
- object Label19: TLabel
- Left = 13
- Top = 8
- Width = 81
- Height = 13
- Caption = 'Preview Show'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label23: TLabel
- Left = 105
- Top = 8
- Width = 233
- Height = 13
- Caption = 'Click the play button below to preview your show.'
- end
- object Label24: TLabel
- Left = 105
- Top = 24
- Width = 293
- Height = 13
- Caption = 'Press the Next button to continue, or back to change settings.'
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbFinalize'
- object PanelSaveShow: TPanel
- Left = 0
- Top = 49
- Width = 473
- Height = 252
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object Bevel4: TBevel
- Left = 0
- Top = 0
- Width = 473
- Height = 2
- Align = alTop
- Shape = bsTopLine
- end
- object GroupBox3: TGroupBox
- Left = 46
- Top = 11
- Width = 363
- Height = 128
- Caption = 'Output file'
- TabOrder = 0
- object Label20: TLabel
- Left = 16
- Top = 79
- Width = 42
- Height = 13
- Caption = 'Filename'
- end
- object SpeedButton1: TSpeedButton
- Left = 331
- Top = 78
- Width = 23
- Height = 22
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 18000000000000030000C40E0000C40E00000000000000000000808000808000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000808000808000009F9F60CFCF60CFCF60CFCF60CFCF60CFCF60
- CFCF60CFCF60CFCF60CFCF60CFCF60CFCF60CFCF60CFCF000000808000009F9F
- CFFFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FCF
- FF9FCFFF60CFCF000000808000009F9FCFFFFF9FFFFF9FFFFF9FFFFF9FCFFF9F
- FFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FCFFF60CFCF000000808000009F9F
- CFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFF
- FF9FCFFF60CFCF000000808000009F9FCFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9F
- FFFF9FCFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFFFF60CFCF000000808000009F9F
- CFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FCFFF9FFF
- FF9FCFFF60CFCF000000808000009F9FCFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9F
- FFFF9FFFFF9FFFFF9FCFFF9FFFFF9FCFFF9FFFFF60CFCF000000808000009F9F
- CFFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFFFF9FFF
- FF9FCFFF60CFCF000000808000009F9FCFFFFFCFFFFFCFFFFFCFFFFFCFFFFFCF
- FFFFCFFFFFCFFFFFCFFFFFCFFFFFCFFFFF9FFFFF60CFCF000000808000009F9F
- 60CFCF60CFCF60CFCF60CFCF60CFCF60CFCF60CFCF009F9F009F9F009F9F009F
- 9F009F9F009F9F808000808000808000009F9FF0F0F0CFFFFFCFFFFF9FFFFF9F
- FFFF009F9F000000808000808000808000808000808000808000808000808000
- 808000009F9F009F9F009F9F009F9F009F9F0000008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000}
- Layout = blGlyphTop
- OnClick = SpeedButton1Click
- end
- object Label32: TLabel
- Left = 16
- Top = 105
- Width = 35
- Height = 13
- Caption = 'Add To'
- end
- object LblDestAlbum: TLabel
- Left = 65
- Top = 105
- Width = 121
- Height = 13
- Cursor = crHandPoint
- Caption = 'Click here to select album'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- OnClick = LblDestAlbumClick
- end
- object EditDestFile: TEdit
- Left = 64
- Top = 77
- Width = 261
- Height = 21
- TabOrder = 0
- end
- object rbSaveWmv: TRadioButton
- Left = 16
- Top = 20
- Width = 337
- Height = 25
- Hint =
- 'Use WMV if you plan on uploading the video to the web or sharing' +
- ' it with others through the internet. WMV compression gives goo' +
- 'd quality and results in very small filesizes.'
- Caption = 'WMV - best for sharing. Good quality and small filesize.'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- TabStop = True
- WordWrap = True
- OnClick = rbSaveAVIClick
- end
- object rbSaveAVI: TRadioButton
- Left = 16
- Top = 45
- Width = 329
- Height = 25
- Hint =
- 'Use AVI if you plan on using this video in a video editor or pla' +
- 'n on coverting it to MPEG using 3rd party tools. AVI files are ' +
- 'very large, but are uncompressed.'
- Caption = 'AVI - best for editing. Best quality, but very large filesize.'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- WordWrap = True
- OnClick = rbSaveAVIClick
- end
- end
- object gbDefinition: TGroupBox
- Left = 46
- Top = 147
- Width = 363
- Height = 97
- Caption = 'Definition of show'
- TabOrder = 1
- object LblSelAlbumForGroup: TLabel
- Left = 130
- Top = 44
- Width = 121
- Height = 13
- Cursor = crHandPoint
- Caption = 'Click here to select album'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- OnClick = LblSelAlbumForGroupClick
- end
- object LblNewGroup: TLabel
- Left = 23
- Top = 68
- Width = 81
- Height = 13
- Caption = 'New group name'
- end
- object LblAlbumNewGroup: TLabel
- Left = 23
- Top = 44
- Width = 97
- Height = 13
- Caption = 'Album for new group'
- end
- object cbSaveSettingsTo: TCheckBox
- Left = 16
- Top = 20
- Width = 273
- Height = 17
- Caption = 'Add images from show into a new group'
- TabOrder = 0
- OnClick = cbSaveSettingsToClick
- end
- object EditNewGroupName: TEdit
- Left = 130
- Top = 65
- Width = 125
- Height = 21
- TabOrder = 1
- end
- end
- end
- object PanelSaveShowHeading: TPanel
- Left = 0
- Top = 0
- Width = 473
- Height = 49
- Align = alTop
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 1
- object Label14: TLabel
- Left = 13
- Top = 8
- Width = 65
- Height = 13
- Caption = 'Save Show'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label15: TLabel
- Left = 96
- Top = 8
- Width = 231
- Height = 13
- Caption = 'You can now save your FotoShow and optionally'
- end
- object Label16: TLabel
- Left = 96
- Top = 24
- Width = 181
- Height = 13
- Caption = 'choose an album to add your video to.'
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbTooMany'
- object PanelSizeWarning: TPanel
- Left = 0
- Top = 50
- Width = 473
- Height = 251
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object LblWarning1: TLabel
- Left = 80
- Top = 48
- Width = 280
- Height = 13
- Caption = 'You have chosen to create a photo show from xxx pictures.'
- end
- object LblWarning2: TLabel
- Left = 80
- Top = 64
- Width = 227
- Height = 13
- Caption = 'The recommended maximum for a single show is'
- end
- object Label21: TLabel
- Left = 80
- Top = 96
- Width = 290
- Height = 13
- Caption = 'You can continue creating this show, but you may experience'
- end
- object Label22: TLabel
- Left = 80
- Top = 112
- Width = 252
- Height = 13
- Caption = 'long creation times or the generation process may fail.'
- end
- object Bevel6: TBevel
- Left = 0
- Top = 0
- Width = 473
- Height = 4
- Align = alTop
- Shape = bsTopLine
- end
- object cbDontWarn: TCheckBox
- Left = 133
- Top = 230
- Width = 209
- Height = 17
- Caption = 'Do not show this warning again.'
- TabOrder = 0
- end
- end
- object PanelSizeWarningHeading: TPanel
- Left = 0
- Top = 0
- Width = 473
- Height = 50
- Align = alTop
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 1
- object Label25: TLabel
- Left = 13
- Top = 8
- Width = 48
- Height = 13
- Caption = 'Warning'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label26: TLabel
- Left = 96
- Top = 8
- Width = 261
- Height = 13
- Caption = 'Using this many pictures, you might encounter problems'
- end
- object Label2: TLabel
- Left = 96
- Top = 24
- Width = 90
- Height = 13
- Caption = ' creating the show.'
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbSaving'
- object PanelSavingHeading: TPanel
- Left = 0
- Top = 0
- Width = 458
- Height = 49
- Align = alTop
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 0
- object Label17: TLabel
- Left = 13
- Top = 8
- Width = 80
- Height = 13
- Caption = 'Saving Status'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label18: TLabel
- Left = 105
- Top = 8
- Width = 146
- Height = 13
- Caption = 'Your final show is being saved.'
- end
- end
- object PanelSaving: TPanel
- Left = 0
- Top = 49
- Width = 458
- Height = 252
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 1
- DesignSize = (
- 458
- 252)
- object Bevel7: TBevel
- Left = 0
- Top = 0
- Width = 458
- Height = 4
- Align = alTop
- Shape = bsTopLine
- end
- object LblSaveStatus: TLabel
- Left = 110
- Top = 88
- Width = 244
- Height = 13
- Alignment = taCenter
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption = 'Saving...'
- end
- object pbSaveProgress: TProgressBar
- Left = 106
- Top = 64
- Width = 252
- Height = 16
- Anchors = [akLeft, akTop, akRight]
- TabOrder = 0
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbFinalOk'
- object PanelFinishedHeading: TPanel
- Left = 0
- Top = 0
- Width = 473
- Height = 49
- Align = alTop
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 0
- object Label27: TLabel
- Left = 16
- Top = 8
- Width = 48
- Height = 13
- Caption = 'Finished'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label28: TLabel
- Left = 99
- Top = 8
- Width = 222
- Height = 13
- Caption = 'Your photo show has been created and saved.'
- end
- end
- object PanelFinished: TPanel
- Left = 0
- Top = 49
- Width = 473
- Height = 252
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 1
- object Bevel8: TBevel
- Left = 0
- Top = 0
- Width = 473
- Height = 2
- Align = alTop
- Shape = bsTopLine
- end
- object Label29: TLabel
- Left = 116
- Top = 64
- Width = 198
- Height = 13
- Caption = 'If you wish to modify this movie, be sure to'
- end
- object Label30: TLabel
- Left = 116
- Top = 80
- Width = 207
- Height = 13
- Caption = 'choose the same album or group before you'
- end
- object Label31: TLabel
- Left = 116
- Top = 97
- Width = 215
- Height = 13
- Caption = 'start. This will ensure all settings are retained.'
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'nbDxUpgrade'
- object PanelDxUpgrade: TPanel
- Left = 0
- Top = 0
- Width = 473
- Height = 301
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 473
- Height = 49
- Align = alTop
- BevelOuter = bvNone
- Color = clWindow
- TabOrder = 0
- object Label4: TLabel
- Left = 16
- Top = 8
- Width = 28
- Height = 13
- Caption = 'Error'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object LblUpdateHeading: TLabel
- Left = 99
- Top = 8
- Width = 326
- Height = 33
- AutoSize = False
- Caption = 'You need to upgrade your version of DirectX.'
- WordWrap = True
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 49
- Width = 473
- Height = 252
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 1
- object Bevel9: TBevel
- Left = 0
- Top = 0
- Width = 473
- Height = 2
- Align = alTop
- Shape = bsTopLine
- end
- object Label38: TLabel
- Left = 48
- Top = 32
- Width = 361
- Height = 13
- Caption =
- 'In order to create a FotoShow Video, you need the following free' +
- ' downloads:'
- end
- object LblDownloadDirectX: TLabel
- Left = 48
- Top = 75
- Width = 338
- Height = 13
- Cursor = crHandPoint
- Caption =
- 'Click here to go to Microsoft and download the latest version of' +
- ' DirectX.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- OnClick = DownloadDirectXClick
- end
- object LblDownloadWindowsMediaPlayer: TLabel
- Left = 48
- Top = 99
- Width = 347
- Height = 26
- Cursor = crHandPoint
- Caption =
- 'Click here to go to Microsoft and download the latest version of' +
- ' Windows Media Player.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- WordWrap = True
- OnClick = DownloadWindowsMediaPlayer
- end
- end
- end
- end
- end
- object OpenDialogAudio: TOpenDialog
- Filter = 'Mpeg audio|*.mp3|Wav Audio|*.wav'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
- Title = 'Select audio file'
- Left = 416
- Top = 217
- end
- object sdOutput: TSaveDialog
- Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
- Left = 414
- Top = 100
- end
- object dxBarManager1: TdxBarManager
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- Bars = <
- item
- AllowClose = False
- AllowCustomizing = False
- AllowQuickCustomizing = False
- AllowReset = False
- BorderStyle = bbsNone
- Caption = 'Color'
- DockControl = dxBarDockControl1
- DockedDockControl = dxBarDockControl1
- DockedLeft = 0
- DockedTop = 0
- FloatLeft = 564
- FloatTop = 432
- FloatClientWidth = 187
- FloatClientHeight = 19
- ItemLinks = <
- item
- Item = cbFontFace
- Visible = True
- end
- item
- Item = cbFontSize
- Visible = True
- end
- item
- Item = btnSelColor
- UserDefine = [udWidth]
- UserWidth = 187
- Visible = True
- end
- item
- Item = btnBoldFont
- Visible = True
- end
- item
- Item = btnItalicFont
- Visible = True
- end
- item
- Item = btnUnderlineFont
- Visible = True
- end>
- MultiLine = True
- Name = 'Color'
- NotDocking = [dsNone, dsLeft, dsTop, dsBottom]
- OneOnRow = True
- Row = 0
- UseOwnFont = False
- Visible = True
- WholeRow = False
- end>
- Categories.Strings = (
- 'Default')
- Categories.ItemsVisibles = (
- 2)
- Categories.Visibles = (
- True)
- PopupMenuLinks = <>
- UseSystemFont = True
- Left = 392
- Top = 112
- DockControlHeights = (
- 0
- 0
- 0
- 0)
- object cbFontFace: TdxBarFontNameCombo
- Caption = 'Face '
- Category = 0
- Hint = 'Face '
- Visible = ivAlways
- Text = 'Arial Black'
- OnChange = Fontchange
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888888888888888888888888888888888444488844444488887488888744
- 7888888448888744888888874888844788888888444444488888888874884478
- 8888888884484488888888888744478888888888884448888888888888747888
- 8888888888848888888888888888888888888888888888888888}
- ShowCaption = True
- Width = 168
- DropDownCount = 12
- end
- object cbFontSize: TdxBarCombo
- Caption = 'Size '
- Category = 0
- Hint = 'Size '
- Visible = ivAlways
- Text = '10'
- OnChange = Fontchange
- ShowCaption = True
- Width = 169
- ShowEditor = False
- Items.Strings = (
- '8'
- '10'
- '12'
- '14'
- '16'
- '18'
- '20'
- '24'
- '36')
- ItemIndex = 1
- end
- object btnSelColor: TdxBarColorCombo
- Caption = 'Color'
- Category = 0
- Hint = 'Color'
- Visible = ivAlways
- OnChange = Fontchange
- Glyph.Data = {
- 36050000424D3605000000000000360400002800000010000000100000000100
- 0800000000000001000000000000000000000001000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
- A6000020400000206000002080000020A0000020C0000020E000004000000040
- 20000040400000406000004080000040A0000040C0000040E000006000000060
- 20000060400000606000006080000060A0000060C0000060E000008000000080
- 20000080400000806000008080000080A0000080C0000080E00000A0000000A0
- 200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
- 200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
- 200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
- 20004000400040006000400080004000A0004000C0004000E000402000004020
- 20004020400040206000402080004020A0004020C0004020E000404000004040
- 20004040400040406000404080004040A0004040C0004040E000406000004060
- 20004060400040606000406080004060A0004060C0004060E000408000004080
- 20004080400040806000408080004080A0004080C0004080E00040A0000040A0
- 200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
- 200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
- 200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
- 20008000400080006000800080008000A0008000C0008000E000802000008020
- 20008020400080206000802080008020A0008020C0008020E000804000008040
- 20008040400080406000804080008040A0008040C0008040E000806000008060
- 20008060400080606000806080008060A0008060C0008060E000808000008080
- 20008080400080806000808080008080A0008080C0008080E00080A0000080A0
- 200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
- 200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
- 200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
- 2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
- 2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
- 2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
- 2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
- 2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
- 2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
- 2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFF000101A6
- 000202B4000404E4FFFFFFFF000101A6000202B4000404E4FFFFFFFF000EF9A7
- 0030FABC00C0FCE4FFFFFFFF0000F9A70000FABC0000FCE4FFFFFFFF000001A7
- 000002BC000004E4FFFFFFFF000001A7000002BC000004E4FFFFFFFF000001A7
- 000002BC000004E4FFFFFFFF000001A7000002BC000004E4FFFFFFFF000001A7
- 000002BC000004E4FFFFFFFF0000F9A70000FABC0000FCE4FFFFFFFF000EF9A7
- 0030FABC00C0FCE4FFFFFFFF000101A6000202B4000404E4FFFFFFFF000101A6
- 000202B4000404E4FFFFFFFF5201F9075202FA075204FC07FFFFFFFF070056FF
- 070072FF0700D2FFFFFFFFFFFF5207FFFF5207FFFF5207FFFFFF}
- ShowCaption = True
- Width = 100
- ShowEditor = True
- AutoColor = clBtnFace
- AutoColorText = '(Windows Colors)'
- Color = clYellow
- ShowAutoColor = True
- ShowCustomColorButton = True
- end
- object btnBoldFont: TdxBarButton
- Caption = 'Bold'
- Category = 0
- Hint = 'Bold'
- Visible = ivAlways
- ButtonStyle = bsChecked
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777777777777777777777777777777777777777777777777777000000007
- 7777777700077000777777770007700077777777000770007777777700000007
- 7777777700077000777777770007700077777777000770007777777000000007
- 7777777777777777777777777777777777777777777777777777}
- OnClick = Fontchange
- end
- object btnItalicFont: TdxBarButton
- Caption = 'Italic'
- Category = 0
- Hint = 'Italic'
- Visible = ivAlways
- ButtonStyle = bsChecked
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777777777777777777777777777777777777777777777777777000000777
- 7777777770087777777777777800777777777777770087777777777777800777
- 7777777777700877777777777778007777777777777700877777777777700000
- 7777777777777777777777777777777777777777777777777777}
- OnClick = Fontchange
- end
- object btnUnderlineFont: TdxBarButton
- Caption = 'Underline'
- Category = 0
- Hint = 'Underline'
- Visible = ivAlways
- ButtonStyle = bsChecked
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888888888888888888800000000088888888888888888888888880000088
- 8888888800787008888888880088800888888888008880088888888800888008
- 8888888800888008888888880088800888888888008880088888888000080000
- 8888888888888888888888888888888888888888888888888888}
- OnClick = Fontchange
- end
- end
- end
-