社区
界面
帖子详情
问个ScrollWindow的问题
flyhigh
2003-12-12 12:07:03
ScrollWindow后我在WM_PAINT该如何做?及如果设置ScrollWindow的无效区?
没做过,特来请教,谢谢!
...全文
117
3
打赏
收藏
微信扫一扫
点击复制链接
分享
举报
写回复
3 条
回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
flyhigh
2003-12-12
是这样啊?
我以为ScrollWindow以后,会改变ViewportOrg或者WindowOrg之类。
但是它到底改变了什么?在被滚动的窗口的子窗口的位置确实是滚动了啊!
打赏
举报
回复
赞
yifengling0
2003-12-12
本文来自windows程序设计一书,更详细的内容可以参考此书。。
如果没有的话可以去down一个
找不到我可以发给你一个电子版的!~
打赏
举报
回复
赞
yifengling0
2003-12-12
程式4-3 SYSMETS2.C
/*------------------------------------------------------------------
SYSMETS2.C -- System Metrics Display Program No. 2
(c) Charles Petzold, 1998
------------------------------------------------------------------*/
#include <windows.h>
#include "sysmets.h"
LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM) ;
int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
PSTR szCmdLine, int iCmdShow)
{
static TCHAR szAppName[] = TEXT ("SysMets2") ;
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))
{
MessageBox (NULL, TEXT ("This program requires Windows NT!"),
szAppName, MB_ICONERROR) ;
return 0 ;
}
hwnd = CreateWindow (szAppName, TEXT ("Get System Metrics No. 2"),
WS_OVERLAPPEDWINDOW | WS_VSCROLL,
CW_USEDEFAULT, CW_USEDEFAULT,
CW_USEDEFAULT, CW_USEDEFAULT,
NULL, NULL, hInstance, NULL) ;
ShowWindow (hwnd, iCmdShow) ;
UpdateWindow (hwnd) ;
while (GetMessage (&msg, NULL, 0, 0))
{
TranslateMessage (&msg) ;
DispatchMessage (&msg) ;
}
return msg.wParam ;
}
LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
static int cxChar, cxCaps, cyChar, cyClient, iVscrollPos ;
HDC hdc ;
int i, y ;
PAINTSTRUCT ps ;
TCHAR szBuffer[10] ;
TEXTMETRIC tm ;
switch (message)
{
case WM_CREATE:
hdc = GetDC (hwnd) ;
GetTextMetrics (hdc, &tm) ;
cxChar = tm.tmAveCharWidth ;
cxCaps = (tm.tmPitchAndFamily & 1 ? 3 : 2) * cxChar / 2 ;
cyChar = tm.tmHeight + tm.tmExternalLeading ;
ReleaseDC (hwnd, hdc) ;
SetScrollRange (hwnd, SB_VERT, 0, NUMLINES - 1, FALSE) ;
SetScrollPos (hwnd, SB_VERT, iVscrollPos, TRUE) ;
return 0 ;
case WM_SIZE:
cyClient = HIWORD (lParam) ;
return 0 ;
case WM_VSCROLL:
switch (LOWORD (wParam))
{
case SB_LINEUP:
iVscrollPos -= 1 ;
break ;
case SB_LINEDOWN:
iVscrollPos += 1 ;
break ;
case SB_PAGEUP:
iVscrollPos -= cyClient / cyChar ;
break ;
case SB_PAGEDOWN:
iVscrollPos += cyClient / cyChar ;
break ;
case SB_THUMBPOSITION:
iVscrollPos = HIWORD (wParam) ;
break ;
default :
break ;
}
iVscrollPos = max (0, min (iVscrollPos, NUMLINES - 1)) ;
if (iVscrollPos != GetScrollPos (hwnd, SB_VERT))
{
SetScrollPos (hwnd, SB_VERT, iVscrollPos, TRUE) ;
InvalidateRect (hwnd, NULL, TRUE) ;
}
return 0 ;
case WM_PAINT:
hdc = BeginPaint (hwnd, &ps) ;
for (i = 0 ; i < NUMLINES ; i++)
{
y = cyChar * (i - iVscrollPos) ;
TextOut (hdc, 0, y,
sysmetrics[i].szLabel,
lstrlen (sysmetrics[i].szLabel)) ;
TextOut (hdc, 22 * cxCaps, y,
sysmetrics[i].szDesc,
lstrlen (sysmetrics[i].szDesc)) ;
SetTextAlign (hdc, TA_RIGHT | TA_TOP) ;
TextOut (hdc, 22 * cxCaps + 40 * cxChar, y, szBuffer,
wsprintf (szBuffer, TEXT ("%5d"),
GetSystemMetrics (sysmetrics[i].iIndex))) ;
SetTextAlign (hdc, TA_LEFT | TA_TOP) ;
}
EndPaint (hwnd, &ps) ;
return 0 ;
case WM_DESTROY:
PostQuitMessage (0) ;
return 0 ;
}
return DefWindowProc (hwnd, message, wParam, lParam) ;
}
新的CreateWindow呼叫在第三个参数中包含了WS_VSCROLL视窗样式,从而在视窗中加入了垂直卷动列,其视窗样式为:
WS_OVERLAPPEDWINDOW | WS_VSCROLL
WndProc视窗讯息处理程式在处理WM_CREATE讯息时增加了两条叙述,以设置垂直卷动列的范围和初始位置:
SetScrollRange (hwnd, SB_VERT, 0, NUMLINES - 1, FALSE) ;
SetScrollPos (hwnd, SB_VERT, iVscrollPos, TRUE) ;
sysmetrics结构具有NUMLINES行文字,所以卷动列范围被设定为0至NUMLINES-1。卷动列的每个位置对应于在显示区域顶部显示的一个文字行。如果卷动方块的位置为0,则第一行会被放置在显示区域的顶部。如果位置大於0,其他行就会出现在显示区域的顶部。当位置为NUMLINES-1时,则最後一行文字出现在显示区域的顶部。
为了有助於处理WM_VSCROLL讯息,在视窗讯息处理程式中定义了一个静态变数iVscrollPos,这一变数是卷动列内卷动方块的目前位置。对於SB_LINEUP和SB_LINEDOWN,只需要将卷动方块调整一个单位的位置。对於SB_PAGEUP和SB_PAGEDOWN,我们想移动一整面的内容,或者移动cyClient /cyChar个单位的位置。对於SB_THUMBPOSITION,新的卷动方块位置是wParam的高字组。SB_ENDSCROLL和SB_THUMBTRACK讯息被忽略。
在程式依据收到的WM_VSCROLL讯息计算出新的iVscrollPos值後,用min和max巨集来调整iVscrollPos,以确保它在最大值与最小值之间。程式然後将iVscrollPos与呼叫GetScrollPos取得的先前位置相比较,如果卷动位置发生了变化,则使用SetScrollPos来进行更新,并且呼叫InvalidateRect使整个视窗无效。
InvalidateRect呼叫产生一个WM_PAINT讯息。SYSMETS1在处理WM_PAINT讯息时,每一行的y座标计算公式为:
cyChar * i
在SYSMETS2中,计算公式为:
cyChar * (i - iVscrollPos)
回圈仍然显示NUMLINES行文字,但是对於非零值的iVscrollPos是负数。程式实际上在显示区域以外显示这些文字行。当然,Windows不会显示这些行,因此萤幕显得乾净和漂亮。
前面说过,我们一开始不想弄得太复杂,这样的程式码很浪费,效率很低。下面我们对此加以修改,但是先要考虑在WM_VSCROLL讯息之後更新显示区域的方法。
打赏
举报
回复
赞
相关推荐
滚动条函数
scroll
window
研究
滚动条函数研究 下周工作需要,可能用到滚动条,所以在此先...但是感觉网上困惑最多的也没有给出具体答案的是
scroll
window
这个函数的最后两个参数的含义,对于初学者来说,初看也是十分的困惑,所以打算花点时间研
Delphi 组件撰写常问
问题
这份文件的目的是为了解答有关撰写 Delphi组件时常见或文件上找不到的
问题
。我曾经花了一段很长的时间来了解探索 TDataLink 类别,这让我觉得应该将撰写组件时常遇到的
问题
及经验心得写下来,分享给大家。不过我并不...
elphi 组件撰写常问
问题
Delphi 组件撰写常问
问题
2005-09-06 13:51:50第一部分 简介1.1 此份文件的目的为何? 这份文件的目的是为了解答有关撰写 Delphi组件时常见或文件上找不到的
问题
。我曾经花了一段很长的时间来了解探索 ...
被
Scroll
Window
折腾出来的——关于区域、重画、无效、WM_PANIT等
=========================
Scroll
Window
原型========================BOOL
Scroll
Window
( HWND hWnd, int XAmount, int YAmount, const RECT *lpRect, const RECT *lpClipRect);参数: xAmoun
Delphi 组件撰写常问
问题
选择自 cwxiao888 的 Blog
这份文件的目的是为了解答有关撰写 Delphi组件时常见或文件上找不到的
问题
。我曾经花了一段很长的时间来了解探索 TDataLink 类别,这让我觉得应该将撰写组件时常遇到的
问题
及经验心得写下来,分享给大家。不过我并...
Window
s 程序设计 复习笔记(共 81 问)
双字节字符集并不是所有字符由两个字节代表,这会引起附加的程序设计
问题
,例如字符串的长度计算。而且处理双字节字符集非常复杂。 什么叫宽字符?什么是Unicode字符?它们有何区别? 用多个字节来代表...
八皇后
问题
这是一个古老的具有代表性的
问题
,用计算机求解时的算法也很多,这里仅介绍一种。 在一个8×8国际象棋盘上,有8个皇后,每个皇后占一格;要求皇后间不会出现相互“攻击”的现象,即不能有两个皇后处在同一行、同一列...
一个好的总结
要达到这个效果,先需做出这个图标文件,图像为16*16像素,不要超过16色。文件格式为ico,然后上传至你的网站。 然后,在需要的页面中,加上以下html语句到文件的和之间(假设以上ico文件的地址...
HTML5编写格式命令详解
这个窗口会在10秒过后自动关闭,而且不会出现提示. 10。网页自动刷新 在head部记入 其中20为20秒后自动刷新,你可以更改为任意值。 11。网页自动转页 ...
摘抄一个伙计的
summer目录 ...一、 关于DataGrid的分页...............................................................................二、 关于上传文件.............................................
如何在CSDN博客自定义栏目中添加“给我写信”
但是添加“给我写信”这个功能,用的好像不太多。此文将一步步教你如何实现这个功能。 效果如下: 步骤: 1.点击给我写信,会跳转到这个界面: 2.点击右下角的 “获取邮我按钮” 3.点击“我要体验” 4...
Android 带你从源码的角度解析
Scroll
er的滚动实现原理
举个简单的例子,一个View从在我们指定的时间内从一个位置滚动到另外一个位置,我们利用
Scroll
er类可以实现匀速滚动,可以先加速后减速,可以先减速后加速等等效果,而不是瞬间的移动的效果,所以
Scroll
er可以帮我们...
VB调用API函数
三、几个
问题
的说明: (1)声明中的Lib 和 Alias 是怎么回事 一般情况下WIN32API函数总是包含在
WINDOW
S系统自带的或是其它公司提供的动态连接库DLL中,而 Declare语句中的Lib关键字就...
python tkinter滚动条与grid_框架用Tkinter滚动条
请看我的课,那是一个可滚动的框架。它的垂直滚动条被绑定到事件也是。所以,您所要做的就是创建一个框架,按照您喜欢的...大量使用@Brayan Oakley的答案来接近这个
问题
class
Scroll
ed
Window
(tk.Frame):"""1.Master...
Window
s.h 常用API函数【转】
转自:https://blog.csdn.net/farmwang/article/details/50603608 http://www.vbgood.com/api.html ... 第一个:Find
Window
根据窗口类名或窗口标题名来获得窗口的句柄,该函数返回窗口的句柄, 这...
VC API常用函数简单例子大全
第一个:Find
Window
根据窗口类名或窗口标题名来获得窗口的句柄,该函数返回窗口的句柄, 这个函数的定义是这样的 HWND WINAPI Find
Window
(LPCSTR lpClassName,LPCSTR lp
Window
Name);第一个参数填窗口的类名,第二...
VC API常用函数
第一个:Find
Window
根据窗口类名或窗口标题名来获得窗口的句柄,该函数返回窗口的句柄, 这个函数的定义是这样的 HWND WINAPI Find
Window
(LPCSTR lpClassName,LPCSTR lp
Window
Name);第一个参数填窗口的类名,第二...
计算机软件-商业源码-水木清华_Delphi精华.zip
计算机软件-商业源码-水木清华_Delphi精华.zip
电商公司组织架构.pdf
电商公司组织架构.pdf电商公司组织架构.pdf电商公司组织架构.pdf电商公司组织架构.pdf电商公司组织架构.pdf电商公司组织架构.pdf电商公司组织架构.pdf电商公司组织架构.pdf
【推荐】人教版高中化学选修五 3.3羧酸 酯第1课时(教案1).doc
【推荐】人教版高中化学选修五 3.3羧酸 酯第1课时(教案1).doc
发帖
界面
加入
微信扫一扫
点击复制链接
1.5w+
社区成员
11.5w+
社区内容
VC/MFC 界面
申请成为版主
帖子事件
创建了帖子
2003-12-12 12:07
社区公告
暂无公告