MainUnit.dfm 1.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556
  1. object FormRotateExample: TFormRotateExample
  2. Left = 192
  3. Top = 107
  4. BorderStyle = bsDialog
  5. Caption = 'Rotate Example'
  6. ClientHeight = 252
  7. ClientWidth = 441
  8. Color = clBtnFace
  9. Font.Charset = DEFAULT_CHARSET
  10. Font.Color = clWindowText
  11. Font.Height = -11
  12. Font.Name = 'MS Sans Serif'
  13. Font.Style = []
  14. OnCreate = FormCreate
  15. TextHeight = 13
  16. object Src: TImage32
  17. Left = 16
  18. Top = 16
  19. Width = 192
  20. Height = 192
  21. Bitmap.DrawMode = dmBlend
  22. Bitmap.ResamplerClassName = 'TLinearResampler'
  23. BitmapAlign = baCenter
  24. Color = clWindowText
  25. ParentColor = False
  26. Scale = 1.000000000000000000
  27. ScaleMode = smNormal
  28. TabOrder = 0
  29. end
  30. object Dst: TImage32
  31. Left = 232
  32. Top = 16
  33. Width = 192
  34. Height = 192
  35. Bitmap.ResamplerClassName = 'TNearestResampler'
  36. BitmapAlign = baCenter
  37. Color = clWindowText
  38. ParentColor = False
  39. Scale = 1.000000000000000000
  40. ScaleMode = smNormal
  41. TabOrder = 1
  42. end
  43. object Angle: TGaugeBar
  44. Left = 16
  45. Top = 220
  46. Width = 409
  47. Height = 19
  48. Backgnd = bgPattern
  49. Max = 180
  50. Min = -180
  51. ShowHandleGrip = True
  52. Style = rbsMac
  53. Position = 0
  54. OnChange = AngleChange
  55. end
  56. end