网站导航免费论文 原创论文 论文搜索 原创论文 网学软件 学术大家 资料中心 会员中心 问题解答 原创论文 论文素材 设计下载 最新论文 下载排行 论文上传 在线投稿 联系我们
返回网学首页
网学联系
最新论文 推荐专题 热门论文 素材专题
当前位置: 网学 > 编程文档 > DELPHI > 正文
QQ2000B刷屏机的源码(Delphi)
来源:Http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 12/10/12
下载{$ArticleTitle}原创论文样式
dowEx(WS_EX_CLIENTEDGE,"EDIT","刷屏机器人1.0测试版",WS_VISIBLE¦WS_CHILD¦ES_MULTILINE¦ES_AUTOHSCROLL,10,10,225,115,hMain,NULL,hInstance,NULL);
  hButton1=CreateWindow("BUTTON","开始刷屏",WS_VISIBLE¦WS_CHILD¦BS_PUSHLIKE¦BS_TEXT,10,132,60,24,hMain,NULL,hInstance,NULL);
  hButton2=CreateWindow("BUTTON","停止刷屏",WS_VISIBLE¦WS_CHILD¦BS_PUSHLIKE¦BS_TEXT,80,132,60,24,hMain,NULL,hInstance,NULL);
  hButton3=CreateWindow("BUTTON","系统帮助",WS_VISIBLE¦WS_CHILD¦BS_PUSHLIKE¦BS_TEXT,150,132,60,24,hMain,NULL,hInstance,NULL);
  hFont=CreateFont(-12,0,0,0,0,0,0,0,GB2312_CHARSET,OUT_DEFAULT_PRECIS,CLIP_DEFAULT_PRECIS,DEFAULT_QUALITY,DEFAULT_PITCH¦FF_DONTCARE,"宋体");
     SendMessage(hEdit,WM_SETFONT,(WPARAM)hFont,(LPARAM)0);
  SendMessage(hButton1,WM_SETFONT,(WPARAM)hFont,(LPARAM)0);
  SendMessage(hButton2,WM_SETFONT,(WPARAM)hFont,(LPARAM)0);
  SendMessage(hButton3,WM_SETFONT,(WPARAM)hFont,(LPARAM)0);

  ShowWindow(hMain,SW_SHOW);
  while(GetMessage(&msg,NULL,0,0)){TranslateMessage(&msg);DispatchMessage(&msg);}
  return msg.wParam;

  • 上一篇资讯: 窗口背景颜色渐变
  • 网学推荐

    免费论文

    原创论文

    浏览:
    设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
    版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
    Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
    湘ICP备09003080号