Advertisement
Guest User

Untitled

a guest
Feb 24th, 2017
117
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.58 KB | None | 0 0
  1. unit FMX_TwoEffects;
  2.  
  3. interface
  4.  
  5. uses
  6. System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  7. FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Effects,
  8. FMX.Controls.Presentation, FMX.StdCtrls, FMX.Objects;
  9.  
  10. type
  11. TForm2 = class(TForm)
  12. Button1: TButton;
  13. Rectangle1: TRectangle;
  14. ShadowEffect1: TShadowEffect;
  15. GlowEffect1: TGlowEffect;
  16. private
  17. { Private declarations }
  18. public
  19. { Public declarations }
  20. end;
  21.  
  22. var
  23. Form2: TForm2;
  24.  
  25. implementation
  26.  
  27. {$R *.fmx}
  28.  
  29. end.
  30.  
  31. object Form2: TForm2
  32. Left = 0
  33. Top = 0
  34. Caption = 'Form2'
  35. ClientHeight = 146
  36. ClientWidth = 243
  37. FormFactor.Width = 320
  38. FormFactor.Height = 480
  39. FormFactor.Devices = [Desktop]
  40. DesignerMasterStyle = 0
  41. object Rectangle1: TRectangle
  42. Fill.Kind = None
  43. Position.X = 20.000000000000000000
  44. Position.Y = 20.000000000000000000
  45. Size.Width = 113.000000000000000000
  46. Size.Height = 37.000000000000000000
  47. Size.PlatformDefault = False
  48. object Button1: TButton
  49. Align = Client
  50. Size.Width = 113.000000000000000000
  51. Size.Height = 37.000000000000000000
  52. Size.PlatformDefault = False
  53. TabOrder = 0
  54. Text = 'Button1'
  55. object ShadowEffect1: TShadowEffect
  56. Distance = 5.000000000000000000
  57. Direction = 45.000000000000000000
  58. Softness = 0.300000011920929000
  59. Opacity = 0.600000023841857900
  60. ShadowColor = claBlack
  61. end
  62. end
  63. object GlowEffect1: TGlowEffect
  64. Softness = 0.400000005960464400
  65. GlowColor = claGold
  66. Opacity = 0.899999976158142100
  67. end
  68. end
  69. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement