易语言自制滚动条源码 _易语言源码网_易语言资源网

当前位置：首页 > 等阶教程源码 > 进阶教程源码易语言自制滚动条源码

易语言自制滚动条源码

软件授权：

开源软件
软件大小：

18.96 KB
文件类型：

.zip,.e
下载次数：
上传用户：
心脏
发布时间：
2018-10-20 02:15
软件等阶：
运行环境：
Winall,Win2003,WinXP,Win7,Win8
软件评级：

源码下载

软件介绍

易语言自制滚动条源码

系统结构:处理2,addrToSCROLLINFO,处理3,hookProc,attachTimer,timerProc,长时按下,高精度等待,A2W,启动线程_,创建进入许可证_,删除进入许可证_,进入许可区_,退出许可区_,等待线程_,挂起线程_,继续执行_,取线程返回值_,强制结束线程_,关闭线程句柄_,API_GetScrollInfo,API_GetScrollPos,API_GetScrollRange,API_SetScrollInfo,API_SetScrollPos,API_SetScrollRange,API_LocalSize_SCROLLINFO,API_LocalSize_MOUSEHOOKSTRUCT,API_LocalSize_TRACKMOUSEEVENT,API_CallWindowProc,API_SetWindowLong,API_SendMessage,API_CopyMemory,API_DefWindowProc,API_GetCurrentProcess,API_VirtualAllocEx,API_RtlMoveMemory,API_WriteProcessMemory,API_GetProp,API_SetProp,API_BeginPaint,API_EndPaint,API_DrawThemeEdge,API_DrawThemeText,API_DrawThemeBackground,API_CloseThemeData,API_OpenThemeData,API_MultiByteToWideChar,API_ReleaseDC,API_InvalidateRect,API_GetClientRect,API_TrackMouseEvent,API_timeKillEvent,API_timeSetEvent,API_GetAsyncKeyState,API_CreateWaitableTimer,API_CancelWaitableTimer,API_MsgWaitForMultipleObjects,API_SetWaitableTimer,API_InitializeCriticalSection,API_DeleteCriticalSection,API_EnterCriticalSection,API_LeaveCriticalSection,API_CreateThread,API_CloseHandle,API_WaitForSingleObject,API_SuspendThread,API_TerminateThread,API_ResumeThread,API_GetExitCodeThread,API_SetWindowsHookEx,API_UnhookWindowsHookEx,API_CallNextHookEx,API_GetModuleHandle,API_RtlMoveMemory_MSLLHOOKSTRUCT,API_GetCursorPos,API_WindowFromPoint,API_ClientToScreen,API_ScreenToClient,API_BitBlt,API_CreateCompatibleBitmap,API_CreateCompatibleDC,API_DeleteDC,API_DeleteObject,API_SelectObject,

易语言自制滚动条源码

调用的DLL命令:

.DLL命令 API_GetScrollInfo, 整数型, "user32", "GetScrollInfo", , 　
    .参数 hWnd, 整数型
    .参数 n, 整数型
    .参数 lpScrollInfo, SCROLLINFO

.DLL命令 API_GetScrollPos, 整数型, "user32", "GetScrollPos", , 返回滑块位置　
.参数 hwnd, 整数型
.参数 nBar, 整数型

.DLL命令 API_GetScrollRange, 整数型, "user32", "GetScrollRange", , 返回滑块运动范围　
    .参数 hwnd, 整数型
    .参数 nBar, 整数型
    .参数 lpMinPos, 整数型, 传址
    .参数 lpMaxPos, 整数型, 传址

.DLL命令 API_SetScrollInfo, 整数型, "user32", "SetScrollInfo", , 　
    .参数 hWnd, 整数型
    .参数 n, 整数型
    .参数 lpcScrollInfo, SCROLLINFO
    .参数 bool, 逻辑型

.DLL命令 API_SetScrollPos, 整数型, "user32", "SetScrollPos", , 设置滚动条位置　
    .参数 hwnd, 整数型
    .参数 nBar, 整数型
    .参数 nPos, 整数型
    .参数 bRedraw, 整数型

.DLL命令 API_SetScrollRange, 整数型, "user32", "SetScrollRange", , 设置滚动条最大和最小位置　
    .参数 hwnd, 整数型
    .参数 nBar, 整数型
    .参数 nMinPos, 整数型
    .参数 nMaxPos, 整数型
    .参数 bRedraw, 整数型

.DLL命令 API_LocalSize_SCROLLINFO, 整数型, "kernel32", "LocalSize", , 返回本地内存块大小　
.参数 hMem, SCROLLINFO

