鱼C论坛

 找回密码
 立即注册
查看: 4355|回复: 34

[技术交流] 做了个简易抽号器(Windows)

[复制链接]
发表于 2023-9-29 14:38:00 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
本帖最后由 额外减小 于 2023-10-1 21:44 编辑

rt.

求评分啊啊啊我想申精啊
如有评分,我会尽量帮你回本(育碧,荣誉)

Update. 各位下载后最好自己重新编译一次,因为各种电脑的编译环境可能不太一样。
另外,大家可以把位置参数稍微改成适合自己电脑的参数,因为各个电脑分辨率可能不同。



C++写的,众所周知用 windows.h 写代码是相对来说较为复杂的。

因为在班级中,经常需要选出一些人干活 / 做电子小报 / 做一些特殊任务,所以这个抽号器的运用是相当广泛的。
大家可以把这个抽号器拷贝到班级的电脑上(bushi)

因为该程序用到了图片资源,所以大家可以下载下面的集成资源包

已撒币,想申精,求评分

效果展示:
t2.png

源代码:
/*    
 *      感谢您的使用。
 *      
 *    __Jianbing_Juan__ 
 *
 *   我是蒟蒻,不喜勿喷
*/


#include <windows.h>
#include <gdiplus.h> //graphics
#include <cstdio> //sprintf
#include <cstdlib> //atoi , itoa
#include <random> //random_shuffle
#include <algorithm> //random_shuffle
#include <ctime> //srand
#include <cstring> //string operations
using namespace std;
using namespace Gdiplus;

int nums[100];
const LPARAM linebreak=(LPARAM)'\n';

const int total_num=54;

LRESULT CALLBACK WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam);

int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,PSTR szCmdLine,int iCmdShow)
{
        
        static TCHAR szAppName[]=TEXT("MyWindowClass");
        HWND hwnd;
        MSG msg;
        WNDCLASS wndclass;
        
        wndclass.style = CS_HREDRAW | CS_VREDRAW;
        wndclass.lpfnWndProc = WndProc;
        wndclass.cbClsExtra = 0;
        wndclass.cbWndExtra = 0;
        wndclass.hInstance = hInstance;
        wndclass.hIcon = LoadIcon(NULL, IDI_APPLICATION);
        wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
        wndclass.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
        wndclass.lpszMenuName = NULL;
        wndclass.lpszClassName = szAppName;
        
        if(!RegisterClass(&wndclass))
        return 0;
        
        hwnd=CreateWindow(szAppName,TEXT("抽号器"),WS_OVERLAPPEDWINDOW,CW_USEDEFAULT,CW_USEDEFAULT,350,400,NULL,NULL,hInstance,NULL);
        
        GdiplusStartupInput gdiplusStartupInput;
        ULONG_PTR gdiplusToken;
        GdiplusStartup(&gdiplusToken,&gdiplusStartupInput,nullptr);
        
        ShowWindow(hwnd,iCmdShow);
        UpdateWindow(hwnd);
        
        
        
        for(int i=0;i<total_num;i++)
        {
                nums[i]=i+1;
        }
        
        while(GetMessage(&msg,NULL,0,0))
        {
                SetFocus(hwnd);
                TranslateMessage(&msg);
                DispatchMessage(&msg);
        }
        
        GdiplusShutdown(gdiplusToken);
        
        return msg.wParam;
}

HWND hInputBox,hOutputBox;
char num[5];


LRESULT CALLBACK WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
        switch(message)
        {
                case WM_PAINT:
                {
                        PAINTSTRUCT ps;
                        HDC hdc=BeginPaint(hwnd,&ps);
                        Graphics graphics(hdc);
                        Image image(L"unforgettable.png");
                        graphics.DrawImage(&image,200,80);
                        RECT rect={160,10,330,35};
                        DrawText(hdc,TEXT("输入需要抽取的人数"),-1,&rect,DT_SINGLELINE|DT_CENTER|DT_VCENTER);
                        
                        EndPaint(hwnd,&ps);
                        break;
                }
                        
                case WM_CREATE:
                {
                        hInputBox=CreateWindow(TEXT("EDIT"),TEXT(""),WS_CHILD|WS_VISIBLE|WS_BORDER|ES_AUTOHSCROLL|ES_READONLY,10,10,150,24,hwnd,NULL,NULL,NULL);
                        hOutputBox=CreateWindow(TEXT("EDIT"),TEXT(""),WS_CHILD|WS_VISIBLE|WS_BORDER|WS_VSCROLL|ES_AUTOVSCROLL|ES_MULTILINE|ES_READONLY,10,50,150,300,hwnd,NULL,NULL,NULL);
                        
                        break;
                }
                
                case WM_KEYDOWN:
                {
                        
                        if(wParam==VK_RETURN)
                        {
                                SendMessage(hOutputBox,WM_SETTEXT,0,(LPARAM)"");
                                GetWindowText(hInputBox,num,5);
                                
                                int iNum=atoi(num);
                                if(iNum>54 or iNum==0)
                                {
                                        MessageBox(hwnd,"  非法输入  ","提示",MB_OK|MB_ICONERROR);
                                }
                                else
                                {
                                        srand(time(nullptr));
                                        random_shuffle(nums,nums+total_num);
                                        char out_str[5];
                                        for(int i=0;i<iNum;i++)
                                        {
                                                itoa(nums[i],out_str,10);
                                                int l=strlen(out_str);
                                                SendMessage(hOutputBox,EM_REPLACESEL,true,(LPARAM)out_str);
                                                SendMessage(hOutputBox,EM_REPLACESEL,true,(LPARAM)"\r\n");
                                        }
                                }
                                
                                SendMessage(hInputBox,WM_SETTEXT,0,(LPARAM)"");
                                
                        }
                        else if(wParam==VK_BACK)
                        {
                                
                                int nStart,nEnd;
                                SendMessage(hInputBox,EM_GETSEL,(WPARAM)&nStart,(LPARAM)&nEnd);
                                nStart--;
                                nEnd=nStart+1;
                                SendMessage(hInputBox,EM_SETSEL,nStart,nEnd);
                                SendMessage(hInputBox,EM_REPLACESEL,true,(LPARAM)"");
                        }
                        else if(wParam>='0' and wParam<='9')
                        {
                                SendMessage(hInputBox,EM_REPLACESEL,true,(LPARAM)&wParam);
                        }
                        else if(wParam>=96 and wParam<=105)
                        {
                                WPARAM wTmp=wParam;
                                wTmp-=48;
                                SendMessage(hInputBox,EM_REPLACESEL,true,(LPARAM)&wTmp);
                        }
                        break;
                }
                case WM_DESTROY:
                {
                        PostQuitMessage(0);
                        return 0;
                }
        }
        
        return DefWindowProc(hwnd,message,wParam,lParam);
}

