ThinkChat🤖让你学习和工作更高效,注册即送10W Token,即刻开启你的AI之旅 广告
# 效果 ![](https://img.kancloud.cn/00/8b/008b08696b27a28d8bded0a2c6058520_563x292.png) # 代码 ``` import win.ui; /*DSG{{*/ var winform = win.form(text="aardio form";right=546;bottom=252) winform.add( custom={cls="custom";text="自定义控件";left=19;top=24;right=514;bottom=232;bgcolor=0;z=1} ) /*}}*/ // 画笔 import gdi import console console.open() winform.custom.wndproc = function(hwnd,message,wParam,lParam){ select( message ) { case 0xF/*_WM_PAINT*/{ gdi.paint( hwnd, function( hdc,width, height,rcPaint,fErase,paintStruct ){ // 点 var points1 = { int value[8] = {50;100;100;50;150;100;200;30} } // 取得预定义pen 6 代表的是WHITE_PEN 白色画笔 hPen = ::GetStockObject(6) // 使用画笔,返回的是默认的画笔 oldPen = ::SelectObject(hdc,hPen) // 画线 ::Polyline(hdc,points1,4) // 画笔使用完后,记得恢复到原画画笔 ::SelectObject(hdc,oldPen) ::BitBlt(hdc, 0, 0, width, height, hMemDc, 0, 0, 0xCC0020/*_SRCCOPY*/); } ); } }; } winform.show(); win.loopMessage(); return winform; ```