Unit 'BGRANeoButton' Package
[Overview][Types][Classes][Index] [#pl_bgracontrols]

TBGRANeoGradientStyle

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: bgraneobutton.pas line 133

type TBGRANeoGradientStyle = class(TPersistent)

protected

  FOwner: TControl;

  

  FColor1: TColor;

  

  FColor1Alpha: Byte;

  

  FColor2: TColor;

  

  FColor2Alpha: Byte;

  

  FStyle: TGradientType;

  

  FSinus: Boolean;

  

  procedure SetFColor1(); virtual;

  

  procedure SetFColor1Alpha(); virtual;

  

  procedure SetFColor2(); virtual;

  

  procedure SetFColor2Alpha(); virtual;

  

  procedure SetFSinus(); virtual;

  

  procedure SetFStyle(); virtual;

  

public

  constructor Create();

  

  destructor Destroy; override;

  

  procedure Assign(); override;

  

published

  property Color1: TColor; [rw]

  

  property Color1Alpha: Byte; [rw]

  

  property Color2: TColor; [rw]

  

  property Color2Alpha: Byte; [rw]

  

  property Style: TGradientType; [rw]

  

  property Sinus: Boolean; [rw]

  

end;

Inheritance

TBGRANeoGradientStyle

  

|

TObject



CT Web help

CodeTyphon Studio