前段时间,我编写了一个创意程序,并用于向自己目前的女朋友表白,结果效果还不错,得到了她的芳心。

于是我将自己的创意程序共享到csdn资源上,大多数网友认为创意不错,就是简单了些——呵呵,其实我个人也这么觉得,只不过当时时间和能力的限制,也就那样将就了

……

点击下载第一次的程序

……

而今呢,我在七夕节时再次为我的女朋友写了一个程序,这次算是上次的升级版吧,功能多了一些、界面效果也好多了

下面,我们就来欣赏一下它的效果吧

(这次的目的和上次一样,只是做一个模本,所以我仅仅是使用了上次的诗歌和一首最近比较火的歌曲<<谁>>(吴佳唱的,电视剧<<生死相依>>的主题曲),留给大家创作的空间^_^)

*************************************************程序及源代码欣赏******************************************************

(1)开始弹出一个消息框,点击"是"继续,点击"否"直接退出

(2)选择"是"之后2秒钟,显示主窗口的界面

(3)这里在主窗口中建立了三个子窗口,这个一眼就能看见,就不言而喻了——我还是将三个子窗口的窗口回调函数代码贴出来,内涵注释

a)诗歌子窗口(左边长方形的那个)

//诗歌子窗口回调函数(动态显示诗歌、播放音乐(音乐可自行选择))
LRESULT CALLBACK PoemChild(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
static HBITMAP hBmp;
static HFONT hFont;
static int cxBitmap, cyBitmap;
static HWND hwndMci;
BITMAP bmp;
LOGFONT lf;
HDC hdc, hdcMem;
PAINTSTRUCT ps;
TEXTMETRIC tm; switch(message)
{
case WM_CREATE:
//开始加载并播放音乐(使用MCI控件)
hwndMci = MCIWndCreate(hwnd, ((LPCREATESTRUCT)lParam)->hInstance,
MCIWNDF_SHOWNAME,TEXT("谁.mp3")); ShowWindow(hwndMci, SW_HIDE);
MCIWndPlay(hwndMci); //加载位图
hBmp = LoadBitmap(((LPCREATESTRUCT)lParam)->hInstance, MAKEINTRESOURCE(IDB_BMPPOEM));
GetObject(hBmp, sizeof(BITMAP), &bmp); cxBitmap = bmp.bmWidth;
cyBitmap = bmp.bmHeight; /**********************获取系统文本参数*************************/
hdc = GetDC(hwnd); GetTextMetrics(hdc, &tm);
cxChar = tm.tmAveCharWidth;
cyChar = tm.tmHeight; ReleaseDC(hwnd, hdc); //设定计时器
SetTimer(hwnd, ID_TIMER_POEM, 400, NULL); //创建字体
ZeroMemory(&lf, sizeof(LOGFONT)); lf.lfHeight = -15;
lf.lfUnderline = 1; hFont = CreateFontIndirect(&lf); //打开诗歌文件
if((fp = fopen("res\\Poem.txt", "r")) == NULL)
{
MessageBox(hwnd, TEXT("不好意思,我找不到优美的诗歌了o(╯□╰)o"), TEXT("提示"), MB_OK);
exit(1);
}
row = col = 0;
return 0 ; //绘制背景位图
case WM_PAINT:
hdc = BeginPaint(hwnd, &ps); hdcMem = CreateCompatibleDC(hdc);
SelectObject(hdcMem, hBmp); BitBlt(hdc, 0, 0, cxBitmap, cyBitmap, hdcMem, 0, 0, SRCCOPY); DeleteDC(hdcMem);
EndPaint(hwnd, &ps);
return 0; //通过响应鼠标消息来控制MCI播放器的显示和隐藏
case WM_LBUTTONDOWN:
if(IsWindowVisible(hwndMci))
{
ShowWindow(hwndMci, SW_HIDE);
} else
{
ShowWindow(hwndMci, SW_NORMAL);
}
return 0; //通过定时器来驱动诗歌的显示
case WM_TIMER:
hdc = GetDC(hwnd); //设定文本颜色
SetTextColor(hdc, RGB(rand() % 255,
rand() % 205, rand() % 255));
SetBkMode(hdc,TRANSPARENT);//设定文本的背景透明 SelectObject(hdc, hFont); //如果文件读取完了 , 计时器也应该关闭 , 免得浪费资源
if(ShowWord(hdc) == EOF)
{
KillTimer(hwnd, ID_TIMER_POEM);
} ReleaseDC(hwnd, hdc);
return 0; case WM_DESTROY:
MCIWndDestroy(hwndMci);//关闭MCI控件
DeleteObject(hFont);
DeleteObject(hBmp);
PostQuitMessage(0);
return 0;
} return DefWindowProc(hwnd, message, wParam, lParam);
}

