object PalForm: TPalForm
  Left = 416
  Top = 229
  AutoScroll = False
  Caption = 'Palette Window'
  ClientHeight = 248
  ClientWidth = 291
  Ctl3D = False
  Color = clBlack
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnMouseUp = FormMouseUp
  OnPaint = FormPaint
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Image1: TImage
    Left = 0
    Top = 0
    Width = 291
    Height = 248
    Align = alClient
    Visible = False
  end
  object Memo1: TMemo
    Left = 0
    Top = 0
    Width = 291
    Height = 248
    Lines.Strings = (
      'True color Images Have no Palette, instead each element'
      'or pixel dot contains red/green/blue quantities.'
      ''
      'For 256 color images with palettes, you should be'
      'in 256 color mode and then the program will create'
      '256 color bitmaps with palettes by default.'
      ''
      'The same holds true for 16 colors.'
      ''
      'This program was designed for True Color  '
      'and High Color use in 16, 24, or 32  bit color mode.'
      ''
      'Use an image conversion program like Paint Shop Pro'
      'to convert images to 256 color and 16 color.')
    TabOrder = 0
    Visible = False
  end
  object obut: TBitBtn
    Left = 88
    Top = 200
    Width = 75
    Height = 25
    TabOrder = 1
    Visible = False
    OnClick = obutClick
    Kind = bkOK
  end
  object MainMenu1: TMainMenu
    Left = 76
    Top = 8
    object File1: TMenuItem
      Caption = '&File'
      object Open1: TMenuItem
        Caption = '&Open Palette...'
        OnClick = Open1Click
        object PaintShopPro1: TMenuItem
          Caption = 'Paint Shop Pro...'
          OnClick = PaintShopPro1Click
        end
        object NeopPaint1: TMenuItem
          Caption = 'Neopaint...'
          OnClick = NeopPaint1Click
        end
        object Windows256color1: TMenuItem
          Caption = ' 256 color Logpalette...'
          OnClick = Windows256color1Click
        end
        object N2: TMenuItem
          Caption = '-'
        end
        object FromBMPFIle1: TMenuItem
          Caption = 'From BMP FIle'
          OnClick = FromBMPFIle1Click
        end
      end
      object SaveAs1: TMenuItem
        Caption = 'Save &As...'
        OnClick = SaveAs1Click
        object PaintShopPro2561: TMenuItem
          Caption = 'Paint Shop Pro 256...'
          OnClick = PaintShopPro2561Click
        end
        object N256ColorLogpalette1: TMenuItem
          Caption = '256 Color Logpalette...'
          OnClick = N256ColorLogpalette1Click
        end
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object UsePalette1: TMenuItem
      Caption = 'Use Palette'
      object ForPaintBook1: TMenuItem
        Caption = 'For Paint Book'
        OnClick = ForPaintBook1Click
      end
    end
    object Help1: TMenuItem
      Caption = 'Help'
      object PaletteHelp1: TMenuItem
        Caption = 'Palette Help'
        OnClick = PaletteHelp1Click
      end
    end
  end
  object OpenDlg: TOpenDialog
    FileName = 'GifWeb256.Pal'
    Filter = 'Palette Files (*.pal)|*.pal|All Files (*.*)|*.*'
    Title = 'Load Palette'
    Left = 20
    Top = 8
  end
  object SaveDlg: TSaveDialog
    DefaultExt = 'inc'
    Filter = 'Palette Files|*.PAL|All Files (*.*)|*.*'
    Title = 'Save Palette As Include'
    Left = 48
    Top = 8
  end
  object OpenPictureDialog1: TOpenPictureDialog
    DefaultExt = 'bmp'
    FileName = '*.bmp'
    Filter = 'Bitmaps|*.bmp'
    Left = 120
    Top = 8
  end
end