home *** CD-ROM | disk | FTP | other *** search
/ Mastering Visual Basic 5 / MasteringVisualBasic5.iso / olympus / ik32_15t / delphi2.shr / UMASK.DFM / UMASK.txt
Encoding:
Text File  |  1996-08-01  |  5.3 KB  |  190 lines
  1. object Form1: TForm1
  2.   Left = 294
  3.   Top = 160
  4.   BorderIcons = [biSystemMenu, biMinimize]
  5.   BorderStyle = bsSingle
  6.   Caption = 'Mask Copy'
  7.   ClientHeight = 258
  8.   ClientWidth = 596
  9.   Color = clSilver
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   Menu = MainMenu1
  15.   Position = poScreenCenter
  16.   OnCreate = FormCreate
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object Composite: TSpeedButton
  20.     Left = 6
  21.     Top = 218
  22.     Width = 102
  23.     Height = 32
  24.     Hint = 'Activate the Mask Function'
  25.     Caption = 'Composite'
  26.     Glyph.Data = {
  27.       10010000424D1001000000000000760000002800000010000000100000000100
  28.       0400000000008000000000000000000000000000000000000000000000000000
  29.       80000080000000808000800000008000800080800000C0C0C000808080000000
  30.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  31.       77777EEEEE8EEEEEEEE77EEEEE8EEEEEEEE77EEEEE8EEEE9EEE77EEEEE8EEE9E
  32.       EEE77EEEEE8EE9EEE1E77EEEEE8E9EEE1EE77EEEEE89EEE1EEE77999998EEE1E
  33.       EEE77EEEEE89EEE2EEE77EEEEE8E9EEE2EE77EEEEE8EE9EEE2E77EEEEE8EEE9E
  34.       EEE77EEEEE8EEEE9EEE77EEEEE8EEEEEEEE77777777777777777000000000000
  35.       0000000000000000000000000000000000000000}
  36.     ParentShowHint = False
  37.     ShowHint = True
  38.     OnClick = CompositeClick
  39.   end
  40.   object Lighten: TSpeedButton
  41.     Left = 375
  42.     Top = 218
  43.     Width = 102
  44.     Height = 32
  45.     Hint = 'Lighten the Destination Image using a Mask'
  46.     Caption = 'Lighten'
  47.     ParentShowHint = False
  48.     ShowHint = True
  49.     OnClick = LightenClick
  50.   end
  51.   object Darken: TSpeedButton
  52.     Left = 485
  53.     Top = 218
  54.     Width = 102
  55.     Height = 32
  56.     Hint = 'Darken the Destination Image using a Mask'
  57.     Caption = 'Darken'
  58.     ParentShowHint = False
  59.     ShowHint = True
  60.     OnClick = DarkenClick
  61.   end
  62.   object GroupBox1: TGroupBox
  63.     Left = 6
  64.     Top = 10
  65.     Width = 185
  66.     Height = 200
  67.     Caption = 'Source Image '
  68.     TabOrder = 0
  69.     object PicbufSrc: TPicbuf
  70.       Left = 8
  71.       Top = 16
  72.       Width = 170
  73.       Height = 175
  74.       Hint = 'Source Image - 24 Bit Images Only'
  75.       ParentColor = False
  76.       ParentShowHint = False
  77.       ShowHint = True
  78.       TabOrder = 0
  79.       ControlData = {
  80.         00000100A0220000B4150000FD00000000080000800F000080000352E30B918F
  81.         CE119DE300AA004BB851010000009001444201000D4D532053616E7320536572
  82.         6966000001000000000000000000000000000001000000000000010000000000
  83.         00000000000000000000000000FF000000000000000000000000010001000000
  84.         0001000A0000000000000000000000000000000000000000}
  85.     end
  86.   end
  87.   object GroupBox2: TGroupBox
  88.     Left = 204
  89.     Top = 10
  90.     Width = 185
  91.     Height = 200
  92.     Caption = 'Mask Image '
  93.     TabOrder = 1
  94.     object PicbufMask: TPicbuf
  95.       Left = 8
  96.       Top = 16
  97.       Width = 170
  98.       Height = 175
  99.       Hint = 'Mask Image'
  100.       ParentColor = False
  101.       ParentShowHint = False
  102.       ShowHint = True
  103.       TabOrder = 0
  104.       ControlData = {
  105.         00000100A0220000B4150000FD00000000080000800F000080000352E30B918F
  106.         CE119DE300AA004BB851010000009001444201000D4D532053616E7320536572
  107.         6966000001000000000000000000000000000001000000000000010000000000
  108.         00000000000000000000000000FF000000000000000000000000010001000000
  109.         0001000A0000000000000000000000000000000000000000}
  110.     end
  111.   end
  112.   object GroupBox3: TGroupBox
  113.     Left = 401
  114.     Top = 10
  115.     Width = 185
  116.     Height = 200
  117.     Caption = 'Destination Image '
  118.     TabOrder = 2
  119.     object PicbufDest: TPicbuf
  120.       Left = 8
  121.       Top = 16
  122.       Width = 170
  123.       Height = 175
  124.       Hint = 'Destination Image - 24 Bit Images Only'
  125.       ParentColor = False
  126.       ParentShowHint = False
  127.       ShowHint = True
  128.       TabOrder = 0
  129.       ControlData = {
  130.         00000100A0220000B4150000FD00000000080000800F000080000352E30B918F
  131.         CE119DE300AA004BB851010000009001444201000D4D532053616E7320536572
  132.         6966000001000000000000000000000000000001000000000000010000000000
  133.         00000000000000000000000000FF000000000000000000000000010001000000
  134.         0001000A0000000000000000000000000000000000000000}
  135.     end
  136.   end
  137.   object MainMenu1: TMainMenu
  138.     Left = 122
  139.     Top = 221
  140.     object File1: TMenuItem
  141.       Caption = 'File'
  142.       ShortCut = 0
  143.       object LoadSourceImage1: TMenuItem
  144.         Caption = 'Load Source Image'
  145.         ShortCut = 0
  146.         OnClick = LoadImage
  147.       end
  148.       object LoadMaskImage1: TMenuItem
  149.         Tag = 1
  150.         Caption = 'Load Mask Image'
  151.         ShortCut = 0
  152.         OnClick = LoadImage
  153.       end
  154.       object LoadDestinationImage1: TMenuItem
  155.         Tag = 2
  156.         Caption = 'Load Destination Image'
  157.         ShortCut = 0
  158.         OnClick = LoadImage
  159.       end
  160.       object N1: TMenuItem
  161.         Caption = '-'
  162.         ShortCut = 0
  163.       end
  164.       object SaveDestinationAs1: TMenuItem
  165.         Caption = 'Save Destination As......'
  166.         ShortCut = 16467
  167.         OnClick = SaveDestinationAs1Click
  168.       end
  169.       object N2: TMenuItem
  170.         Caption = '-'
  171.         ShortCut = 0
  172.       end
  173.       object Exit1: TMenuItem
  174.         Caption = 'Exit'
  175.         ShortCut = 16472
  176.         OnClick = Exit1Click
  177.       end
  178.     end
  179.   end
  180.   object OpenDialog: TOpenDialog
  181.     FileEditStyle = fsEdit
  182.     Filter = 
  183.       '*.*|*.*|*.TIF|*.tif|*.TGA|*.tga|*.BMP|*.bmp|*.GIF|*.gif|*.DIB|*.' +
  184.       'dib|*.PCX|*.pcx|*.JPG|*.jpg|*.MSP|*.msp|*.FIF|*.fif|*.PNG|*.png'
  185.     Title = 'Disk Control'
  186.     Left = 153
  187.     Top = 221
  188.   end
  189. end
  190.