b)右上角子窗口

//动画位图子窗口回调函数
LRESULT CALLBACK LoveChild(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
static HBITMAP hBmp[NUM];
static POINT bmpPos[NUM];
static int moveIndex[NUM] = {5, 5, 5};
static WORD bmpID[] = {IDB_BMPI, IDB_BMPLOVE, IDB_BMPYOU};
static int cxClient, cyClient, cxBitmap, cyBitmap;
BITMAP bmp;
HDC hdc, hdcMem;
PAINTSTRUCT ps;
int i; switch(message)
{
case WM_CREATE:
//设置计时器
SetTimer(hwnd, ID_TIMER_LOVE, 100, NULL); //加载位图
for(i=0; i<NUM; i++)
{
hBmp[i] = LoadBitmap(((LPCREATESTRUCT)lParam)->hInstance,
MAKEINTRESOURCE(bmpID[i]));
bmpPos[i].x = bmpPos[i].y = -10;
} GetObject(hBmp[0], sizeof(BITMAP), &bmp); cxBitmap = bmp.bmWidth;
cyBitmap = bmp.bmHeight;
return 0; case WM_SIZE:
cxClient = LOWORD(lParam);
cyClient = HIWORD(lParam); //修改位图位置
for(i=0; i<NUM; i++)
{
bmpPos[i].x = cxClient * i / 3;
if(bmpPos[i].x == -10)
{
bmpPos[i].y = rand() % (cyClient - cyBitmap);
}
}
return 0; case WM_PAINT:
hdc = BeginPaint(hwnd, &ps); hdcMem = CreateCompatibleDC(hdc); for(i=0; i<NUM; i++)
{
//判断位图的位置 并作相应的运动方向的改变
if(bmpPos[i].y < 0)//上边界
{
moveIndex[i] = rand() % 10 + 5;
} if(bmpPos[i].y >= (cyClient - cyBitmap))//下边界
{
moveIndex[i] = - (rand() % 10 + 5);
} bmpPos[i].y += moveIndex[i]; SelectObject(hdcMem, hBmp[i]); BitBlt(hdc, bmpPos[i].x, bmpPos[i].y,
cxBitmap, cyBitmap, hdcMem, 0, 0, SRCCOPY);
} DeleteDC(hdcMem);
EndPaint(hwnd, &ps);
return 0; case WM_TIMER:
InvalidateRect(hwnd, NULL, FALSE);//设置无效区域 但是不重绘背景(FALSE)
return 0; case WM_DESTROY:
KillTimer(hwnd, ID_TIMER_LOVE); for(i=0; i<NUM; i++)
{
DeleteObject(hBmp[i]);
} PostQuitMessage(0);
return 0;
}
return DefWindowProc(hwnd, message, wParam, lParam);
}

c)右下角子窗口

