home *** CD-ROM | disk | FTP | other *** search
/ Mastering Visual Basic 5 / MasteringVisualBasic5.iso / olympus / ik32_15t / delphi2.shr / UOPTIM.DFM / UOPTIM.txt
Encoding:
Text File  |  1996-08-01  |  5.3 KB  |  196 lines

  1. object Form1: TForm1
  2.   Left = 320
  3.   Top = 160
  4.   BorderIcons = [biSystemMenu, biMinimize]
  5.   BorderStyle = bsSingle
  6.   Caption = 'Optimize Palette - Use 8 Bit Images Only'
  7.   ClientHeight = 300
  8.   ClientWidth = 586
  9.   Color = clSilver
  10.   Font.Color = clBlack
  11.   Font.Height = -11
  12.   Font.Name = 'Arial'
  13.   Font.Style = []
  14.   Menu = MainMenu1
  15.   Position = poScreenCenter
  16.   OnCreate = FormCreate
  17.   PixelsPerInch = 96
  18.   TextHeight = 14
  19.   object GroupBox3: TGroupBox
  20.     Left = 392
  21.     Top = 4
  22.     Width = 187
  23.     Height = 290
  24.     Caption = ' Destination'
  25.     TabOrder = 2
  26.     object Optimize: TSpeedButton
  27.       Left = 9
  28.       Top = 214
  29.       Width = 170
  30.       Height = 34
  31.       Hint = 'Map Destination Image to Optimised Palette based on all Images'
  32.       Caption = 'Optimize Palette'#39's'
  33.       Enabled = False
  34.       ParentShowHint = False
  35.       ShowHint = True
  36.       OnClick = OptimizeClick
  37.     end
  38.     object Picbufdest: TPicbuf
  39.       Left = 6
  40.       Top = 16
  41.       Width = 175
  42.       Height = 190
  43.       Hint = 'Destination Image - 8 Bit Images Only'
  44.       ParentColor = False
  45.       ParentFont = False
  46.       ParentShowHint = False
  47.       ShowHint = True
  48.       TabOrder = 0
  49.       ControlData = {
  50.         00000100A0220000B4150000FD00000000080000800F000080000352E30B918F
  51.         CE119DE300AA004BB851010000009001444201000D4D532053616E7320536572
  52.         6966000001000000000000000000000000000001000000000000010000000000
  53.         00000000000000000000000000FF000000000000000000000000010001000000
  54.         0001000A0000000000000000000000000000000000000000}
  55.     end
  56.   end
  57.   object GroupBox2: TGroupBox
  58.     Left = 199
  59.     Top = 4
  60.     Width = 187
  61.     Height = 290
  62.     Caption = ' Source 2 '
  63.     TabOrder = 1
  64.     object RemapSrc2: TSpeedButton
  65.       Left = 9
  66.       Top = 214
  67.       Width = 170
  68.       Height = 34
  69.       Hint = 'Map Image in Source 2 to Destination Image'#39's Palette'
  70.       Caption = 'Remap Palette to Destination'#39's'
  71.       ParentShowHint = False
  72.       ShowHint = True
  73.       OnClick = RemapSrc2Click
  74.     end
  75.     object DitherSrc2: TSpeedButton
  76.       Left = 9
  77.       Top = 250
  78.       Width = 170
  79.       Height = 34
  80.       Hint = 'Dither Image in Source 2 to Destination Image'#39's Palette'
  81.       Caption = 'Dither Palette to Destination'#39's'
  82.       ParentShowHint = False
  83.       ShowHint = True
  84.       OnClick = DitherSrc2Click
  85.     end
  86.     object Picbufsrc2: TPicbuf
  87.       Left = 6
  88.       Top = 17
  89.       Width = 175
  90.       Height = 190
  91.       Hint = 'Source 2 Image - 8 Bit Images Only'
  92.       ParentColor = False
  93.       ParentFont = False
  94.       ParentShowHint = False
  95.       ShowHint = True
  96.       TabOrder = 0
  97.       ControlData = {
  98.         00000100A0220000B4150000FD00000000080000800F000080000352E30B918F
  99.         CE119DE300AA004BB851010000009001444201000D4D532053616E7320536572
  100.         6966000001000000000000000000000000000001000000000000010000000000
  101.         00000000000000000000000000FF000000000000000000000000010001000000
  102.         0001000A0000000000000000000000000000000000000000}
  103.     end
  104.   end
  105.   object GroupBox1: TGroupBox
  106.     Left = 6
  107.     Top = 4
  108.     Width = 187
  109.     Height = 290
  110.     Caption = ' Source 1 '
  111.     TabOrder = 0
  112.     object RemapSrc1: TSpeedButton
  113.       Left = 9
  114.       Top = 214
  115.       Width = 170
  116.       Height = 34
  117.       Hint = 'Map Image in Source 1 to Destination Image'#39's Palette'
  118.       Caption = 'Remap Palette to Destination'#39's'
  119.       ParentShowHint = False
  120.       ShowHint = True
  121.       OnClick = RemapSrc1Click
  122.     end
  123.     object DitherSrc1: TSpeedButton
  124.       Left = 9
  125.       Top = 250
  126.       Width = 170
  127.       Height = 34
  128.       Hint = 'Dither Image in Source 1 to Destination Image'#39's Palette'
  129.       Caption = 'Dither Palette to Destination'#39's'
  130.       ParentShowHint = False
  131.       ShowHint = True
  132.       OnClick = DitherSrc1Click
  133.     end
  134.     object Picbufsrc1: TPicbuf
  135.       Left = 6
  136.       Top = 16
  137.       Width = 175
  138.       Height = 190
  139.       Hint = 'Source 1 Image - 8 Bit Images Only'
  140.       ParentColor = False
  141.       ParentFont = False
  142.       ParentShowHint = False
  143.       ShowHint = True
  144.       TabOrder = 0
  145.       ControlData = {
  146.         00000100A0220000B4150000FD00000000080000800F000080000352E30B918F
  147.         CE119DE300AA004BB851010000009001444201000D4D532053616E7320536572
  148.         6966000001000000000000000000000000000001000000000000010000000000
  149.         00000000000000000000000000FF000000000000000000000000010001000000
  150.         0001000A0000000000000000000000000000000000000000}
  151.     end
  152.   end
  153.   object MainMenu1: TMainMenu
  154.     Left = 42
  155.     Top = 21
  156.     object File1: TMenuItem
  157.       Caption = 'File'
  158.       ShortCut = 0
  159.       object LoadSourceImage1: TMenuItem
  160.         Caption = 'Load Source Image 1'
  161.         ShortCut = 0
  162.         OnClick = LoadImage
  163.       end
  164.       object LoadSourceImage2: TMenuItem
  165.         Tag = 1
  166.         Caption = 'Load Source Image 2'
  167.         ShortCut = 0
  168.         OnClick = LoadImage
  169.       end
  170.       object LoadDestinationImage: TMenuItem
  171.         Tag = 2
  172.         Caption = 'Load Destination Image'
  173.         ShortCut = 0
  174.         OnClick = LoadImage
  175.       end
  176.       object N1: TMenuItem
  177.         Caption = '-'
  178.         ShortCut = 0
  179.       end
  180.       object Exit: TMenuItem
  181.         Caption = 'Exit'
  182.         ShortCut = 16472
  183.         OnClick = ExitClick
  184.       end
  185.     end
  186.   end
  187.   object OpenDialog: TOpenDialog
  188.     FileEditStyle = fsEdit
  189.     Filter = 
  190.       '*.TIF|*.tif|*.TGA|*.tga|*.BMP|*.bmp|*.GIF|*.gif|*.DIB|*.dib|*.PC' +
  191.       'X|*.pcx|*.JPG|*.jpg|*.MSP|*.msp|*.FIF|*.fif|*.PNG|*.png'
  192.     Left = 14
  193.     Top = 21
  194.   end
  195. end
  196.