home *** CD-ROM | disk | FTP | other *** search
/ Mastering Visual Basic 5 / MasteringVisualBasic5.iso / olympus / ik32_15t / delphi2.shr / UGREYNEG.DFM / UGREYNEG.txt
Encoding:
Text File  |  1996-08-01  |  5.0 KB  |  176 lines
  1. object Form1: TForm1
  2.   Left = 316
  3.   Top = 156
  4.   HorzScrollBar.Visible = False
  5.   VertScrollBar.Visible = False
  6.   BorderIcons = [biSystemMenu, biMinimize]
  7.   BorderStyle = bsSingle
  8.   Caption = 'GreyScale and Negative'
  9.   ClientHeight = 299
  10.   ClientWidth = 471
  11.   Color = clSilver
  12.   Font.Color = clBlack
  13.   Font.Height = -11
  14.   Font.Name = 'Arial'
  15.   Font.Style = []
  16.   Menu = MainMenu1
  17.   Position = poScreenCenter
  18.   OnActivate = FormActivate
  19.   OnCreate = FormCreate
  20.   PixelsPerInch = 96
  21.   TextHeight = 14
  22.   object Bevel1: TBevel
  23.     Left = 6
  24.     Top = 6
  25.     Width = 459
  26.     Height = 287
  27.     Shape = bsFrame
  28.   end
  29.   object ProcessImage: TSpeedButton
  30.     Left = 285
  31.     Top = 212
  32.     Width = 172
  33.     Height = 35
  34.     Hint = 'Apply Selected Function to Image'
  35.     Caption = 'Process Image'
  36.     Glyph.Data = {
  37.       10010000424D1001000000000000760000002800000010000000100000000100
  38.       0400000000008000000000000000000000000000000000000000000000000000
  39.       80000080000000808000800000008000800080800000C0C0C000808080000000
  40.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF007FFFFFFFFFFF
  41.       FFF7F78888888888887FF87888888888878FF88777777777788FF880FFFFFFFF
  42.       088FF8806FFFFFFF088FF880FFFFFFFF088FF8806F6FFFFF088FF880FFFFFFFF
  43.       088FF8806F6F6FFF088FF880FFFFFFFF088FF8806F6F6F6F088FF88700000000
  44.       788FF87888888888878FF78888888888887F7FFFFFFFFFFFFFF7000000000000
  45.       0000000000000000000000000000000000000000}
  46.     ParentShowHint = False
  47.     ShowHint = True
  48.     OnClick = ProcessImageClick
  49.   end
  50.   object Undo: TSpeedButton
  51.     Left = 285
  52.     Top = 248
  53.     Width = 172
  54.     Height = 35
  55.     Hint = 'Restore Original Image'
  56.     Caption = 'Undo Changes'
  57.     Glyph.Data = {
  58.       10010000424D1001000000000000760000002800000010000000100000000100
  59.       0400000000008000000000000000000000000000000000000000000000000000
  60.       80000080000000808000800000008000800080800000C0C0C000808080000000
  61.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  62.       77777777777888888877CCCCC77EEEEEE8777CCCC77EEEEEE87777CCC77EEEEE
  63.       E8777C7CC77EEEEEE877C777C77EEEEEE877C777777EEEEEE877C777777EEEEE
  64.       E87CC77777777777777CC77777777777777CC77777777777777C7C7777777777
  65.       77C777C7777777777C77777CC777777CC77777777CCCCCC77777000000000000
  66.       0000000000000000000000000000000000000000}
  67.     ParentShowHint = False
  68.     ShowHint = True
  69.     OnClick = UndoClick
  70.   end
  71.   object PicbufOriginal: TPicbuf
  72.     Left = 264
  73.     Top = 120
  74.     Width = 36
  75.     Height = 38
  76.     ParentColor = False
  77.     ParentFont = False
  78.     TabOrder = 1
  79.     Visible = False
  80.     OnChange = PicbufOriginalChange
  81.     ControlData = {
  82.       00000100A0220000B4150000FD00000000080000800F000080000352E30B918F
  83.       CE119DE300AA004BB851010000009001444201000D4D532053616E7320536572
  84.       6966000001000000000000000000000000000001000000000000010000000000
  85.       00000000000000000000000000FF000000000000000000000000010001000000
  86.       0001000A00000000000000000000000000000000000000003B0D0A0DFFFF0000
  87.       D88E6F02}
  88.   end
  89.   object PicbufVisible: TPicbuf
  90.     Left = 18
  91.     Top = 19
  92.     Width = 255
  93.     Height = 263
  94.     Hint = 'Visible Picture Buffer'
  95.     ParentColor = False
  96.     ParentFont = False
  97.     ParentShowHint = False
  98.     ShowHint = True
  99.     TabOrder = 0
  100.     ControlData = {
  101.       00000100A0220000B4150000FD00000000080000800F000080000352E30B918F
  102.       CE119DE300AA004BB851010000009001444201000D4D532053616E7320536572
  103.       6966000001000000000000000000000000000001000000000000010000000000
  104.       00000000000000000000000000FF000000000000000000000000010001000000
  105.       0001000A00000000000000000000000000000000000000003B0D0A0DFFFF0000
  106.       D88E6F02}
  107.   end
  108.   object RadioGroup: TRadioGroup
  109.     Left = 285
  110.     Top = 12
  111.     Width = 172
  112.     Height = 194
  113.     Caption = 'RadioGroup'
  114.     ItemIndex = 0
  115.     Items.Strings = (
  116.       'GrayScale'
  117.       'Negate'
  118.       'Horizontal Mirror'
  119.       'Vertical Mirror'
  120.       'Rotate')
  121.     TabOrder = 2
  122.     OnClick = RadioGroupClick
  123.   end
  124.   object Angle: TSpinEdit
  125.     Left = 372
  126.     Top = 173
  127.     Width = 74
  128.     Height = 23
  129.     Hint = 'Set Rotation Angle here [Integers only]'
  130.     Color = clAqua
  131.     MaxValue = 365
  132.     MinValue = -365
  133.     ParentShowHint = False
  134.     ShowHint = True
  135.     TabOrder = 3
  136.     Value = 90
  137.     Visible = False
  138.   end
  139.   object MainMenu1: TMainMenu
  140.     Left = 29
  141.     Top = 18
  142.     object File1: TMenuItem
  143.       Caption = 'File'
  144.       ShortCut = 0
  145.       object LoadImage: TMenuItem
  146.         Caption = 'Load Image...'
  147.         ShortCut = 0
  148.         OnClick = LoadImageClick
  149.       end
  150.       object SaveImageAs: TMenuItem
  151.         Caption = 'Save Image As...'
  152.         ShortCut = 0
  153.         OnClick = SaveImageAsClick
  154.       end
  155.       object N1: TMenuItem
  156.         Caption = '-'
  157.         ShortCut = 0
  158.       end
  159.       object Exit: TMenuItem
  160.         Caption = 'Exit'
  161.         ShortCut = 16472
  162.         OnClick = ExitClick
  163.       end
  164.     end
  165.   end
  166.   object OpenDialog: TOpenDialog
  167.     FileEditStyle = fsEdit
  168.     Filter = 
  169.       '*.*|*.*|*.Bmp|*.bmp|*.Dib|*.dib|*.Jpg|*.jpg|*.Pcx|*.pcx|*.Png|*.' +
  170.       'png|*.Tga|*.tga|*.Tif|*.tif'
  171.     Title = 'Disk Control [ Open and Save ]'
  172.     Left = 63
  173.     Top = 19
  174.   end
  175. end
  176.