- 博客(1)
- 资源 (1)
- 收藏
- 关注
Genesis2000 Perl制作电脑V-CUT图纸,源码提供下载
perl制作电脑V-CUT图纸,源码提供下载,perl win32 gui模块编写
#! /usr/bin/perl -w
use Config();
use Config::IniFiles;
use strict;
use Win32::GUI::DIBitmap();
use Win32::GUI::BitmapInline;
use Win32::GUI qw(MB_OK MB_ICONINFORMATION MB_ICONQUESTION MB_YESNOCANCEL MB_YESNO);
use Win32::API;
use Win32::API::Callback;
use Socket;
$font14 = Win32::GUI::Font->new(-name=>"宋体", -bold=>1, -size=>13);##小字体
$font15 = Win32::GUI::Font->new(-name=>"宋体", -bold=>0, -size=>13)
2023-01-08
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人