网站导航免费论文 原创论文 论文搜索 原创论文 网学软件 学术大家 资料中心 会员中心 问题解答 原创论文 论文素材 设计下载 最新论文 下载排行 论文上传 在线投稿 联系我们
返回网学首页
网学联系
最新论文 推荐专题 热门论文 素材专题
当前位置: 网学 > 编程文档 > DELPHI > 正文
Delphi下用Windows API创建窗体
来源:Http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 12/10/12
下载{$ArticleTitle}原创论文样式
izeOf(TWndClassEx);
  WinClass.lpszClassName:=''MyWindow'';         //类名.
  WinClass.style:=CS_HREDRAW or CS_VREDRAW or CS_OWNDC;
  WinClass.hInstance:=hInst;              //程序的实例句柄.
//设置窗口消息处理函数.
  WinClass.lpfnWndProc:=@MyWinProc;           //窗口过程.
  WinClass.cbClsExtra:=0;                     //以下两个域用于在类结构和Window
s内部保存的窗口结构
  WinClass.cbWndExtra:=0;                     //中预留一些额外空间.
  WinClass.hIcon:=LoadIcon(hInstance,MakeIntResource(''MAINICON''));
  WinClass.hIconsm:=LoadIcon(hInstance,MakeIntResource(''MAINICON''));
  WinClass.hCursor:=LoadCursor(0,IDC_Arrow);
//GetStockObject 获取一个图形对象,在这里是获取绘制窗口背景的刷子,返回一个白色刷
子的句柄.
  WinClass.hbrBackground:=HBRUSH(GetStockObject(white_Brush));
  WinClass.lpszMenuName:=nil;                 //指定窗口类菜单.

//向Windows 注册窗口类.
  if RegisterClassEx(WinClass)=0 then
  begin
    MessageBox(0,''Registeration Error!'',''SDK/API'',MB_OK);
    Exit;
  end;

//建立窗口对象.
  hWnd:=CreateWindowEx(
                 WS_EX_OVERLAPPEDWINDOW,                 //扩展的窗口风格.
                 WinClass.lpszClassName,                 //类名.
                 ''Hello Window'',                         //窗口标题.
                 WS_OVERLAPPEDWINDOW,                    //窗口风格.
                 CW_USEDEFAULT,                          //窗口左上角相对于屏幕
左上角的初始位置x.
  &n
  • 上一篇资讯: 常用文件目录操作
  • 网学推荐

    免费论文

    原创论文

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