.DLL命令 API_LocalSize_MOUSEHOOKSTRUCT, 整数型, "kernel32", "LocalSize", , 返回本地内存块大小　
.参数 hMem, MOUSEHOOKSTRUCT

.DLL命令 API_LocalSize_TRACKMOUSEEVENT, 整数型, "kernel32", "LocalSize", , 返回本地内存块大小　
.参数 hMem, TRACKMOUSEEVENT

.DLL命令 API_CallWindowProc, 整数型, , "CallWindowProcA"
    .参数程序指针, 子程序指针
    .参数窗口句柄, 整数型
    .参数消息, 整数型
    .参数参数1, 整数型
    .参数参数2, 整数型

.DLL命令 API_SetWindowLong, 子程序指针, , "SetWindowLongA"
    .参数窗口句柄, 整数型
    .参数要置的特征, 整数型
    .参数新特征, 子程序指针, , 仅易语言3.0支持

.DLL命令 API_SendMessage, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum， ;    SendMessageByString是该函数的“类型security”声明形式　由具体的消息决定
    .参数窗口句柄, 整数型, , 要接收消息的那个窗口的句柄
    .参数信息值, 整数型, , 消息的标识符
    .参数参数一, 整数型, , 具体取决于消息
    .参数参数二, 整数型, , 具体取决于消息;

.DLL命令 API_CopyMemory, , "kernel32", "RtlMoveMemory", , 　
    .参数 pDest, 整数型
    .参数 pSrc, 整数型
    .参数 ByteLen, 整数型

.DLL命令 API_DefWindowProc, 整数型, "user32", "DefWindowProcA", , 调用缺省窗口过程　
    .参数 hwnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 API_GetCurrentProcess, 整数型, "kernel32", "GetCurrentProcess", , 获取当前进程的一个伪句柄　当前进程的伪句柄

.DLL命令 API_VirtualAllocEx, 整数型, "kernel32.dll", "VirtualAllocEx", , 　
    .参数 hProcess, 整数型
    .参数 lpAddress, 整数型
    .参数 dwSize, 整数型, 传址
    .参数 flAllocationType, 整数型
    .参数 flProtect, 整数型

.DLL命令 API_RtlMoveMemory, 整数型, , "RtlMoveMemory"
    .参数 Destination, SCROLLINFO, 传址
    .参数 Source, 整数型
    .参数 Length, 整数型

.DLL命令 API_WriteProcessMemory, 整数型, "kernel32", "WriteProcessMemory", , 在指定进程中写内存　
    .参数 hProcess, 整数型
    .参数 lpBaseAddress, 整数型
    .参数 lpBuffer, 整数型
    .参数 nSize, 整数型
    .参数 lpNumberOfBytesWritten, 整数型

.DLL命令 API_GetProp, 整数型, "user32", "GetPropA", , 从窗口属性表列中返回数据句柄　
.参数 hwnd, 整数型
.参数 lpString, 文本型

.DLL命令 API_SetProp, 整数型, "user32", "SetPropA", , 增加或修改属性列项　
    .参数 hwnd, 整数型
    .参数 lpString, 文本型
    .参数 hData, 整数型

.DLL命令 API_BeginPaint, 整数型, "user32", "BeginPaint", , 准备一个画图窗　
.参数 hwnd, 整数型
.参数 lpPaint, PAINTSTRUCT

.DLL命令 API_EndPaint, 整数型, "user32", "EndPaint", , 在指定窗口中标记图画结尾标志　
.参数 hwnd, 整数型
.参数 lpPaint, PAINTSTRUCT

.DLL命令 API_DrawThemeEdge, 整数型, "uxtheme.dll", "DrawThemeEdge"
    .参数 hTheme, 整数型
    .参数 hDC, 整数型
    .参数 iPartId, 整数型
    .参数 iStateId, 整数型
    .参数 pDestRect, RECT
    .参数 uEdge, 整数型
    .参数 uFlags, 整数型
    .参数 pContentRect, 整数型

.DLL命令 API_DrawThemeText, 整数型, "uxtheme.dll", "DrawThemeText", , 　
    .参数 hTheme, 整数型
    .参数 hDC, 整数型
    .参数 iPartId, 整数型
    .参数 iStateId, 整数型
    .参数 pszText, 字节集
    .参数 iCharCount, 整数型
    .参数 dwTextFlags, 整数型
    .参数 dwTextFlags2, 整数型
    .参数 lpRect, RECT