//动态变换位图子窗口回调函数
LRESULT CALLBACK BmpChild(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
static HBITMAP hBmp[10];
static WORD bmpID[] = {IDB_BITMAP4, IDB_BITMAP5, IDB_BITMAP6, IDB_BITMAP7,
IDB_BITMAP8, IDB_BITMAP9, IDB_BITMAP10, IDB_BITMAP11,
IDB_BITMAP12, IDB_BITMAP13};
static int cxBitmap, cyBitmap, curBmpIndex;
BITMAP bmp;
HDC hdc, hdcMem;
PAINTSTRUCT ps;
int i; switch(message)
{
case WM_CREATE:
//设置计时器
SetTimer(hwnd, ID_TIMER_BMP, 5000, NULL); //加载位图
for(i=0; i<10; i++)
{
hBmp[i] = LoadBitmap(((LPCREATESTRUCT)lParam)->hInstance,
MAKEINTRESOURCE(bmpID[i]));
} GetObject(hBmp[0], sizeof(BITMAP), &bmp); cxBitmap = bmp.bmWidth;
cyBitmap = bmp.bmHeight;
return 0; case WM_PAINT:
hdc = BeginPaint(hwnd, &ps); hdcMem = CreateCompatibleDC(hdc); SelectObject(hdcMem, hBmp[curBmpIndex]); BitBlt(hdc, 3, 8, cxBitmap, cyBitmap, hdcMem, 0, 0, SRCCOPY); curBmpIndex = (curBmpIndex + 1) % 10; DeleteDC(hdcMem);
EndPaint(hwnd, &ps);
return 0; case WM_TIMER:
InvalidateRect(hwnd, NULL, TRUE);
return 0; case WM_DESTROY:
KillTimer(hwnd, ID_TIMER_BMP); for(i=0; i<10; i++)
{
DeleteObject(hBmp[i]);
} PostQuitMessage(0);
return 0;
}
return DefWindowProc(hwnd, message, wParam, lParam);
}

(4)另外,本次使用了Win32的MCI控件,基本上可以播放任意格式的音频文件

(点击左边长方形子窗口,可以控制这个控件的显示和隐藏)

至于这个控件的使用方法,相信大家能很快了解到,不需要我赘述了

从这个方面来讲,本次的程序还是一个建议的背景音乐播放器

ok,因为大部分技术都是之前讲过的,例如:贴位图、计时器、子窗口==,因此就这样初略地讲一下吧……

希望我的程序能给程序员们带来灵感,愿天下有情人终成眷属^_^

点击下载程序和源代码

随机推荐

  1. isdigit()判断是不是数字

    string 里面的函数isdigit(),可以判断是不是数字. 或者,采用type(1)==int.

  2. Sicily-1024

    一. 题意: 有n个节点,n-1条边,并且任意两个节点都连通.模拟一下,实际上是一棵树的便利,求从特定根节点出发最长路径的值.这里用了广搜. 二. 每个节点只有两条邻接边,每个节点用一个vector来 ...

  3. Android apk逆向实战

    简介 逆向Android apk其实是一个分析Android apk的一个过程,必须了解Android程序开发的流程.结构.语句分支.解密原理等等. 功能 破解一个注册验证程序(自写一个简单的注册验证 ...

  4. 【Maven】pom.xml 配置 eclipse错误

    <!-- servlet --> <dependency> <groupId>javax.servlet</groupId> <artifactI ...

  5. POJ 1562(L - 暴力求解、DFS)

    油田问题(L - 暴力求解.DFS) Description The GeoSurvComp geologic survey company is responsible for detecting ...

  6. C#路径,文件,目录,I/O常见操作

         C#路径,文件,目录,I/O常见操作 文件操作是程序中非常基础和重要的内容,而路径.文件.目录以及I/O都是在进行文件操作时的常见主题,这里想把这些常见的问题作个总结,对于每个问题,尽量提供 ...

  7. currentStyle和getComputedStyle的兼容写法

    今天学习javascript的时候,教程中介绍了一种简单实现jQuery 中css()方法的写法 <!DOCTYPE html> <html lang="en"& ...

  8. pay包注释(二)

    @login_required()def to_register(request):    return render_to_response("pay/register_yeepay.ht ...

  9. hibernate对应的annocation版本

    Hibernate Compatibility Matrix Package Version Core Annotations EntityManager Validator Search Shard ...

  10. mysql 创建临时节点

    use ZooKeeper; use AnyEvent; use AE; use Data::Dumper; use IO::Socket; my $zk = ZooKeeper->new(ho ...