易语言设置控件边框颜色

.如果真 (GetProp (句柄, “OrigProcAddr”) ＝ 0)
SetProp (句柄, “OrigProcAddr”, SetWindowLong (句柄, #GWL_WNDPROC, 到整数 (&WindowProc)))
SetProp (句柄, “Color”, 颜色_)