PC World 1999 November/PCWorld_1999-11_cd.bin/Software/TemaCD/Gantt/Gantt2.exe/0/RCDATA/TPAINTERREDUCEF/TPAINTERREDUCEF.txt

Text File | 1999-09-21 | 8KB | 309 lines

object PainterReduceF: TPainterReduceF
  Left = 116
  Top = 113
  Width = 620
  Height = 387
  BorderIcons = [biSystemMenu]
  Caption = 'GIF Optimizer'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'Arial'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  OldCreateOrder = True
  OnResize = FormResize
  PixelsPerInch = 120
  TextHeight = 16
  object ProgressBar: TProgressBar
    Left = 0
    Top = 317
    Width = 612
    Height = 14
    Align = alBottom
    Min = 0
    Max = 100
    TabOrder = 0
  end
  object PanelSource: TPanel
    Left = 0
    Top = 0
    Width = 313
    Height = 282
    Align = alLeft
    BevelInner = bvLowered
    BevelOuter = bvNone
    BorderWidth = 2
    Caption = ' '
    TabOrder = 1
    object Label1: TLabel
      Left = 3
      Top = 3
      Width = 307
      Height = 23
      Align = alTop
      Alignment = taCenter
      AutoSize = False
      Caption = 'Bitmap'
      Transparent = True
    end
    object ScrollBox1: TScrollBox
      Left = 3
      Top = 26
      Width = 307
      Height = 253
      Align = alClient
      TabOrder = 0
      object ImageBitmap: TImage
        Left = 0
        Top = 0
        Width = 303
        Height = 249
        Align = alClient
        Center = True
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 282
    Width = 612
    Height = 35
    Align = alBottom
    BevelOuter = bvNone
    Caption = ' '
    TabOrder = 2
    object ButtonConvert: TSpeedButton
      Left = 232
      Top = 8
      Width = 57
      Height = 22
      Caption = 'Convert'
      Flat = True
      OnClick = ButtonConvertClick
    end
    object btnsave: TSpeedButton
      Left = 512
      Top = 8
      Width = 81
      Height = 22
      Caption = 'GIFSave'
      Flat = True
      OnClick = btnsaveClick
    end
    object sizecap: TLabel
      Left = 304
      Top = 9
      Width = 32
      Height = 16
      Caption = 'size='
    end
    object ckTransparent: TCheckBox
      Left = 80
      Top = 8
      Width = 97
      Height = 17
      Caption = 'Transparent'
      TabOrder = 0
    end
  end
  object PanelDestination: TPanel
    Left = 313
    Top = 0
    Width = 299
    Height = 282
    Align = alClient
    BevelInner = bvLowered
    BevelOuter = bvNone
    BorderWidth = 2
    Caption = ' '
    TabOrder = 3
    object Label2: TLabel
      Left = 3
      Top = 3
      Width = 293
      Height = 23
      Align = alTop
      Alignment = taCenter
      AutoSize = False
      Caption = 'GIF <= 256 colors'
      Transparent = True
    end
    object ScrollBox2: TScrollBox
      Left = 3
      Top = 26
      Width = 293
      Height = 253
      Align = alClient
      TabOrder = 0
      object ImageGIF: TImage
        Left = 0
        Top = 0
        Width = 289
        Height = 249
        Align = alClient
        Center = True
      end
    end
  end
  object MainMenu1: TMainMenu
    Left = 16
    Top = 296
    object MenuPalette: TMenuItem
      Caption = '&Palette'
      object MenuPaletteNone: TMenuItem
        Caption = '&None'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuPaletteClick
      end
      object MenuPaletteWindows20: TMenuItem
        Caption = '&Windows system (20 colors)'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuPaletteClick
      end
      object MenuPaletteWindows256: TMenuItem
        Caption = 'W&indows halftone (256 colors)'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuPaletteHalftoneClick
      end
      object MenuPaletteWindowsGray4: TMenuItem
        Caption = 'W&in&dows grayscale (4 colors)'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuPaletteClick
      end
      object MenuPaletteMonochrome: TMenuItem
        Caption = '&Monochrome (black/white)'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuPaletteClick
      end
      object MenuPaletteGrayScale256: TMenuItem
        Caption = '&Grayscale (256 shades)'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuPaletteClick
      end
      object MenuPaletteNetscape216: TMenuItem
        Caption = 'N&etscape (216 colors)'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuPaletteClick
      end
      object MenuPaletteOptimized: TMenuItem
        Caption = '&Optimized (256 colors)'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuPaletteClick
        object MenuPaletteOptimized8: TMenuItem
          Tag = 3
          Caption = '8 colors'
          GroupIndex = 3
          RadioItem = True
          OnClick = MenuPaletteOptimizedBitsClick
        end
        object MenuPaletteOptimized16: TMenuItem
          Tag = 4
          Caption = '16 colors'
          GroupIndex = 3
          RadioItem = True
          OnClick = MenuPaletteOptimizedBitsClick
        end
        object MenuPaletteOptimized32: TMenuItem
          Tag = 5
          Caption = '32 colors'
          GroupIndex = 3
          RadioItem = True
          OnClick = MenuPaletteOptimizedBitsClick
        end
        object MenuPaletteOptimized64: TMenuItem
          Tag = 6
          Caption = '64 colors'
          GroupIndex = 3
          RadioItem = True
          OnClick = MenuPaletteOptimizedBitsClick
        end
        object MenuPaletteOptimized128: TMenuItem
          Tag = 7
          Caption = '128 colors'
          GroupIndex = 3
          RadioItem = True
          OnClick = MenuPaletteOptimizedBitsClick
        end
        object MenuPaletteOptimized256: TMenuItem
          Tag = 8
          Caption = '256 colors'
          Checked = True
          GroupIndex = 3
          RadioItem = True
          OnClick = MenuPaletteOptimizedBitsClick
        end
      end
      object MenuPaletteOptimizedWindows256: TMenuItem
        Caption = '&Optimized Windows (256 colors)'
        Checked = True
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuPaletteClick
      end
    end
    object MenuDithering: TMenuItem
      Caption = '&Dithering'
      object MenuDitheringFloydSteinberg: TMenuItem
        Caption = '&Floyd Steinberg'
        Checked = True
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuDitheringClick
      end
      object MenuDitheringNearest: TMenuItem
        Caption = '&Nearest color'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuDitheringClick
      end
      object MenuDitheringStucki: TMenuItem
        Caption = 'Stucki'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuDitheringClick
      end
      object MenuDitheringBurkes: TMenuItem
        Caption = 'Burkes'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuDitheringClick
      end
      object MenuDitheringSierra: TMenuItem
        Caption = 'Sierra'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuDitheringClick
      end
      object MenuDitheringJaJuNi: TMenuItem
        Caption = 'JaJuNi'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuDitheringClick
      end
      object MenuDitheringSteveArche: TMenuItem
        Caption = 'SteveArche'
        GroupIndex = 2
        RadioItem = True
        OnClick = MenuDitheringClick
      end
    end
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'gif'
    Filter = 'GIF Files|*.gif|BMP Files|*.bmp'
    Left = 403
    Top = 196
  end
end