TD2BrushDesign

type TD2BrushDesign = class(TForm)

  LabelGradR: TD2Label;

  panelSolid: TD2Rectangle;

  panelGradient: TD2Rectangle;

  solidQuad: TD2ColorQuad;

  solidPicker: TD2ColorPicker;

  gradQuad: TD2ColorQuad;

  d2BrushDesigner: TD2Scene;

  solidCont: TD2Rectangle;

  gradEditor: TD2GradientEdit;

  dsgnRoot: TD2Background;

  Layout1: TD2Layout;

  cnTextR: TD2Label;

  Layout2: TD2Layout;

  Layout3: TD2Layout;

  gradPicker: TD2ColorPicker;

  brushTabControl: TD2TabControl;

  tabNone: TD2TabItem;

  tabSolid: TD2TabItem;

  tabGradient: TD2TabItem;

  cbTextG: TD2Label;

  cbTextB: TD2Label;

  cbTextA: TD2Label;

  brushList: TD2ListBox;

  textSolidR: TD2NumberBox;

  textSolidG: TD2NumberBox;

  textSolidB: TD2NumberBox;

  textSolidA: TD2NumberBox;

  textGradR: TD2NumberBox;

  textGradG: TD2NumberBox;

  textGradB: TD2NumberBox;

  textGradA: TD2NumberBox;

  textSolidHex: TD2TextBox;

  textGradHex: TD2TextBox;

  gradColorRect: TD2ColorBox;

  solidColorRect: TD2ColorBox;

  tabBitmap: TD2TabItem;

  panelBitmap: TD2Layout;

  tabRes: TD2TabItem;

  panerRes: TD2Layout;

  bitmapImage: TD2Image;

  Layout5: TD2Layout;

  btnSelectBitmap: TD2Button;

  resList: TD2ListBox;

  Layout6: TD2Layout;

  btnMakeRes: TD2Button;

  cnLabel1: TD2Label;

  Rectangle1: TD2Rectangle;

  puptileModeList: TD2PopupBox;

  btnCancel: TD2Button;

  btnOK: TD2Button;

  makeResLayout: TD2Layout;

  cbgradAngle: TD2AngleButton;

  LabelGradA: TD2Label;

  cbgradKind: TD2PopupBox;

  gradAngleLabel: TD2Label;

  HudWindow1: TD2HudWindow;

  procedure FormClose();

  procedure solidQuadChange();

  procedure FormCreate();

  procedure gradEditorChange();

  procedure gradQuadChange();

  procedure brushListChange();

  procedure brushTabControlChange();

  procedure textGradRChange();

  procedure textGradHexChange();

  procedure textSolidHexChange();

  procedure btnSelectBitmapClick();

  procedure btnMakeResClick();

  procedure resListChange();

  procedure puptileModeListChange();

  procedure btnOKClick();

  procedure btnCancelClick();

  procedure textSolidRChange();

  procedure cbgradAngleChange();

  procedure cbgradKindChange();

protected

  procedure Notification();

  function UniqueName();

public

  property Comp: TPersistent; [rw]

  property Brush: TD2Brush; [rw]

end;

TD2BrushDesign

TObject