.DLL命令 API_DrawThemeBackground, 整数型, "uxtheme.dll", "DrawThemeBackground", , 　
    .参数 hTheme, 整数型
    .参数 hDC, 整数型
    .参数 iPartId, 整数型
    .参数 iStateId, 整数型
    .参数 lpRect, RECT
    .参数 lpClipRect, 整数型

.DLL命令 API_CloseThemeData, 整数型, "uxtheme.dll", "CloseThemeData", , 　
.参数 hTheme, 整数型

.DLL命令 API_OpenThemeData, 整数型, "uxtheme.dll", "OpenThemeData", , 　
.参数 hWnd, 整数型
.参数 pszClassList, 字节集

.DLL命令 API_MultiByteToWideChar, 整数型, , "MultiByteToWideChar"
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cchMultiByte, 整数型
    .参数 lpWideCharStr, 字节集
    .参数 cchWideChar, 整数型

.DLL命令 API_ReleaseDC, 整数型, "user32", "ReleaseDC", , 释放由调用GetDC或GetWindowDC函数获取的指定设备场景。它对类或私有设备场景无效（但这样的调用不会造成损害）　执行成功为1，否则为0
.参数窗口句柄, 整数型, , 要释放的设备场景相关的窗口句柄
.参数设备场景, 整数型, , 要释放的设备场景句柄;

.DLL命令 API_InvalidateRect, 整数型, "user32", "InvalidateRect", , 这个函数屏蔽一个窗口客户区的全部或部分区域。这会导致窗口在事件期间部分重画　非零表示成功，零表示失败
    .参数窗口句柄, 整数型, , 待屏蔽窗口的句柄
    .参数屏蔽矩形, 整数型, , RECT，用于描述待屏蔽矩形部分的一个矩形结构。可用InvalidateRectBynum函数，同时将lpRect设为零（Long数据类型），从而屏蔽（或禁用）整个窗口
    .参数重画前删除, 整数型, , TRUE（非零）导致指定的区域在重画前先删除;

.DLL命令 API_GetClientRect, 整数型, "user32", "GetClientRect", , 返回指定窗口客户区矩形的大小　非零表示成功，零表示失败。会设置GetLastError
.参数窗口句柄, 整数型, , 欲计算大小的目标窗口
.参数矩形区域, RECT, , RECT，指定一个矩形，用客户区域的大小载入（以像素为单位）;

.DLL命令 API_TrackMouseEvent, 整数型, "user32.dll", "TrackMouseEvent", , 跟踪指定区域鼠标状态
.参数 lpEventTrack, TRACKMOUSEEVENT

.DLL命令 API_timeKillEvent, 整数型, "winmm.dll", "timeKillEvent", , 中止计时器事件　
.参数 uID, 整数型

.DLL命令 API_timeSetEvent, 整数型, "winmm.dll", "timeSetEvent", , 设置计时回调事件　
    .参数 uDelay, 整数型
    .参数 uResolution, 整数型
    .参数 lpFunction, 整数型
    .参数 dwUser, 整数型
    .参数 uFlags, 整数型

.DLL命令 API_GetAsyncKeyState, 整数型, "user32", "GetAsyncKeyState", , 判断函数调用时指定虚拟键的状态　自对GetAsyncKeyState函数的上一次调用以来，如键已被按过，则位0设为1；否则设为0。如键目前处于按下状态，则位15设为1；如抬起，则为0。微软的win32手册指出：倘若输入焦点从属于与调用函数的输入线程不同的另一个输入线程，则返回值为0（例如，一旦另一个程序拥有焦点，则它应返回零）。证据显示，函数实际是在整个系统的范围内工作的
.参数键代码, 整数型, , 欲测试的虚拟键的键码;

.DLL命令 API_CreateWaitableTimer, 整数型, , "CreateWaitableTimerA"
    .参数 lpTimerAttributes, 整数型
    .参数 bManualReset, 逻辑型
    .参数 lpTimerName, 整数型

.DLL命令 API_CancelWaitableTimer, 逻辑型, , "CancelWaitableTimer"
.参数 hTimer, 整数型

.DLL命令 API_MsgWaitForMultipleObjects, 整数型, , "MsgWaitForMultipleObjects"
    .参数 nCount, 整数型
    .参数 pHandles, 整数型, 传址
    .参数 fWaitAll, 逻辑型
    .参数 dwMilliseconds, 整数型
    .参数 dwWakeMask, 整数型

