UnitMain.dfm 1.4 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768
  1. object FormMain: TFormMain
  2. Left = 0
  3. Top = 0
  4. BorderIcons = [biSystemMenu]
  5. Caption = 'Export TBitmap32 to PSD with layers'
  6. ClientHeight = 562
  7. ClientWidth = 692
  8. Color = clBtnFace
  9. ParentFont = True
  10. OldCreateOrder = True
  11. PixelsPerInch = 96
  12. TextHeight = 15
  13. object Panel1: TPanel
  14. Left = 0
  15. Top = 0
  16. Width = 692
  17. Height = 33
  18. Align = alTop
  19. BevelEdges = [beBottom]
  20. BevelKind = bkFlat
  21. BevelOuter = bvNone
  22. ShowCaption = False
  23. TabOrder = 0
  24. object ButtonSave: TButton
  25. Left = 89
  26. Top = 4
  27. Width = 75
  28. Height = 24
  29. Caption = '&Save'
  30. TabOrder = 0
  31. OnClick = ButtonSaveClick
  32. end
  33. object ButtonOpen: TButton
  34. Left = 8
  35. Top = 4
  36. Width = 75
  37. Height = 24
  38. Caption = '&Open'
  39. TabOrder = 1
  40. OnClick = ButtonOpenClick
  41. end
  42. object CheckBoxViewTiles: TCheckBox
  43. Left = 184
  44. Top = 7
  45. Width = 137
  46. Height = 17
  47. Caption = 'View tile rectangles'
  48. TabOrder = 2
  49. OnClick = CheckBoxViewTilesClick
  50. end
  51. end
  52. object ImgView: TImgView32
  53. Left = 0
  54. Top = 33
  55. Width = 692
  56. Height = 529
  57. Align = alClient
  58. Bitmap.ResamplerClassName = 'TNearestResampler'
  59. BitmapAlign = baCustom
  60. Scale = 1.000000000000000000
  61. ScaleMode = smOptimal
  62. ScrollBars.ShowHandleGrip = True
  63. ScrollBars.Style = rbsDefault
  64. ScrollBars.Size = 17
  65. OverSize = 0
  66. TabOrder = 1
  67. end
  68. end