看过几篇关于vc与delphi比较的文章,自己也有心写写代码试试,我在vc6下新建了一个工程,叫wintest.代码如下:
【程序编程相关:利用Delphi和金山词霸制作批量单词翻】 【推荐阅读:ASC II 完整码表及简介】#include <windows.h> 【扩展信息:Delphi2005学习笔记4——再谈N】hwnd hwndbutton;
int cx, cy;lresult callback mainwndproc (hwnd hwindow, uint nmsg, wparam wprm, lparam lprm)
{hdc dc;
paintstruct ps; rect rc; switch (nmsg) { case wm_create: { textmetric tm;dc = getdc (hwindow);
selectobject (dc, getstockobject (system_fixed_font)); gettextmetrics (dc, &tm); cx = tm.tmavecharwidth * 30; cy = (tm.tmheight + tm.tmexternalleading) * 2; releasedc (hwindow, dc);hwndbutton = createwindow (
"button", "click here", ws_child | ws_visible | bs_pushbutton, 0, 0, cx, cy, hwindow, (hmenu) 1, ((lpcreatestruct) lprm)->hinstance, null );return 0;
break; }... 下一页