.DLL命令 API_SetWaitableTimer, 整数型, , "SetWaitableTimer"
    .参数 hTimer, 整数型
    .参数 pDueTime, LARGE_INTEGER
    .参数 lPeriod, 整数型
    .参数 pfnCompletionRoutine, 整数型
    .参数 lpArgToCompletionRoutine, 整数型
    .参数 fResume, 逻辑型

.DLL命令 API_InitializeCriticalSection, , "kernel32", "InitializeCriticalSection", , 创建许可证
.参数 lpCriticalSection, 多线程许可证, 传址

.DLL命令 API_DeleteCriticalSection, , "kernel32", "DeleteCriticalSection", , 删除许可证
.参数 lpCriticalSection, 多线程许可证, 传址

.DLL命令 API_EnterCriticalSection, , "kernel32", "EnterCriticalSection", , 进入许可区
.参数 lpCriticalSection, 多线程许可证, 传址

.DLL命令 API_LeaveCriticalSection, , "kernel32", "LeaveCriticalSection", , 退出许可区
.参数 lpCriticalSection, 多线程许可证, 传址

.DLL命令 API_CreateThread, 整数型, "kernel32", "CreateThread", , 启动线程
    .参数 lpThreadAttributes, 整数型
    .参数 dwStackSize, 整数型
    .参数 lpStartAddress, 子程序指针
    .参数 lpParameter, 整数型
    .参数 dwCreationFlags, 整数型
    .参数 lpThreadId, 整数型, 传址

.DLL命令 API_CloseHandle, 整数型, "kernel32", "CloseHandle"
.参数 hObject, 整数型

.DLL命令 API_WaitForSingleObject, 整数型, "kernel32", "WaitForSingleObject", , 监测一个对象
.参数 hHandle, 整数型
.参数 dwMilliseconds, 整数型

.DLL命令 API_SuspendThread, 整数型, "kernel32", "SuspendThread", , 挂起线索
.参数 hThread, 整数型

.DLL命令 API_TerminateThread, 整数型, "kernel32", "TerminateThread", , 中止线索
.参数 hThread, 整数型
.参数 dwExitCode, 整数型

.DLL命令 API_ResumeThread, 整数型, "kernel32", "ResumeThread", , 开始暂停的线索
.参数 hThread, 整数型

.DLL命令 API_GetExitCodeThread, 整数型, "kernel32", "GetExitCodeThread"
.参数 hThread, 整数型
.参数 lpExitCode, 整数型, 传址

.DLL命令 API_SetWindowsHookEx, 整数型, "user32.dll", "SetWindowsHookExA"
    .参数钩子类型, 整数型
    .参数回调函数地址, 子程序指针
    .参数实例句柄, 整数型
    .参数线程ID, 整数型

.DLL命令 API_UnhookWindowsHookEx, 整数型, "user32.dll", "UnhookWindowsHookEx"
.参数钩子句柄, 整数型

.DLL命令 API_CallNextHookEx, 整数型, "user32.dll", "CallNextHookEx"
    .参数钩子句柄, 整数型
    .参数代码值, 整数型
    .参数附加参数1, 整数型
    .参数假, 整数型, 传址

.DLL命令 API_GetModuleHandle, 整数型, "kernel32.dll", "GetModuleHandleA"
.参数模块名, 整数型

.DLL命令 API_RtlMoveMemory_MSLLHOOKSTRUCT, , , "RtlMoveMemory"
    .参数 Destination, MOUSEHOOKSTRUCT
    .参数 Source, 整数型
    .参数 cbCopy, 整数型

.DLL命令 API_GetCursorPos, 整数型, "user32", "GetCursorPos", , 获取鼠标指针的当前位置　非零表示成功，零表示失败。会设置GetLastError
.参数位置, POINTAPI, , POINTAPI，随同指针在屏幕像素坐标中的位置载入的一个结构;

.DLL命令 API_WindowFromPoint, 整数型, "user32", "WindowFromPoint", , 返回包含了指定点的窗口的句柄。忽略屏蔽、隐藏以及透明窗口　包含了指定点的窗口的句柄。如指定的点处没有窗口存在，则返回零
.参数 xPoint, 整数型, , x点值
.参数 yPoint, 整数型, , y点值;

.DLL命令 API_ClientToScreen, 整数型, "user32", "ClientToScreen", , 判断窗口内以客户区坐标表示的一个点的屏幕坐标　非零表示成功，零表示失败
.参数窗口句柄, 整数型, , 判断客户区坐标时那个窗口的句柄
.参数位置变量, POINTAPI, , POINTAPI，用hwnd窗口的客户区坐标表示的点，这个参数会包含屏幕坐标系统中相同的点;

