多应用+插件架构,代码干净,二开方便,首家独创一键云编译技术,文档视频完善,免费商用码云13.8K 广告
# 效果 ![](https://img.kancloud.cn/4c/db/4cdb5a6e71f4657b56f37844805df6e1_756x625.png) # 代码 ``` import gdi import console console.open() winform.custom.wndproc = function(hwnd,message,wParam,lParam){ select( message ) { case 0xF/*_WM_PAINT*/{ var ps = ::PAINTSTRUCT(); var pt = ::POINTF() var hdc = ::BeginPaint(hwnd,ps); // 定义一个起点 ::MoveToEx(hdc,50,50,pt) // 从起点连线到一个点 ::LineTo(hdc,100,100) ::LineTo(hdc,150,50) ::LineTo(hdc,200,100) ::LineTo(hdc,250,50) ::LineTo(hdc,300,100) ::EndPaint(hwnd,ps) } }; } winform.custom2.wndproc = function(hwnd,message,wParam,lParam){ select( message ) { case 0xF/*_WM_PAINT*/{ gdi.paint( hwnd, function( hdc,width, height,rcPaint,fErase,paintStruct ){ // 用封装过的drawLine画线,把第一个点当作起点 gdi.drawLine(hdc,50,50,100,100,150,50,200,100,250,50,300,100) ::BitBlt(hdc, 0, 0, width, height, hMemDc, 0, 0, 0xCC0020/*_SRCCOPY*/); } ); } }; } winform.custom3.wndproc = function(hwnd,message,wParam,lParam){ select( message ) { case 0xF/*_WM_PAINT*/{ gdi.paint( hwnd, function( hdc,width, height,rcPaint,fErase,paintStruct ){ var points = { int value[12] = {50;50;100;100;150;50;200;100;250;50;300;100} } // 把第一个点当作起点 ::Polyline(hdc,points,6) ::BitBlt(hdc, 0, 0, width, height, hMemDc, 0, 0, 0xCC0020/*_SRCCOPY*/); } ); } }; } winform.custom4.wndproc = function(hwnd,message,wParam,lParam){ select( message ) { case 0xF/*_WM_PAINT*/{ gdi.paint( hwnd, function( hdc,width, height,rcPaint,fErase,paintStruct ){ var points = { int value[12] = {50;50;100;100;150;50;200;100;250;50;300;100} } // 用默认的起点开始画线,默认的起点(0,0) ::PolylineTo(hdc,points,6) ::BitBlt(hdc, 0, 0, width, height, hMemDc, 0, 0, 0xCC0020/*_SRCCOPY*/); } ); } }; } winform.custom5.wndproc = function(hwnd,message,wParam,lParam){ select( message ) { case 0xF/*_WM_PAINT*/{ var ps = ::PAINTSTRUCT(); var pt = ::POINTF() var hdc = ::BeginPaint(hwnd,ps); // 定义点的结构体 起点到终点 var points = { int value[12] = {50;50;100;100;150;50;200;100;250;50;300;100} } ::Polyline(hdc,points,6) ::EndPaint(hwnd,ps) } }; } winform.custom6.wndproc = function(hwnd,message,wParam,lParam){ select( message ) { case 0xF/*_WM_PAINT*/{ var ps = ::PAINTSTRUCT(); var pt = ::POINTF() var hdc = ::BeginPaint(hwnd,ps); // 定义点的结构体 经过的点 var points = { int value[12] = {50;50;100;100;150;50;200;100;250;50;300;100} } ::PolylineTo(hdc,points,6) ::EndPaint(hwnd,ps) } }; } ```