object ThumbForm: TThumbForm
  Left = 7
  Top = 51
  BorderStyle = bsDialog
  Caption = 'Image pre-viewer'
  ClientHeight = 352
  ClientWidth = 609
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  TextHeight = 14
  object Label1: TLabel
    Left = 3
    Top = 6
    Width = 157
    Height = 15
    AutoSize = False
    Color = clGray
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Gauge1: TGauge
    Left = 505
    Top = 160
    Width = 97
    Height = 9
    BorderStyle = bsNone
    ForeColor = clNavy
    BackColor = clBtnFace
    Progress = 0
  end
  object Label2: TLabel
    Left = 496
    Top = 62
    Width = 112
    Height = 14
    Alignment = taCenter
    AutoSize = False
    Font.Color = clBlack
    Font.Height = -9
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
  end
  object StopBtn: TSpeedButton
    Left = 526
    Top = 80
    Width = 57
    Height = 30
    Glyph.Data = {
      80010000424D8001000000000000760000002800000014000000140000000100
      040000000000F000000000000000000000000000000000000000000000000000
      BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777777700007777711111111177777700007777199999999917777700007771
      9999999999917777000077199999999999991777000071999999999999999177
      000019999999999999999917000019FFF99F99FFF9F9991700001999F99F99F9
      F9F99917000019FFF99F99F9F9FFF917000019F9999F99F9F9F9F917000019FF
      F9FFF9FFF9FFF917000019999999999999999917000019999999999999999917
      0000719999999999999991770000771999999999999917770000777199999999
      9991777700007777199999999917777700007777711111111177777700007777
      7777777777777777000000000000000000000000000000000000000000000000
      00000000}
    Visible = False
    OnClick = AbortBtnClick
  end
  object Image1: TImage
    Left = 530
    Top = 115
    Width = 49
    Height = 37
    Center = True
    Picture.Data = {<image000.ico>}
    OnDragDrop = Image1DragDrop
    OnDragOver = Image1DragOver
  end
  object Thumbs: TStringGrid
    Left = 168
    Top = 7
    Width = 324
    Height = 301
    DefaultColWidth = 60
    DefaultRowHeight = 50
    FixedCols = 0
    FixedRows = 0
    Font.Color = clBlack
    Font.Height = -9
    Font.Name = 'Arial'
    Font.Style = []
    Options = [goVertLine, goHorzLine]
    ParentColor = True
    ParentFont = False
    RowCount = 10
    ScrollBars = ssVertical
    TabOrder = 0
    OnClick = ThumbsClick
    OnDblClick = ThumbsDblClick
    OnDragDrop = ThumbsDragDrop
    OnDragOver = ThumbsDragOver
    OnDrawCell = ThumbsDrawCell
    OnKeyDown = ThumbsKeyDown
    OnMouseDown = ThumbsMouseDown
    OnMouseMove = ThumbsMouseMove
  end
  object DriveComboBox1: TDriveComboBox
    Left = 7
    Top = 322
    Width = 148
    Height = 21
    Color = clBtnFace
    Font.Color = clBtnText
    Font.Height = -12
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnChange = DriveComboBox1Change
    OnClick = DriveComboBox1Click
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 8
    Top = 199
    Width = 146
    Height = 117
    Color = clBtnFace
    Font.Color = clBtnText
    Font.Height = -12
    Font.Name = 'Times New Roman'
    Font.Style = []
    ItemHeight = 16
    ParentFont = False
    TabOrder = 2
    OnChange = DirectoryListBox1Change
    OnClick = DirectoryListBox1Click
  end
  object FileListBox1: TFileListBox
    Left = 8
    Top = 54
    Width = 144
    Height = 141
    Hint = 'Drag Image on the grid to create thumbnail'
    Color = clBtnFace
    Font.Color = clBtnText
    Font.Height = -12
    Font.Name = 'Times New Roman'
    Font.Style = []
    ItemHeight = 16
    Mask = '*.JPG;*.GIF;*.PCX;*.BMP;*.PNG;*.TIF;*.WMF;*.ICO'
    ParentFont = False
    ShowGlyphs = True
    TabOrder = 3
    OnChange = FileListBox1Change
    OnClick = FileListBox1Click
    OnDblClick = FileListBox1DblClick
    OnKeyDown = FileListBox1KeyDown
    OnMouseDown = FileListBox1MouseDown
  end
  object ComboBox1: TComboBox
    Left = 8
    Top = 27
    Width = 145
    Height = 22
    Color = clBtnFace
    DropDownCount = 15
    Font.Color = clBtnText
    Font.Height = -11
    Font.Name = 'Times New Roman'
    Font.Style = []
    ItemHeight = 14
    Items.Strings = (
      '*.JPG;*.GIF;*.PCX;*.BMP;*.PNG;*.TIF;*.WMF;*.ICO'
      '*.JPG'
      '*.GIF'
      '*.PCX'
      '*.BMP'
      '*.PNG'
      '*.TIF'
      '*.WMF'
      '*.ICO')
    ParentFont = False
    TabOrder = 4
    Text = 'Select file type'
    OnChange = ComboBox1Change
    OnClick = ComboBox1Click
  end
  object PMultiImage2: TPMultiImage
    Left = 521
    Top = 9
    Width = 60
    Height = 50
    Center = True
    Color = clBtnFace
    ImageName = 'file not found'
    ImageDither = True
    ImageReadRes = lAutoMatic
    ImageWriteRes = sAutoMatic
    TifSaveCompress = sNONE
    JPegSaveQuality = 25
    JPegSaveSmooth = 0
    TextLeft = 0
    TextTop = 0
    TextRotate = 0
    TabOrder = 6
    TabStop = False
    Visible = False
  end
  object GroupBox2: TGroupBox
    Left = 501
    Top = 173
    Width = 102
    Height = 103
    Hint = 'Resolution of the previews'
    Caption = 'Resolution'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 7
    object SaveRes24: TRadioButton
      Left = 2
      Top = 61
      Width = 96
      Height = 17
      Caption = 'True color'
      TabOrder = 0
      OnClick = Saveresclick
    end
    object SaveRes8: TRadioButton
      Left = 2
      Top = 37
      Width = 96
      Height = 17
      Caption = '256 colors'
      TabOrder = 1
      OnClick = Saveresclick
    end
    object SaveRes4System: TRadioButton
      Left = 2
      Top = 15
      Width = 98
      Height = 17
      Caption = '16 system colors'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = Saveresclick
    end
    object SaveResAuto: TRadioButton
      Left = 2
      Top = 83
      Width = 68
      Height = 17
      Caption = 'Automatic'
      Checked = True
      TabOrder = 3
      TabStop = True
      OnClick = Saveresclick
    end
  end
  object PMultiImage1: TPMultiImage
    Left = 521
    Top = 9
    Width = 60
    Height = 50
    Center = True
    Color = clBtnFace
    ImageName = 'file not found'
    ImageDither = True
    ImageReadRes = lAutoMatic
    ImageWriteRes = sAutoMatic
    TifSaveCompress = sNONE
    JPegSaveQuality = 25
    JPegSaveSmooth = 0
    Stretch = True
    TextLeft = 0
    TextTop = 0
    TextRotate = 0
    TabOrder = 5
    TabStop = False
  end
  object GroupBox1: TGroupBox
    Left = 500
    Top = 288
    Width = 104
    Height = 56
    Caption = 'Optimize previews'
    TabOrder = 8
    object RSpeed: TRadioButton
      Left = 2
      Top = 15
      Width = 71
      Height = 17
      Caption = 'for speed'
      Checked = True
      TabOrder = 0
      TabStop = True
      OnClick = RSpeedClick
    end
    object RSize: TRadioButton
      Left = 2
      Top = 36
      Width = 71
      Height = 17
      Caption = 'for size'
      TabOrder = 1
      OnClick = RSpeedClick
    end
  end
  object Panel1: TPanel
    Left = 167
    Top = 307
    Width = 325
    Height = 37
    BevelOuter = bvLowered
    TabOrder = 9
    object LoadBtn: TSpeedButton
      Left = 1
      Top = 2
      Width = 37
      Height = 34
      Hint = 'Load all existing thumbs'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777780087777777800000000000087708800888800
        880770880888888088077088087888808807708808E78880880770FF00888800
        FF0770FFF000000FFF0770000000000000077700780FF0870077777777800877
        7777777777777777777777777777777777777777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = LoadBtnClick
    end
    object CreateNewKeep: TSpeedButton
      Left = 37
      Top = 2
      Width = 37
      Height = 34
      Hint = 'Create new previews keep old ones'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        77777777777777777777777800000008777777707777777077007770788F8870
        008077707777777080807770777887707070777078800870F070777080088070
        00F0007008877070770008088770000877770F07700777777777007007777777
        7777777777777777777777777777777777777777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = IncAllKeepBtnClick
    end
    object CreateNewDelete: TSpeedButton
      Left = 73
      Top = 2
      Width = 37
      Height = 34
      Hint = 'Create new previews and delete old ones'
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007000000000000000700000007077770770770770700000007007
        7077077077007000000070707777770770707000000070770770707707707000
        0000707770770700777070000000707777007777777070000000707777777777
        7770700000007077777777700770700000007077777777077070700000007077
        7777770770707000000070777777777007707000000070777777777777707000
        0000700000000000000070000000777777777777777770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = CreateNewDeleteClick
    end
    object DeleteAllBtn: TSpeedButton
      Left = 109
      Top = 2
      Width = 37
      Height = 34
      Hint = 'Delete all previews'
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        777770000000777777777777777770000000777777777777770F700000007777
        0F777777777770000000777000F7777770F770000000777000F777770F777000
        00007777000F77700F777000000077777000F700F7777000000077777700000F
        7777700000007777777000F777777000000077777700000F7777700000007777
        7000F70F7777700000007770000F77700F7770000000770000F7777700F77000
        00007700F7777777700F70000000777777777777777770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = DeleteAllBtnClick
    end
    object ClearAllBtn: TSpeedButton
      Left = 145
      Top = 2
      Width = 37
      Height = 34
      Hint = 'Clear preview window'
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007777777777177777700000007777777771177777100000007777
        7777711177717000000077777777771177117000000070000000000011577000
        0000707777777775117770000000707007007071511770000000707777777711
        771150000000704444445144447510000000774FFFFF15FFF47770000000774F
        00F00F00F47770000000774FFFFFFFFFF4777000000077444444444444777000
        0000774744744744747770000000774444444444447770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = ClearAllBtnClick
    end
    object CloseBtn: TSpeedButton
      Left = 287
      Top = 2
      Width = 37
      Height = 34
      Hint = 'Close window'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F3333333F7F333301111111B10333337F333333737F33330111111111
        0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
        0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
        0333337F377777337F333301111111110333337F333333337F33330111111111
        0333337FFFFFFFFF7F33330000000000033333777777777773330000}
      Layout = blGlyphTop
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = CancelBtnClick
    end
    object AutoLoad: TCheckBox
      Left = 185
      Top = 4
      Width = 70
      Height = 17
      Hint = 'Autoload Previews'
      Caption = 'Autoload'
      TabOrder = 0
      OnClick = AutoLoadClick
    end
    object GPall: TCheckBox
      Left = 185
      Top = 18
      Width = 96
      Height = 17
      Hint = 'In 256 color mode use a shared palette'
      Caption = 'Use best palette'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = GPallClick
    end
  end
end