MainUnit.dfm 4.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188
  1. object FormMain: TFormMain
  2. Left = 0
  3. Top = 0
  4. Caption = 'Sharpen convolution using a kernel sampler'
  5. ClientHeight = 451
  6. ClientWidth = 666
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -13
  11. Font.Name = 'Segoe UI'
  12. Font.Style = []
  13. OnCreate = FormCreate
  14. OnDestroy = FormDestroy
  15. TextHeight = 17
  16. object PanelOptions: TPanel
  17. Left = 0
  18. Top = 392
  19. Width = 666
  20. Height = 59
  21. Align = alBottom
  22. BevelEdges = [beTop]
  23. BevelKind = bkFlat
  24. BevelOuter = bvNone
  25. ShowCaption = False
  26. TabOrder = 0
  27. DesignSize = (
  28. 666
  29. 57)
  30. object Label1: TLabel
  31. Left = 13
  32. Top = 17
  33. Width = 48
  34. Height = 17
  35. Caption = 'Amount:'
  36. FocusControl = SpinEditValue
  37. end
  38. object SpinEditValue: TSpinEdit
  39. Left = 72
  40. Top = 14
  41. Width = 61
  42. Height = 27
  43. MaxValue = 5
  44. MinValue = -5
  45. TabOrder = 0
  46. Value = 0
  47. end
  48. object ButtonApply: TButton
  49. Left = 576
  50. Top = 14
  51. Width = 75
  52. Height = 25
  53. Anchors = [akTop, akRight]
  54. Caption = 'Sharpen'
  55. TabOrder = 1
  56. OnClick = ButtonApplyClick
  57. end
  58. end
  59. object PanelImages: TPanel
  60. Left = 0
  61. Top = 0
  62. Width = 666
  63. Height = 392
  64. Align = alClient
  65. BevelOuter = bvNone
  66. ShowCaption = False
  67. TabOrder = 1
  68. ExplicitLeft = 324
  69. ExplicitWidth = 300
  70. ExplicitHeight = 365
  71. object Splitter1: TSplitter
  72. Left = 325
  73. Top = 0
  74. Height = 392
  75. ExplicitLeft = 336
  76. ExplicitTop = 184
  77. ExplicitHeight = 100
  78. end
  79. object PanelSource: TPanel
  80. Left = 0
  81. Top = 0
  82. Width = 325
  83. Height = 392
  84. Align = alLeft
  85. BevelOuter = bvNone
  86. ShowCaption = False
  87. TabOrder = 0
  88. object ImgViewSource: TImgView32
  89. Left = 0
  90. Top = 0
  91. Width = 325
  92. Height = 392
  93. Align = alClient
  94. Bitmap.DrawMode = dmBlend
  95. Bitmap.ResamplerClassName = 'TNearestResampler'
  96. BitmapAlign = baCustom
  97. Scale = 1.000000000000000000
  98. ScaleMode = smScale
  99. Background.CheckersStyle = bcsMedium
  100. Background.FillStyle = bfsColor
  101. MousePan.Enabled = True
  102. MouseZoom.Enabled = True
  103. ScrollBars.ShowHandleGrip = True
  104. ScrollBars.Style = rbsDefault
  105. ScrollBars.Size = 17
  106. OverSize = 0
  107. TabOrder = 0
  108. TabStop = True
  109. ExplicitWidth = 300
  110. object Panel2: TPanel
  111. Left = 0
  112. Top = 0
  113. Width = 325
  114. Height = 25
  115. Align = alTop
  116. BevelOuter = bvNone
  117. Caption = 'Source'
  118. Color = clHighlight
  119. Font.Charset = DEFAULT_CHARSET
  120. Font.Color = clHighlightText
  121. Font.Height = -13
  122. Font.Name = 'Segoe UI'
  123. Font.Style = []
  124. ParentBackground = False
  125. ParentFont = False
  126. TabOrder = 2
  127. ExplicitWidth = 337
  128. end
  129. end
  130. end
  131. object PanelResult: TPanel
  132. Left = 328
  133. Top = 0
  134. Width = 338
  135. Height = 392
  136. Align = alClient
  137. BevelOuter = bvNone
  138. ShowCaption = False
  139. TabOrder = 1
  140. ExplicitLeft = 0
  141. ExplicitWidth = 300
  142. ExplicitHeight = 365
  143. object ImgViewResult: TImgView32
  144. Left = 0
  145. Top = 0
  146. Width = 338
  147. Height = 392
  148. Align = alClient
  149. Bitmap.DrawMode = dmBlend
  150. Bitmap.ResamplerClassName = 'TNearestResampler'
  151. BitmapAlign = baCustom
  152. Scale = 1.000000000000000000
  153. ScaleMode = smScale
  154. Background.CheckersStyle = bcsMedium
  155. Background.FillStyle = bfsColor
  156. MousePan.Enabled = True
  157. MouseZoom.Enabled = True
  158. ScrollBars.ShowHandleGrip = True
  159. ScrollBars.Style = rbsDefault
  160. ScrollBars.Size = 17
  161. OverSize = 0
  162. TabOrder = 0
  163. TabStop = True
  164. ExplicitWidth = 337
  165. ExplicitHeight = 281
  166. object Panel5: TPanel
  167. Left = 0
  168. Top = 0
  169. Width = 338
  170. Height = 25
  171. Align = alTop
  172. BevelOuter = bvNone
  173. Caption = 'Result'
  174. Color = clHighlight
  175. Font.Charset = DEFAULT_CHARSET
  176. Font.Color = clHighlightText
  177. Font.Height = -13
  178. Font.Name = 'Segoe UI'
  179. Font.Style = []
  180. ParentBackground = False
  181. ParentFont = False
  182. TabOrder = 2
  183. ExplicitWidth = 337
  184. end
  185. end
  186. end
  187. end
  188. end