Difference between revisions of "Reference: MSEgui/TFace"
From Free Pascal wiki
Jump to navigationJump to searchMichaelEbner (talk | contribs) (Created page with "=TFace= ==Reference== ===Hierarchy=== * TObject * TPersistent * TVirtualPersistent * TNullInterfacesPersistent * TOptionalPersistent * TCustomFace * TFace ===Properties...") |
MichaelEbner (talk | contribs) |
||
Line 18: | Line 18: | ||
===Properties=== | ===Properties=== | ||
+ | ====Fade==== | ||
+ | You can specify a color fade with two or more colors. (You can specify with one color too, but that's no fade...) | ||
+ | |||
+ | The picture was generated with the following code. Please not, that green is not exactly in the middle, but moved to the left - the position isn't 0.5, it's 0.3. | ||
+ | |||
+ | |||
+ | [[Image:msegui_face_fade.png]] | ||
+ | |||
+ | <syntaxhighlight> | ||
+ | procedure tmainfo.Button3Execute(const sender: TObject); | ||
+ | begin | ||
+ | Button3.Face := TFace.Create; | ||
+ | Button3.Face.Fade_color.Count := 3; | ||
+ | Button3.Face.Fade_color.Items[0] := cl_red; | ||
+ | Button3.Face.Fade_color.Items[1] := cl_green; | ||
+ | Button3.Face.Fade_color.Items[2] := cl_blue; | ||
+ | Button3.Face.Fade_pos.Count := 3; | ||
+ | Button3.Face.Fade_pos.Items[0] := 0; | ||
+ | Button3.Face.Fade_pos.Items[1] := 0.3; | ||
+ | Button3.Face.Fade_pos.Items[2] := 1; | ||
+ | end; | ||
+ | </syntaxhighlight> | ||
===Methods=== | ===Methods=== |
Revision as of 20:18, 17 December 2015
TFace
Reference
Hierarchy
- TObject
- TPersistent
- TVirtualPersistent
- TNullInterfacesPersistent
- TOptionalPersistent
- TCustomFace
- TFace
Properties
Fade
You can specify a color fade with two or more colors. (You can specify with one color too, but that's no fade...)
The picture was generated with the following code. Please not, that green is not exactly in the middle, but moved to the left - the position isn't 0.5, it's 0.3.
procedure tmainfo.Button3Execute(const sender: TObject);
begin
Button3.Face := TFace.Create;
Button3.Face.Fade_color.Count := 3;
Button3.Face.Fade_color.Items[0] := cl_red;
Button3.Face.Fade_color.Items[1] := cl_green;
Button3.Face.Fade_color.Items[2] := cl_blue;
Button3.Face.Fade_pos.Count := 3;
Button3.Face.Fade_pos.Items[0] := 0;
Button3.Face.Fade_pos.Items[1] := 0.3;
Button3.Face.Fade_pos.Items[2] := 1;
end;
Methods
Events
known issues
issues of the class
issues of this documentation
Feel free to add your points here.