.DLL命令 API_ScreenToClient, 整数型, "user32", "ScreenToClient", , 判断屏幕上一个指定点的客户区坐标　非零表示成功，零表示失败
.参数 hwnd, 整数型, , 一个窗口的句柄，该窗口定义了要使用的客户区坐标系统
.参数 lpPoint, POINTAPI, , POINTAPI，屏幕坐标系统中包含了屏幕点的结构。这个函数会随同相应的客户区坐标（由hwnd决定）载入结构;

.DLL命令 API_BitBlt, 整数型, "gdi32", "BitBlt", , 将一幅位图从一个设备场景复制到另一个。源和目标DC相互间必须兼容　非零表示成功，零表示失败。会设置GetLastError
    .参数目标设备场景, 整数型, , 目标设备场景
    .参数目标横坐标, 整数型, , 对目标DC中目标矩形左上角位置进行描述的那个点。用目标DC的逻辑坐标表示
    .参数目标纵坐标, 整数型, , 同上
    .参数传输图像宽度, 整数型, , 欲传输图象的宽度和高度
    .参数传输图像高度, 整数型, , 同上
    .参数源设备场景, 整数型, , 源设备场景。如光栅运算未指定源，则应设为0
    .参数源横坐标, 整数型, , 对源DC中源矩形左上角位置进行描述的那个点。用源DC的逻辑坐标表示
    .参数源纵坐标, 整数型, , 同上
    .参数光栅运算方式, 整数型, , 传输过程要执行的光栅运算;

.DLL命令 API_CreateCompatibleBitmap, 整数型, "gdi32", "CreateCompatibleBitmap", , 创建一幅与设备有关位图，它与指定的设备场景兼容　执行成功返回位图句柄，零表示失败
    .参数设备场景句柄, 整数型, , 设备场景的句柄
    .参数宽度, 整数型, , 位图宽度，以像素为单位
    .参数高度, 整数型, , 位图高度，以像素为单位;

.DLL命令 API_CreateCompatibleDC, 整数型, "gdi32", "CreateCompatibleDC", , 创建一个与特定设备场景一致的内存设备场景　新设备场景句柄，若出错则为零
.参数设备场景句柄, 整数型, , 设备场景句柄。新的设备场景将与它一致。也可能为0以创建一个与屏幕一致的设备场景;

.DLL命令 API_DeleteDC, 整数型, "gdi32", "DeleteDC", , 删除专用设备场景或信息场景，释放所有相关窗口资源。不要将它用于GetDC函数取回的设备场景　执行成功则为非零，失败则为零
.参数设备场景句柄, 整数型, , 将要删除的设备场景在vb里使用不要将它用于由vb hdc属性获取的设备场景句柄;

.DLL命令 API_DeleteObject, 整数型, "gdi32", "DeleteObject", , 用这个函数删除GDI对象，比如画笔、刷子、字体、位图、区域以及调色板等等。对象使用的所有系统资源都会被释放　非零表示成功，零表示失败
.参数对象句柄, 整数型, , 一个GDI对象的句柄;

.DLL命令 API_SelectObject, 整数型, "gdi32", "SelectObject", , 每个设备场景都可能有选入其中的图形对象。其中包括位图、刷子、字体、画笔以及区域等等。一次选入设备场景的只能有一个对象。选定的对象会在设备场景的绘图操作中使用。例如，当前选定的画笔决定了在设备场景中描绘的线段颜色及样式　与以前选入设备场景的相同hObject类型的一个对象的句柄，零表示出错。如选定的对象是一个区域（Region），结果就是下列常数之一：SIMPLEREGION， ;    COMPLEXREGION 或 NULLREGION 对区域进行描述， GDI_ERROR 表示出错
    .参数设备场景句柄, 整数型, , 一个设备场景的句柄
    .参数对象句柄, 整数型, , 一个画笔、位图、刷子、字体或区域的句柄;

下载说明

本站目前主要提供易语言源码、模块、支持库等下载大部分源码均为ZIP打包,
注:本站源码主要来源于网络收集。如有侵犯您的利益，请联系我们，我们将及时删除！
部分源码可能含有危险代码，（如关机、格式化磁盘等），请看清代码在运行。
由此产生的一切后果本站均不负责。源码仅用于学习使用，如需运用到商业场景请咨询原作者。
使用本站源码开发的产品均与本站无任何关系，请大家遵守国家相关法律。