Difference between revisions of "Reference: MSEgui/TFace"

From Free Pascal wiki
Jump to navigationJump to search
(Created page with "=TFace= ==Reference== ===Hierarchy=== * TObject * TPersistent * TVirtualPersistent * TNullInterfacesPersistent * TOptionalPersistent * TCustomFace * TFace ===Properties...")
 
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.


msegui face fade.png

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.