Chip 2002 July/Chip_2002-07_cd1.bin/sharewar/cwriter/Imgcpwrt.exe/0/RCDATA/TFORM1/TFORM1.txt

Text File | 2001-08-15 | 7KB | 363 lines

object Form1: TForm1
  Left = 290
  Top = 185
  ActiveControl = Button1
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Copyright Writer 1.0'
  ClientHeight = 366
  ClientWidth = 587
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 292
    Width = 48
    Height = 13
    Caption = 'Output Dir'
  end
  object Label2: TLabel
    Left = 9
    Top = 324
    Width = 68
    Height = 13
    Caption = 'Copyright Text'
  end
  object Label3: TLabel
    Left = 473
    Top = 177
    Width = 26
    Height = 13
    Caption = 'Prefix'
  end
  object Label4: TLabel
    Left = 473
    Top = 152
    Width = 20
    Height = 13
    Caption = 'Size'
  end
  object Label5: TLabel
    Left = 474
    Top = 296
    Width = 44
    Height = 13
    Caption = 'Font Size'
  end
  object Label6: TLabel
    Left = 474
    Top = 270
    Width = 24
    Height = 13
    Caption = 'Color'
  end
  object Label7: TLabel
    Left = 470
    Top = 4
    Width = 107
    Height = 20
    Caption = 'www.infojet.cz'
    Color = clBtnFace
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Label9: TLabel
    Left = 480
    Top = 25
    Width = 86
    Height = 13
    Caption = '[e-mail]'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label11: TLabel
    Left = 478
    Top = 40
    Width = 90
    Height = 13
    Caption = 'Czech Republic'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Bevel1: TBevel
    Left = 471
    Top = 100
    Width = 110
    Height = 10
    Shape = bsBottomLine
  end
  object Label10: TLabel
    Left = 479
    Top = 71
    Width = 94
    Height = 29
    Caption = 'Freeware!'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -24
    Font.Name = 'Arial Narrow'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label12: TLabel
    Left = 477
    Top = 72
    Width = 94
    Height = 29
    Caption = 'Freeware!'
    Font.Charset = ANSI_CHARSET
    Font.Color = clLime
    Font.Height = -24
    Font.Name = 'Arial Narrow'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label8: TLabel
    Left = 8
    Top = 305
    Width = 66
    Height = 13
    Caption = 'without end. \'
  end
  object Button1: TButton
    Left = 156
    Top = 5
    Width = 80
    Height = 25
    Caption = 'Select Images'
    TabOrder = 0
    OnClick = Button1Click
  end
  object Panel1: TPanel
    Left = 243
    Top = 4
    Width = 223
    Height = 161
    BevelInner = bvLowered
    BorderWidth = 5
    Caption = 'No Images '
    TabOrder = 1
    object Image1: TImage
      Left = 7
      Top = 7
      Width = 209
      Height = 147
      Center = True
      IncrementalDisplay = True
      Stretch = True
    end
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 3
    Top = 4
    Width = 145
    Height = 154
    ItemHeight = 16
    TabOrder = 2
    OnChange = DirectoryListBox1Change
  end
  object Button2: TButton
    Left = 156
    Top = 37
    Width = 80
    Height = 25
    Caption = 'Clear List'
    TabOrder = 3
    OnClick = Button2Click
  end
  object Panel2: TPanel
    Left = 3
    Top = 165
    Width = 463
    Height = 124
    BevelInner = bvLowered
    BorderWidth = 5
    Caption = 'Panel2'
    TabOrder = 4
    object CheckListBox1: TCheckListBox
      Left = 7
      Top = 7
      Width = 449
      Height = 110
      Align = alClient
      BorderStyle = bsNone
      ItemHeight = 13
      Sorted = True
      TabOrder = 0
      OnClick = CheckListBox1Click
    end
  end
  object Button3: TButton
    Left = 156
    Top = 69
    Width = 80
    Height = 25
    Caption = 'Pick All '
    TabOrder = 5
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 156
    Top = 102
    Width = 80
    Height = 25
    Caption = 'Start'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 6
    OnClick = Button4Click
  end
  object Edit1: TEdit
    Left = 84
    Top = 295
    Width = 379
    Height = 21
    TabOrder = 7
  end
  object Edit2: TEdit
    Left = 84
    Top = 321
    Width = 379
    Height = 21
    TabOrder = 8
  end
  object CheckBox1: TCheckBox
    Left = 471
    Top = 125
    Width = 110
    Height = 17
    Caption = 'Create Thumbnails'
    TabOrder = 9
  end
  object UpDown1: TUpDown
    Left = 565
    Top = 148
    Width = 15
    Height = 21
    Associate = Edit3
    Min = 100
    Max = 250
    Position = 125
    TabOrder = 10
    Wrap = False
  end
  object Edit3: TEdit
    Left = 505
    Top = 148
    Width = 60
    Height = 21
    TabOrder = 11
    Text = '125'
  end
  object Edit5: TEdit
    Left = 505
    Top = 174
    Width = 75
    Height = 21
    TabOrder = 12
    Text = 'th_'
  end
  object Button6: TButton
    Left = 470
    Top = 320
    Width = 114
    Height = 23
    Caption = 'Select Font '
    TabOrder = 13
    OnClick = Button6Click
  end
  object Edit4: TEdit
    Left = 521
    Top = 293
    Width = 46
    Height = 21
    TabOrder = 14
    Text = '10'
  end
  object UpDown2: TUpDown
    Left = 567
    Top = 293
    Width = 15
    Height = 21
    Associate = Edit4
    Min = 6
    Max = 72
    Increment = 2
    Position = 10
    TabOrder = 15
    Wrap = False
  end
  object ProgressBar1: TProgressBar
    Left = 0
    Top = 350
    Width = 587
    Height = 16
    Align = alBottom
    Min = 0
    Max = 100
    TabOrder = 16
  end
  object Panel3: TPanel
    Left = 523
    Top = 270
    Width = 59
    Height = 14
    Color = clBlack
    TabOrder = 17
  end
  object RadioGroup1: TRadioGroup
    Left = 472
    Top = 203
    Width = 111
    Height = 59
    Caption = 'Place Text'
    ItemIndex = 1
    Items.Strings = (
      'Top Left'
      'Bottom Left')
    TabOrder = 18
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Filter = 'JPEG Image File (*.jpeg, *.jpg)|*.jpeg;*.jpg'
    Options = [ofHideReadOnly, ofAllowMultiSelect]
    Left = 51
    Top = 189
  end
  object FontDialog1: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 153
    Top = 189
  end
end