Effets FireMonkey

Oct 12

Delphi

Sur cette page, le DFM de la fiche (j’ai changé les images pour gagner de la place…) :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170

object frmMain: TfrmMain
Left = 0
Top = 0
BiDiMode = bdLeftToRight
Caption = 'Ripple'
BorderStyle = bsNone
ClientHeight = 480
ClientWidth = 640
Position = poScreenCenter
Transparency = True
TopMost = True
Visible = False
WindowState = wsMaximized
OnCreate = FormCreate
StyleLookup = 'backgroundstyle'
object imgBelly: TImage
Align = alClient
Width = 640.000000000000000000
Height = 480.000000000000000000
OnDblClick = imgBellyDblClick
OnMouseDown = imgBellyMouseDown
Bitmap.PNG = {
FFD8FFE000104A46494600010101006000600000FFDB00430001010101010101
0101010101010101010101010101010101010101010101010101010101010101
01010101010101010101010101010101010101010101010101FFDB0043010101
0101010101010101010101010101010101010101010101010101010101010101
010101010101010101010101010101010101010101010101010101010101FFC0
0011080020002003012200021101031101FFC4001F0000010501010101010100
000000000000000102030405060708090A0BFFC400B510000201030302040305
0504040000017D01020300041105122131410613516107227114328191A10823
42B1C11552D1F02433627282090A161718191A25262728292A3435363738393A
434445464748494A535455565758595A636465666768696A737475767778797A
838485868788898A92939495969798999AA2A3A4A5A6A7A8A9AAB2B3B4B5B6B7
B8B9BAC2C3C4C5C6C7C8C9CAD2D3D4D5D6D7D8D9DAE1E2E3E4E5E6E7E8E9EAF1
F2F3F4F5F6F7F8F9FAFFC4001F01000301010101010101010100000000000001
02030405060708090A0BFFC400B5110002010204040304070504040001027700
0102031104052131061241510761711322328108144291A1B1C109233352F015
6272D10A162434E125F11718191A262728292A35363738393A43444546474849
4A535455565758595A636465666768696A737475767778797A82838485868788
898A92939495969798999AA2A3A4A5A6A7A8A9AAB2B3B4B5B6B7B8B9BAC2C3C4
C5C6C7C8C9CAD2D3D4D5D6D7D8D9DAE2E3E4E5E6E7E8E9EAF2F3F4F5F6F7F8F9
FAFFDA000C03010002110311003F00FE9D3F6ABF8DBE25FD9F7E0F37C41F0678
1743F891E30D4FE2A7ECF5F087C29E0FF13F8E6FFE1AF86B50F12FED0FFB41FC
2FFD9FF42BEF10F8E34AF027C4ED53C3FA1F87F54F89D6BE23D5AE74DF00F8A2
FE7B0D26E2CACF4C6B8BA8E58BF2BFC31FF056CFDA1FC6DE1AF0F78CFC19FB19
687E2EF07F8BB43D27C4FE14F15F86346FF82C7EBFE1AF13F86B5FB0B7D5742F
10F87B5DD2BFE084177A5EB5A1EB5A5DDDAEA5A4EADA6DD5CD86A361736F7967
7135BCD1C8DF7E7FC141FF00E4837807FECF83FE0991FF00AF25FD93E8FF0082
647FCA36BFE09F1FF663FF00B27FFEA86F00D007C3FF00F0F45FDAAFFE8C47FF
002D0FF82CF7FF004862BEE0FD84BF6BDD5BF6C7F87FF103C6BAB7823C0FE0EF
F843BC71E05D0743BCF86FF127C69F143C17E3BF05FC50FD993F67AFDA97C01E
3DD1B5AF88BF03FF00678F1C691FDAFE07FDA1FC3DA7EA3E16F13FC30D1F55D1
755D1EF92E269FCF58EDFEE0AFC3FF00F820C7FC9AA78BFF00EEC47FF5CC3FF0
4BAA00FA33FE0A7FE21F1D6B9F07B48F81DF01ADF43D4BF69BD5B5CF047ED61F
0C6C3C65E18F887E2AF879A57847F609FDA0FF0067BFDA0BC7DE2BF881A1FC27
D275FF008AFE2ED0E6D7EDBE197C29D1BE1B7C13F0CF8DFE3778F7C75F17BC21
63E10F060F0A587C42F1FF00C3CFE5EFC05AC7ED71A0E9537C33F037ED45FF00
04E7F0059FC28FEC1F84DE18F8463F6F3FF8393FE18EAB278AF43F05F85B53B7
FD9B3E05FC28D5BE3BF86F5CF899F1C3E19E87E24F02F837C69FB2CFC12F0D78
B7E33FC1BF1A789BC17F07FC77F0D3C21F113C43E1EF075EFF00579F1B7F654F
8DDE36F8DDF157E297C2DF8B7FB39E8FE0FF008E9FB39FC29FD9CFE2D7C25FDA
33F64DF177ED1FE1AF13F86BE16F8B7F68FF00112BA37877F6A8F807A5BE87E3
1D2FF692F12786BC5DE11F12F86FC5761A8D868D6645E25BDFDFD83795E83FB1
37ED27E16D2BC7BA0F863C59FF0004AFF0E687F153C0FE16F863F13F46D07FE0
93FE3DD234AF891F0DBC0FE0B9BE1BF82BE1EF8F74ED3FFE0A316F67E30F03F8
3FE1DDC5C780BC2DE13F10C3A8E83E1FF05CF3785B49B0B4D0E57B1600FE73FF
00B63FE0A0327FA5D97ED45FB0FEB1E17BFF00F43F047C4BF0EFEDE7FF000736
F897E0C7C68F15BFEEAD3E177ECDFF001C340F8EFA97C1FF00DA73E386ABA845
A9E81A17C05FD9EBC6FF00133E33EBFE2BF0D78CBC21A2F812FF00C51E08F17E
91A27EE07FC11FBFE12BF81F73F167F652F8F7FF000A3FC1FF001F3C53E07FD9
DBF6BCF87FF0CFE087FC2E8F0FF82F4AFD93AE3E017C2DFD8A3E14E89A47833F
6AAFEC9FDA8EC7C71F0CA2FD8EACAD7E3969BF12BC3B7179E0CD57E247C3583C
41E256F1678C352F0A7863D5349FF827FF00C6ED02FF00C4FAAE8577FF000493
D1754F1B7C2BB7F815E33D4B49FF008244F8BB4EBFF177C11B4F0D787BC196BF
073C4F7967FF00051086E35FF8576DE0FF0008F853C296FF000F75592EFC250F
86BC31E1ED0A3D2174BD174DB5B6F70F825FB2A7C6EF04FC6EF855F14BE297C5
BFD9CF58F07FC0BFD9CFE2B7ECE7F097E12FECE7FB26F8BBF670F0D7863C35F1
4BC5BFB3878899DDBC45FB547C7CD2D343F07697FB36F86FC35E11F08F86BC37
E14B0D3AC359BC26F1EDEC2C2C1403FFD9}
WrapMode = iwStretch
object effRipple: TRippleEffect
Amplitude = 0.100000001490116100
Frequency = 70.000000000000000000
Phase = 10.000000000000000000
AspectRatio = 1.500000000000000000
end
object effSmoothMagnify: TSmoothMagnifyEffect
InnerRadius = 0.200000002980232200
OuterRadius = 0.400000005960464500
Magnification = 1.000000000000000000
AspectRatio = 1.500000000000000000
end
object effPinch: TPinchEffect
Enabled = False
Radius = 0.500000000000000000
Strength = 5.000000000000000000
AspectRatio = 1.500000000000000000
end
object effWave: TWaveEffect
Enabled = False
WaveSize = 32.000000000000000000
end
object effHueAdjust: THueAdjustEffect
Enabled = False
Hue = 1.000000000000000000
end
object effTransitionRipple: TRippleTransitionEffect
Enabled = False
Progress = 30.000000000000000000
Target.PNG = {
FFD8FFE000104A46494600010101006000600000FFDB00430001010101010101
0101010101010101010101010101010101010101010101010101010101010101
01010101010101010101010101010101010101010101010101FFDB0043010101
0101010101010101010101010101010101010101010101010101010101010101
010101010101010101010101010101010101010101010101010101010101FFC0
0011080020002003012200021101031101FFC4001F0000010501010101010100
000000000000000102030405060708090A0BFFC400B510000201030302040305
0504040000017D01020300041105122131410613516107227114328191A10823
42B1C11552D1F02433627282090A161718191A25262728292A3435363738393A
434445464748494A535455565758595A636465666768696A737475767778797A
838485868788898A92939495969798999AA2A3A4A5A6A7A8A9AAB2B3B4B5B6B7
B8B9BAC2C3C4C5C6C7C8C9CAD2D3D4D5D6D7D8D9DAE1E2E3E4E5E6E7E8E9EAF1
F2F3F4F5F6F7F8F9FAFFC4001F01000301010101010101010100000000000001
02030405060708090A0BFFC400B5110002010204040304070504040001027700
0102031104052131061241510761711322328108144291A1B1C109233352F015
6272D10A162434E125F11718191A262728292A35363738393A43444546474849
4A535455565758595A636465666768696A737475767778797A82838485868788
898A92939495969798999AA2A3A4A5A6A7A8A9AAB2B3B4B5B6B7B8B9BAC2C3C4
C5C6C7C8C9CAD2D3D4D5D6D7D8D9DAE2E3E4E5E6E7E8E9EAF2F3F4F5F6F7F8F9
FAFFDA000C03010002110311003F00FEC02BF0FEF3FE0A49E2BF16F8AFE28FF6
BFED53FB0FFF00C13EFC2FF0FBE387C7AF815E11D27F6CBF83BF1A3C57FF000B
BBFE140FC67F1DFC22D7FE287C38F8DDE37F8F5FB09FC1FF00167DAF50F09C5F
F0987C25F81FFF000D11FF000A47EDBE17FF008597F18ADBC51F10AD3C03E12F
DC0AFE73FF00E0A71F187F6B1FF8249E83E32FDA2BF661F13FFC241FB33F8DFF
00E168F8BF53F867F187E1359FC4CFD9E7E027ED0DE3EF893AB7C60F18DDF89F
C4BF0A1FC25FB57E99FF000D89E3FF001CF8AED7E1378DFC45E3AF197C0BF821
F1D1DFE1078EF40D1FE1BFED21F08FC65FB22007AA47FF00052CF8A1E0FF0089
FF00062D7C3DFB49FEC07FF050AF851F11FE2A7C26F825F12E7FD8F3E1F7C77F
05F897E007897E3AFC77F83BF07BE1AF8EBC63F10FC09F14FF006F6F819A6E87
7E9E37F1BDE58781BE3E78CFF659BFF88F7FE146D37E1178EFC6DAFE97E20F0B
5BFEEE57E11FEC1BE2FF00DB57FE0A053789AFFF006EAD1B43F037C3FF0080BF
153E1CA6BDE05F84DF0FDFC11F07BC7FFB557ECDDF163C43E2DB9F05780BC63E
2FF1978E3E31F8B743FD957E31F843C1ABF1EBE27E83E2283E0D7C73FDA0FE1F
F85BE12FC08D413E0BFECFDFB44F8A3F6EDFDDCA002BF0FF00F689FDA57F61B9
BC57E07FDB3FF6FBF8B7E07F85DF053F65BF8E1F1F7C13FB23FC17F196B7E22D
7B5EF1D7C7DF80FF0019E4FD9B3E2CFED45AEFC0EF0B9D7EF3E2BF8E3E147C44
D0353F0FFECDFA5F823C0BE39B9FD9F3E1B78AFC45FB4478CFC5567E33F8BDA5
784BF661FDC0AFE7AFF6ABFF0083797F66AFDA1FE3778D3E38E9FAB687AB6A9F
1175CF11F88758F037ED3307ED33F1A7E1E7C37BFF001578B7C45F127C556FFB
3C697F03FF006C5FD90B5FF869A1FC43F8AFF107E287C56F891E18F1AF89BE2F
786AEBC75E359EFBE18693F0974B1AFE91E2800F54FD9DBF695FD86E1F15F8E3
F6CFFD813E2DF81FE28FC14FDA93E387C02F04FED71F05FC1BADF88B41D7BC0B
F1F7E3C7C678FF0066CF84DFB51685F03BC50740BCF851E38F8AFF001135FD33
C3FF00B48697E37F02F81AE7F683F86DE14F0EFED11E0CF155E78CFE10EABE12
FDA7BF702BF08FF636FF008213FC08FD957C7573E35F3FE15D8DBBEB9F0CFC43
73E15F809F0ABE287C3FB0F1C5FF00C25F887A1FC62F87F6FF0012BC69FB4B7E
D33FB6AFC63B6D0FC11F18FC0BF0CBE28787FC31FB3DFC4FFD9CBC35E2FF0012
F822CB4FFDA1349F8F5E0F83C33E17F097EEE5007FFFD9}
end
end
object txtEffect: TText
Align = alClient
Width = 640.000000000000000000
Height = 480.000000000000000000
HitTest = False
Fill.Color = claAqua
Font.Size = 72.000000000000000000
Text = 'Ripple'
end
end

Sur la page suivante, le code source de cette fiche…