home *** CD-ROM | disk | FTP | other *** search
/ PC/CD Gamer UK 51 / PCGAMER51.bin / Quake / Qme / _SETUP.1 / qme.exe / 0 / RCDATA / TSKINVIEWER / TSKINVIEWER.txt < prev   
Text File  |  1997-06-06  |  19KB  |  562 lines
  1. object SkinViewer: TSkinViewer
  2.   Left = 103
  3.   Top = 85
  4.   AutoScroll = False
  5.   Caption = 'Skin Texture Editor'
  6.   ClientHeight = 452
  7.   ClientWidth = 531
  8.   Font.Color = clBlack
  9.   Font.Height = -11
  10.   Font.Name = 'Arial'
  11.   Font.Style = []
  12.   FormStyle = fsMDIChild
  13.   Icon.Data = {<image000.ico>}
  14.   Position = poDefault
  15.   Scaled = False
  16.   ShowHint = True
  17.   Visible = True
  18.   OnClose = FormClose
  19.   OnCreate = FormCreate
  20.   OnShow = FormShow
  21.   PixelsPerInch = 96
  22.   TextHeight = 14
  23.   object Bevel1: TBevel
  24.     Left = 0
  25.     Top = 25
  26.     Width = 531
  27.     Height = 2
  28.     Align = alTop
  29.     Shape = bsTopLine
  30.   end
  31.   object BigBackPanel: TWinGBackPanel
  32.     Left = 0
  33.     Top = 27
  34.     Width = 531
  35.     Height = 425
  36.     Align = alClient
  37.     BevelOuter = bvNone
  38.     BorderStyle = bsSingle
  39.     TabOrder = 0
  40.     object ScrollBox: TScrollBox
  41.       Left = 0
  42.       Top = 0
  43.       Width = 527
  44.       Height = 421
  45.       HorzScrollBar.Tracking = True
  46.       VertScrollBar.Tracking = True
  47.       Align = alClient
  48.       BorderStyle = bsNone
  49.       TabOrder = 0
  50.       object WinGBackPanel: TWinGBackPanel
  51.         Left = 0
  52.         Top = 0
  53.         Width = 164
  54.         Height = 104
  55.         BevelOuter = bvNone
  56.         TabOrder = 0
  57.         object SkinImage: TMDLTextureImage
  58.           Left = 2
  59.           Top = 2
  60.           Width = 160
  61.           Height = 100
  62.           Cursor = 13
  63.           ParentShowHint = False
  64.           ShowHint = True
  65.           AutoSize = True
  66.           AutoSizeZoomPctg = 100
  67.           BackgroundColor = clBlack
  68.           BitmapFitting = bfNone
  69.           BitmapHeight = 100
  70.           BitmapWidth = 160
  71.           OnPaintSurface = SkinImagePaintSurface
  72.           ShowTriangles = True
  73.           ShowVertices = True
  74.         end
  75.       end
  76.     end
  77.   end
  78.   object Panel1: TPanel
  79.     Left = 0
  80.     Top = 0
  81.     Width = 531
  82.     Height = 25
  83.     Align = alTop
  84.     BevelOuter = bvNone
  85.     TabOrder = 1
  86.     object ShirtCmdBtn: TSpeedBtnMenu
  87.       Left = 196
  88.       Top = 1
  89.       Width = 23
  90.       Height = 23
  91.       Hint = 'Select player shirt color'
  92.       Glyph.Data = {
  93.         96010000424D9601000000000000760000002800000020000000120000000100
  94.         0400000000002001000000000000000000000000000000000000000000000000
  95.         80000080000000808000800000008000800080800000C0C0C000808080000000
  96.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  97.         3333333333333333333333333330333333333333333833333333333333000333
  98.         3333333333888333333333333000003333333333388888333333333300000003
  99.         3333333388888883333333333333333333333333333333333333333300033000
  100.         3333333388833888333333330300003033333333838888383333333303333330
  101.         3333333383333338333333330333333033333333833333383333333003333330
  102.         0333333883333338833333030330033030333383833883383833303333333333
  103.         3303383333333333338330333330033333033833333883333383300333333333
  104.         3003388333333333388333003300003300333388338888338833333000033000
  105.         0333333888833888833333333333333333333333333333333333}
  106.       NumGlyphs = 2
  107.       Menu = ShirtMenu
  108.       OnCheckItem = ShirtCmdBtnCheckItem
  109.       OnItemClick = ShirtCmdBtnItemClick
  110.     end
  111.     object PantsCmdBtn: TSpeedBtnMenu
  112.       Left = 218
  113.       Top = 1
  114.       Width = 23
  115.       Height = 23
  116.       Hint = 'Select player pants color'
  117.       Glyph.Data = {
  118.         96010000424D9601000000000000760000002800000020000000120000000100
  119.         0400000000002001000000000000000000000000000000000000000000000000
  120.         80000080000000808000800000008000800080800000C0C0C000808080000000
  121.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  122.         3333333333333333333333333330333333333333333833333333333333000333
  123.         3333333333888333333333333000003333333333388888333333333300000003
  124.         3333333388888883333333333333333333333333333333333333333000333000
  125.         3333333888333888333333303033303033333338383338383333333033030330
  126.         3333333833838338333333303303033033333338338383383333333033030330
  127.         3333333833838338333333303303033033333338338383383333333303000303
  128.         3333333383888383333333330333330333333333833333833333333000000000
  129.         3333333888888888333333330000000333333333888888833333333333333333
  130.         3333333333333333333333333333333333333333333333333333}
  131.       NumGlyphs = 2
  132.       Menu = PantsMenu
  133.       OnCheckItem = PantsCmdBtnCheckItem
  134.       OnItemClick = PantsCmdBtnItemClick
  135.     end
  136.     object ZoomCmdBtn: TSpeedBtnMenu
  137.       Left = 240
  138.       Top = 1
  139.       Width = 23
  140.       Height = 23
  141.       Hint = 'Change the zoom of the view'
  142.       Font.Color = clBlack
  143.       Font.Height = -11
  144.       Font.Name = 'Arial'
  145.       Font.Style = []
  146.       Glyph.Data = {
  147.         96010000424D9601000000000000760000002800000020000000120000000100
  148.         0400000000002001000000000000000000000000000000000000000000000000
  149.         80000080000000808000800000008000800080800000C0C0C000808080000000
  150.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  151.         3333333333333333333333333303333333333333338333333333333330003333
  152.         333333333888333333333333000003333003333388888333F883333000000033
  153.         000333388888883F888333333333333000333333333333F888333333800083B8
  154.         03333333F8883F88833333308888800B333333388333888833333308F7F7F803
  155.         3333338F3333338F3333388F7F7F7F883333388333333383F3333087F7F7F780
  156.         333338F333333338F333308F7F7F7F80333338F333333338F3333087F7F7F780
  157.         3333333F333333383333388F7F7F7F883333338F3333338F33333308F7F7F803
  158.         33333383FF333F8333333330888880333333333883FF88333333333380008333
  159.         3333333338883333333333333333333333333333333333333333}
  160.       Layout = blGlyphRight
  161.       NumGlyphs = 2
  162.       ParentFont = False
  163.       Menu = ZoomMenu
  164.       OnCheckItem = ZoomCmdBtnCheckItem
  165.       OnItemClick = ZoomCmdBtnItemClick
  166.     end
  167.     object SnapShotCmdBtn: TSpeedButton
  168.       Left = 262
  169.       Top = 1
  170.       Width = 23
  171.       Height = 23
  172.       Hint = 'Take snapshots of the view'
  173.       Glyph.Data = {
  174.         76010000424D7601000000000000760000002800000020000000100000000100
  175.         0400000000000001000000000000000000000000000000000000000000000000
  176.         80000080000000808000800000008000800080800000C0C0C000808080000000
  177.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777700777
  178.         7777777777788777777777777700007777777777778888777777777770000007
  179.         7777777778888887777777770000000077777777888888887777777777777777
  180.         7777777777777777777777777780087777777777777887777777780000000000
  181.         0087778888888888887770880088880088077877887777887787708808888880
  182.         8807787787777778778770880878888088077877877777787787708808E78880
  183.         8807787787877778778770FF00888800FF0778FF88777788FF8770FFF000000F
  184.         FF0778FFF888888FFF87700000000000000778888888888888877700780FF087
  185.         00777788778FF877887777777780087777777777777887777777}
  186.       NumGlyphs = 2
  187.       OnClick = SnapShotCmdBtnClick
  188.     end
  189.     object PaintTrianglesBtn: TSpeedButton
  190.       Left = 96
  191.       Top = 1
  192.       Width = 23
  193.       Height = 23
  194.       Hint = 'Paint triangles on the current skin'
  195.       Glyph.Data = {
  196.         76010000424D7601000000000000760000002800000020000000100000000100
  197.         0400000000000001000000000000000000000000000000000000000000000000
  198.         80000080000000808000800000008000800080800000C0C0C000808080000000
  199.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330000
  200.         00033333333388888888303333330EEEEE03383333338FFFFF833003333330EE
  201.         E0333883333338FFF8333090333330EE033338F8333338FF833309990333330E
  202.         03338FFF8333338F833309999033330033338FFFF83333883333099999033303
  203.         33338FFFFF833383333300000000333333338888888833333333333333333333
  204.         33333333333333333333333333331003333333333333F8833333300333330BB0
  205.         3333388333338FF8333330C0033330BB033338F8833338FF833330CCC003330B
  206.         B03338FFF883338FF83330C003333330BB0338F883333338FF83300333333333
  207.         0033388333333333883333333333333333333333333333333333}
  208.       NumGlyphs = 2
  209.       OnClick = PaintTriangles1Click
  210.     end
  211.     object RecalcSkinVtxBtn: TSpeedButton
  212.       Left = 118
  213.       Top = 1
  214.       Width = 23
  215.       Height = 23
  216.       Hint = 'Recalculate the skin vertices'
  217.       Glyph.Data = {
  218.         76010000424D7601000000000000760000002800000020000000100000000100
  219.         0400000000000001000000000000000000000000000000000000000000000000
  220.         80000080000000808000800000008000800080800000C0C0C000808080000000
  221.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  222.         333333333333333333333000330003333333388833888333333330F0330F0333
  223.         333338F8338F8333333330003300033333333888338883333333333333333300
  224.         0333333333333388833333333333330F033333333333338F8333333300033300
  225.         0333333388833388833333330F033333333333338F8333333333333300033333
  226.         3333333388833333333333333333000333333333333388833333333333330F03
  227.         3333333333338F83333333333333000333333333333388833333330003333333
  228.         33333388833333333333330F033333333333338F833333333333330003333333
  229.         3333338883333333333333333333333333333333333333333333}
  230.       NumGlyphs = 2
  231.       OnClick = RecalculateSkinVertices1Click
  232.     end
  233.     object RearrangeObjSkinBtn: TSpeedButton
  234.       Left = 140
  235.       Top = 1
  236.       Width = 23
  237.       Height = 23
  238.       Hint = 'Cut away unused pieces of skin'
  239.       Glyph.Data = {
  240.         76010000424D7601000000000000760000002800000020000000100000000100
  241.         0400000000000001000000000000000000000000000000000000000000000000
  242.         80000080000000808000800000008000800080800000C0C0C000808080000000
  243.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  244.         3333333333333333333333333333333333333333333333333333300000000300
  245.         3003388888888388388330333330333333333833333833333333303030303333
  246.         3303383838383333338330303030333333033838383833333383303030303333
  247.         3333383838383333333330330330333333033833833833333383303303303333
  248.         3303383383383333338330330030333333333833883833333333303003303333
  249.         3303383883383333338330330030333333033833883833333383303300303333
  250.         3333383388383333333330333330333333033833333833333383300000003003
  251.         0003388888883883888333333333333333333333333333333333}
  252.       NumGlyphs = 2
  253.       OnClick = RearrangeObjectSkinsClick
  254.     end
  255.     object SpeedButton2: TSpeedButton
  256.       Left = 2
  257.       Top = 1
  258.       Width = 23
  259.       Height = 23
  260.       Hint = 'Cut'
  261.       Glyph.Data = {
  262.         F6000000424DF600000000000000760000002800000010000000100000000100
  263.         0400000000008000000000000000000000001000000010000000000000000000
  264.         BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
  265.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
  266.         DDDDDDDD44DDDDDDDDDDDDD4DD4DD44DDDDDDDD4DD4D4DD4DDDDDDD4DD4D4DD4
  267.         DDDDDDDD444D4DD4DDDDDDDDDD4D444DDDDDDDDDDD404DDDDDDDDDDDDDD0DDDD
  268.         DDDDDDDDDD000DDDDDDDDDDDDD0D0DDDDDDDDDDDD00D00DDDDDDDDDDD0DDD0DD
  269.         DDDDDDDDD0DDD0DDDDDDDDDDD0DDD0DDDDDDDDDDDDDDDDDDDDDD}
  270.       OnClick = SpeedButton2Click
  271.     end
  272.     object SpeedButton3: TSpeedButton
  273.       Left = 24
  274.       Top = 1
  275.       Width = 23
  276.       Height = 23
  277.       Hint = 'Copy'
  278.       Glyph.Data = {
  279.         20020000424D2002000000000000760000002800000028000000140000000100
  280.         0400000000009001000000000000000000000000000000000000000000000000
  281.         80000080000000808000800000008000800080800000C0C0C000808080000000
  282.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  283.         3333333333333333FFFFFFFFFF33333333300000000003333333333888888888
  284.         8F3333333330FFFFFFFF033333333338F33333338F3333333330BFBFBFBF0333
  285.         33333338F3FFFFFF8F3333333330F888888F033333333338F88888838F333333
  286.         3330BFBFBFBF0333333FFFF8F3FFFFFF8F3333000000F888888F033333888888
  287.         F88888838F33330FFFF0BFBFBFBF0333338F3338F3FFFFFF8F33330FFFF0F888
  288.         888F0333338F3338F88888838F33330F7770BFBFBFBF0333338F3338F333333F
  289.         8F33330FFFF0FFFFFF000333338F3338F33333888333330F7770BFBFBF003333
  290.         338F3338FFFFFF883333330FFFF0000000033333338F3338888888833333330F
  291.         777777F033333333338F33333338F3333333330FFFFFFFF033333333338F3333
  292.         33F8F3333333330FFFFFF00033333333338F3333388833333333330FFFFFF003
  293.         33333333338FFFFFF88333333333330000000033333333333388888888333333
  294.         3333333333333333333333333333333333333333333333333333333333333333
  295.         3333333333333333333300000000000000000000000000000000000000000000
  296.         00000000}
  297.       NumGlyphs = 2
  298.       OnClick = SpeedButton3Click
  299.     end
  300.     object SpeedButton4: TSpeedButton
  301.       Left = 46
  302.       Top = 1
  303.       Width = 23
  304.       Height = 23
  305.       Hint = 'Paste'
  306.       Glyph.Data = {
  307.         42010000424D4201000000000000760000002800000011000000110000000100
  308.         040000000000CC00000000000000000000001000000010000000000000000000
  309.         BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
  310.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
  311.         DDDDD0000000DDDDDDD44444444440000000DD000004FFFFFFFF40000000D083
  312.         8384F444444F40000000D0383834FFFFFFFF40000000D0838384F444F4444000
  313.         0000D0383834FFFFF4F4D0000000D0838384FFFFF44DD0000000D03838344444
  314.         440DD0000000D08383838383830DD0000000D03800000000880DD0000000D088
  315.         07777770830DD0000000D03830B00B08380DD0000000DD00000BB00000DDD000
  316.         0000DDDDDD0000DDDDDDD0000000DDDDDDDDDDDDDDDDD0000000DDDDDDDDDDDD
  317.         DDDDD0000000}
  318.       OnClick = SpeedButton4Click
  319.     end
  320.     object SpeedButton1: TSpeedButton
  321.       Left = 68
  322.       Top = 1
  323.       Width = 23
  324.       Height = 23
  325.       Hint = 'Delete'
  326.       Glyph.Data = {
  327.         42010000424D4201000000000000760000002800000011000000110000000100
  328.         040000000000CC00000000000000000000001000000010000000000000000000
  329.         BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
  330.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  331.         777770000000777777777777777770000000777777777777770F700000007777
  332.         0F777777777770000000777000F7777770F770000000777000F777770F777000
  333.         00007777000F77700F777000000077777000F700F7777000000077777700000F
  334.         7777700000007777777000F777777000000077777700000F7777700000007777
  335.         7000F70F7777700000007770000F77700F7770000000770000F7777700F77000
  336.         00007700F7777777700F70000000777777777777777770000000777777777777
  337.         777770000000}
  338.       OnClick = SpeedButton1Click
  339.     end
  340.     object ShowTrianglesBtn: TSpeedButton
  341.       Left = 168
  342.       Top = 1
  343.       Width = 23
  344.       Height = 23
  345.       Hint = 'Toggle showing of triangle mesh'
  346.       AllowAllUp = True
  347.       GroupIndex = 7925798
  348.       Glyph.Data = {
  349.         4E010000424D4E01000000000000760000002800000012000000120000000100
  350.         040000000000D800000000000000000000000000000000000000000000000000
  351.         80000080000000808000800000008000800080800000C0C0C000808080000000
  352.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  353.         3333330000003333333333333033330000003333333333333003330000003333
  354.         3333333303033300000033333033333303303300000033333033333303303300
  355.         0000333303033330333303000000333303033330333303000000333303303330
  356.         3300330000003333033033303033330000003330333303000333330000003330
  357.         3333030333333300000033330033033333333300000033333303303333333300
  358.         0000333333303033333333000000333333330003333333000000333333333303
  359.         333333000000333333333333333333000000}
  360.       OnClick = ShowTrianglesBtnClick
  361.     end
  362.   end
  363.   object MDLObserver: TMDLObserver
  364.     Enabled = True
  365.     OnCurrentSkinChange = MDLObserverChange
  366.     OnMDLChange = MDLObserverChange
  367.     OnModifyChange = MDLObserverModifyChange
  368.     OnPantsColorChange = MDLObserverChange
  369.     OnShirtColorChange = MDLObserverChange
  370.     OnSkinCountChange = MDLObserverChange
  371.     Left = 44
  372.     Top = 390
  373.   end
  374.   object ZoomMenu: TPopupMenu
  375.     Left = 312
  376.     Top = 43
  377.     object N1001: TMenuItem
  378.       Caption = '100 %'
  379.       ShortCut = 0
  380.     end
  381.     object N1501: TMenuItem
  382.       Caption = '200 %'
  383.       ShortCut = 0
  384.     end
  385.     object N3001: TMenuItem
  386.       Caption = '300 %'
  387.       ShortCut = 0
  388.     end
  389.     object N4001: TMenuItem
  390.       Caption = '400 %'
  391.       ShortCut = 0
  392.     end
  393.     object N5001: TMenuItem
  394.       Caption = '500 %'
  395.       ShortCut = 0
  396.     end
  397.     object N6001: TMenuItem
  398.       Caption = '600 %'
  399.       ShortCut = 0
  400.     end
  401.     object N7001: TMenuItem
  402.       Caption = '700 %'
  403.       ShortCut = 0
  404.     end
  405.     object N8001: TMenuItem
  406.       Caption = '800 %'
  407.       ShortCut = 0
  408.     end
  409.     object N9001: TMenuItem
  410.       Caption = '900 %'
  411.       ShortCut = 0
  412.     end
  413.     object N10001: TMenuItem
  414.       Caption = '1000 %'
  415.       ShortCut = 0
  416.     end
  417.   end
  418.   object PantsMenu: TPopupMenu
  419.     Left = 248
  420.     Top = 44
  421.     object N02: TMenuItem
  422.       Caption = '0'
  423.       ShortCut = 0
  424.     end
  425.     object N13: TMenuItem
  426.       Caption = '1'
  427.       ShortCut = 0
  428.     end
  429.     object N23: TMenuItem
  430.       Caption = '2'
  431.       ShortCut = 0
  432.     end
  433.     object N33: TMenuItem
  434.       Caption = '3'
  435.       ShortCut = 0
  436.     end
  437.     object N43: TMenuItem
  438.       Caption = '4'
  439.       ShortCut = 0
  440.     end
  441.     object N53: TMenuItem
  442.       Caption = '5'
  443.       ShortCut = 0
  444.     end
  445.     object N63: TMenuItem
  446.       Caption = '6'
  447.       ShortCut = 0
  448.     end
  449.     object N73: TMenuItem
  450.       Caption = '7'
  451.       ShortCut = 0
  452.     end
  453.     object N83: TMenuItem
  454.       Caption = '8'
  455.       ShortCut = 0
  456.     end
  457.     object N93: TMenuItem
  458.       Caption = '9'
  459.       ShortCut = 0
  460.     end
  461.     object N102: TMenuItem
  462.       Caption = '10'
  463.       ShortCut = 0
  464.     end
  465.     object N112: TMenuItem
  466.       Caption = '11'
  467.       ShortCut = 0
  468.     end
  469.     object N122: TMenuItem
  470.       Caption = '12'
  471.       ShortCut = 0
  472.     end
  473.     object N132: TMenuItem
  474.       Caption = '13'
  475.       ShortCut = 0
  476.     end
  477.   end
  478.   object ShirtMenu: TPopupMenu
  479.     Left = 188
  480.     Top = 45
  481.     object N01: TMenuItem
  482.       Caption = '0'
  483.       ShortCut = 0
  484.     end
  485.     object N12: TMenuItem
  486.       Caption = '1'
  487.       ShortCut = 0
  488.     end
  489.     object N22: TMenuItem
  490.       Caption = '2'
  491.       ShortCut = 0
  492.     end
  493.     object N32: TMenuItem
  494.       Caption = '3'
  495.       ShortCut = 0
  496.     end
  497.     object N42: TMenuItem
  498.       Caption = '4'
  499.       ShortCut = 0
  500.     end
  501.     object N52: TMenuItem
  502.       Caption = '5'
  503.       ShortCut = 0
  504.     end
  505.     object N62: TMenuItem
  506.       Caption = '6'
  507.       ShortCut = 0
  508.     end
  509.     object N72: TMenuItem
  510.       Caption = '7'
  511.       ShortCut = 0
  512.     end
  513.     object N82: TMenuItem
  514.       Caption = '8'
  515.       ShortCut = 0
  516.     end
  517.     object N92: TMenuItem
  518.       Caption = '9'
  519.       ShortCut = 0
  520.     end
  521.     object N101: TMenuItem
  522.       Caption = '10'
  523.       ShortCut = 0
  524.     end
  525.     object N111: TMenuItem
  526.       Caption = '11'
  527.       ShortCut = 0
  528.     end
  529.     object N121: TMenuItem
  530.       Caption = '12'
  531.       ShortCut = 0
  532.     end
  533.     object N131: TMenuItem
  534.       Caption = '13'
  535.       ShortCut = 0
  536.     end
  537.   end
  538.   object SnapShotMenu: TPopupMenu
  539.     Left = 392
  540.     Top = 43
  541.     object SnapshottoClipboard1: TMenuItem
  542.       Caption = 'Snapshot to Clipboard'
  543.       ShortCut = 0
  544.       OnClick = SnapshottoClipboard1Click
  545.     end
  546.     object SnapshotToFile1: TMenuItem
  547.       Caption = 'SnapshotToFile'
  548.       ShortCut = 0
  549.       OnClick = SnapshotToFile1Click
  550.     end
  551.   end
  552.   object SnapshotSaveDialog: TSaveDialog
  553.     DefaultExt = 'BMP'
  554.     FileEditStyle = fsEdit
  555.     Filter = 'Bitmap Files|*.BMP'
  556.     Options = [ofHideReadOnly]
  557.     Title = 'Save Snapshot'
  558.     Left = 484
  559.     Top = 45
  560.   end
  561. end
  562.