TDrawButton - Exemples

TDrawButton = class (TDrawObject)Interface de TDrawButtonExemples de TDrawButton
uses UGraphicalViews;

var btn:=TDrawButton.CreateNew('btn2');
btn.XSize:=100;
btn.YSize:=50;
btn.XPos:=100;
btn.YPos:=100;
btn.Caption:='Click me';
btn.Enabled:=True;
btn.ScriptOnClick:="InformationDlg('hello');";