集成资源包:

drawer.zip (139.03 KB, 下载次数: 12)

评分

参与人数 6荣誉 +21 鱼币 +16 贡献 +12 收起 理由
歌者文明清理员 + 5 + 3
奋斗中的鱼 + 1 鱼C有你更精彩^_^
yinda_peng + 5 回个血
陶远航 + 5 + 5 + 3 鱼C有你更精彩^_^
python爱好者. + 5 + 1 + 3 鱼C有你更精彩^_^
liuhongrun2022 + 5 + 5 + 3

查看全部评分

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

 楼主| 发表于 2023-9-29 14:42:20 | 显示全部楼层
本帖最后由 额外减小 于 2023-9-29 15:28 编辑

大家可以提出改进建议,有丰厚的奖励。
尽量不要无意义回复,我要破产了。
也不是说不能回复,qpzc还是可以的,(但是你要作出实际行动(bushi))
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-29 15:39:16 | 显示全部楼层

回帖奖励 +2 鱼币

qpzc啥意思啊
还有qp
cu ball
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-29 15:49:13 | 显示全部楼层

回帖奖励 +2 鱼币

Mike_python小 发表于 2023-9-29 15:39
qpzc啥意思啊
还有qp
cu ball

qpzc = 前排支持
qp = 前排
cuball不知道
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-29 15:49:19 | 显示全部楼层
Mike_python小 发表于 2023-9-29 15:39
qpzc啥意思啊
还有qp
cu ball

qpzc=前排支持

qp略
cu ball不知道
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-29 15:49:44 | 显示全部楼层
前来支持!这玩意好玩
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-29 15:49:50 | 显示全部楼层

回帖奖励 +2 鱼币

cu ball
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-29 15:54:39 | 显示全部楼层
Ewan-Ahiouy 发表于 2023-9-29 12:49
qpzc = 前排支持
qp = 前排
cuball不知道

cu ball
为什么是不知道的一丝
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-29 15:56:22 | 显示全部楼层
Mike_python小 发表于 2023-9-29 15:54
cu ball
为什么是不知道的一丝

emmm是我不知道。

不过现在我知道了

https://www.luogu.com.cn/blog/FCBM71/luogu-dictionary
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-29 16:28:00 | 显示全部楼层

回帖奖励 +2 鱼币

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2023-9-29 18:17:59 | 显示全部楼层
Mike_python小 发表于 2023-9-29 15:39
qpzc啥意思啊
还有qp
cu ball

qpzc=前排支持
qp=前排
具体看 https://www.luogu.com.cn/blog/WARNING/luo-gu-ding-lv-ming-ci

评分

参与人数 1荣誉 +5 鱼币 +5 收起 理由
额外减小 + 5 + 5 谢谢支持

查看全部评分

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-29 20:03:52 | 显示全部楼层

回帖奖励 +2 鱼币

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2023-9-29 20:18:11 | 显示全部楼层

回帖奖励 +2 鱼币

qpzc
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2023-9-29 22:09:55 | 显示全部楼层
qpzc

评分

参与人数 1荣誉 +5 鱼币 +5 收起 理由
额外减小 + 5 + 5 回本

查看全部评分

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2023-9-29 22:10:45 | 显示全部楼层

回帖奖励 +2 鱼币

回本
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2023-9-30 09:03:36 | 显示全部楼层

回帖奖励 +2 鱼币

qpzc
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2023-9-30 10:29:40 | 显示全部楼层
ok啊,完美地看不懂了

评分

参与人数 1荣誉 +5 鱼币 +5 收起 理由
额外减小 + 5 + 5 给你回本,谢谢支持

查看全部评分

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-9-30 13:53:18 | 显示全部楼层
奋斗中的鱼 发表于 2023-9-30 10:29
ok啊,完美地看不懂了

今天评分额度没了,明天给你回本
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-9-30 20:13:45 | 显示全部楼层

回帖奖励 +2 鱼币

已评

评分

参与人数 1荣誉 +5 鱼币 +5 收起 理由
额外减小 + 5 + 5

查看全部评分

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2023-10-1 19:40:15 | 显示全部楼层

回帖奖励 +2 鱼币

支持
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2025-3-13 09:57

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表