| Class TPieControlEditor (unit xPieReg) |
TForm
| Constructors |
| Functions |
procedure btnApplyClick(Sender: TObject);
procedure CancelButtonClick(Sender: TObject);
procedure DeleteButtonClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure ItemControlExit(Sender: TObject);
procedure ItemEditChange(Sender: TObject);
procedure ItemListClick(Sender: TObject);
procedure ItemListDragDrop(Sender, Source: TObject; X, Y: Integer);
procedure ItemListDragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
procedure NewButtonClick(Sender: TObject);
procedure OkButtonClick(Sender: TObject);
procedure pnlColorClick(Sender: TObject);
procedure PreviewClick(Sender: TObject);
procedure UpdateList;
procedure ShowPreview;| Properties |
| Events |
| Variables |
btnApply : TButton;
ColorDialog1 : TColorDialog;
edHeight : TEdit;
edOutside : TEdit;
edText : TEdit;
edValue : TEdit;
ItemList : TListBox;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
pnlColor : TPanel;
Preview : TxPie;
UpDown1 : TUpDown;
UpDown2 : TUpDown;
UpDown3 : TUpDown;
OrginalPie : TxPie;
PieItems : TPieItems;
fEdit : Boolean;| Constructors |
| Functions |
procedure btnApplyClick(Sender: TObject);
procedure CancelButtonClick(Sender: TObject);
procedure DeleteButtonClick(Sender: TObject);
procedure FormCreate(Sender: TObject);!!!
procedure FormDestroy(Sender: TObject);
procedure ItemControlExit(Sender: TObject);
procedure ItemEditChange(Sender: TObject);
procedure ItemListClick(Sender: TObject);
procedure ItemListDragDrop(Sender, Source: TObject; X, Y: Integer);
procedure ItemListDragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
procedure NewButtonClick(Sender: TObject);TPieControlEditor
procedure OkButtonClick(Sender: TObject);
procedure pnlColorClick(Sender: TObject);
procedure PreviewClick(Sender: TObject);
procedure UpdateList;
procedure ShowPreview;| Properties |
| Events |
| Variables |
btnApply : TButton;
ColorDialog1 : TColorDialog;
edHeight : TEdit;
edOutside : TEdit;
edText : TEdit;
edValue : TEdit;
ItemList : TListBox;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
pnlColor : TPanel;
Preview : TxPie;
UpDown1 : TUpDown;
UpDown2 : TUpDown;
UpDown3 : TUpDown;
OrginalPie : TxPie;
PieItems : TPieItems;Public-Deklarationen
fEdit : Boolean;Private-Deklarationen