<火山程序 类型 = "通常" 版本 = 1 />
方法 我的主窗口_创建完毕 <接收事件 类型 = 整数 注释 = "当本组件及其中所有子组件均被创建完毕后发送此事件.">
参数 来源对象 <类型 = 我的主窗口 注释 = "提供事件产生的具体来源对象">
参数 标记值 <类型 = 整数 注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
{
GP令牌 = GP初始类.初始化GDI ()
图形.创建自窗口句柄 (画板1.取窗口句柄 (), )
图形.置平滑模式 (GP平滑模式.抗锯齿)
图形.清除 (GP颜色.到ARGB (颜色类.白色, ))
画笔.创建自颜色 (GP颜色.到ARGB (颜色选择器1.颜色, ), 文本到整数 (编辑框1.内容))
画笔.置线帽 (GP线帽.圆线帽, GP线帽.圆线帽, GP虚线帽.圆线帽)
返回 (0)
}
