易语言小樱桃浏览器源码

小樱桃浏览器易语言源码系统结构:异常通通知,启动预处理,子程序_进程通信接口,载入用户配置,浏览器初始化,设置窗体边框预留,载入皮肤数据,设置窗口边框,调整界面尺寸,调整标题栏按钮,置浏览器窗口大小,取标签头高度,调整子夹按钮位置,置新建标签按钮位置,取子夹文本,地址浏览框是否为空,跳转处理,切换标签,设置前进后退按钮状态,设置刷新停止按钮状态,是否返回,地址是否有效,窗体普通和最大化切换,设置指针,调整大小,关闭标签,置子夹按钮位置,浏览网址,新建浏览窗口,置浏览器焦点,刷新浏览器索引标记,安全销毁浏览器,调整标签栏宽度,设置透明度,显示窗口,隐藏窗口,设置状态文本窗口位置,设置窗体圆角,填充空格,取默认浏览器文本,写配置,读配置,刷新配置,系统_设置为默认浏览器,GetWindowLongA,SetWindowLongA,SendMessageA,API_SendMessage,API_SetCursor,API_LoadCursor,SetWindowRgn,SetWindowLong,CallWindowProc2,RegisterWindowMessage,OpenProcess,ReadProcessMemory,CloseHandle,SendMessage,GetCurrentProcessId,IsWindow,FindWindow,lstrcpyn,CallWindowProc,WriteProcessMemory,取菜单条句柄,取子菜单句柄,置窗口特征,建立弹出菜单,添加菜单图标,添加菜单项,执行窗口程序,整理收藏夹,添加到收藏夹,取收藏夹PID,清除PID,DeleteObject, ======主窗口程序集 || ||------__启动窗口_创建完毕 || ||------异常通通知 || ||------启动预处理 || ||------子程序_进程通信接口 || ||------载入用户配置 || ||------浏览器初始化 || ||------设置窗体边框预留 || ||------载入皮肤数据 || ||------设置窗口边框 || ||------调整界面尺寸 || ||------调整标题栏按钮 || ||------置浏览器窗口大小 || ||------取标签头高度 || ||------__启动窗口_尺寸被改变 || ||------调整子夹按钮位置 || ||------置新建标签按钮位置 || ||------_时钟1_周期事件 || ||------_互联网浏览器1_载入进度改变 || ||------_互联网浏览器1_状态文本被改变 || ||------_互联网浏览器1_标题被改变 || ||------_地址编辑框_获得焦点 || ||------取子夹文本 || ||------_地址编辑框_失去焦点 || ||------_地址编辑框_字符输入 || ||------地址浏览框是否为空 || ||------_图形按钮_转到_被单击 || ||------跳转处理 || ||------_互联网浏览器1_载入完毕 || ||------_互联网浏览器1_载入开始 || ||------_高级选择夹_网页_子夹被改变 || ||------切换标签 || ||------设置前进后退按钮状态 || ||------_地址编辑框_按下某键 || ||------设置刷新停止按钮状态 || ||------_图形按钮_刷新_被单击 || ||------_图形按钮_停止载入_被单击 || ||------_互联网浏览器1_命令状态被改变 || ||------是否返回 || ||------_图形按钮_后退_被单击 || ||------_图形按钮_前进_被单击 || ||------_图形按钮_主页_被单击 || ||------_互联网浏览器1_即将打开新窗口 || ||------_互联网浏览器1_跳转完毕 || ||------地址是否有效 || ||------_互联网浏览器1_即将跳转 || ||------__启动窗口_位置被改变 || ||------_标题标签_被双击 || ||------窗体普通和最大化切换 || ||------设置指针 || ||------调整大小 || ||------_画板_边框_鼠标左键被按下 || ||------_画板_边框_鼠标位置被移动 || ||------_图形按钮_退出程序_被单击 || ||------_图形按钮_最大化_被单击 || ||------_图形按钮_还原_被单击 || ||------_图形按钮_最小化_被单击 || ||------_图形按钮_关闭标签_被单击 || ||------关闭标签 || ||------_图形按钮_配置_被单击 || ||------_高级选择夹_网页_子夹头被右击 || ||------置子夹按钮位置 || ||------__启动窗口_首次激活 || ||------_关闭标签按钮_被单击 || ||------_图形按钮_新建标签_被单击 || || ======浏览基础功能集 || ||------浏览网址 || ||------新建浏览窗口 || ||------置浏览器焦点 || ||------刷新浏览器索引标记 || ||------安全销毁浏览器 || ||------调整标签栏宽度 || || ======状态文本控制 || ||------_窗口_状态文本_创建完毕 || ||------设置透明度 || ||------显示窗口 || ||------隐藏窗口 || ||------_时钟_渐隐显示_周期事件 || ||------设置状态文本窗口位置 || || ======杂项程序集 || ||------设置窗体圆角 || ||------填充空格 || || ======配置程序集 || ||------_窗口_配置_创建完毕 || ||------取默认浏览器文本 || ||------_按钮1_被单击 || ||------_组合框1_列表项被选择 || ||------写配置 || ||------读配置 || ||------刷新配置 || ||------_按钮2_被单击 || || ======进程通讯 || ||------系统_设置为默认浏览器 || || ======调用的Dll || ||---[dll]------GetWindowLongA || ||---[dll]------SetWindowLongA || ||---[dll]------SendMessageA || ||---[dll]------API_SendMessage || ||---[dll]------API_SetCursor || ||---[dll]------API_LoadCursor || ||---[dll]------SetWindowRgn || ||---[dll]------_创建圆角矩形区域 || ||---[dll]------SetWindowLong || ||---[dll]------_查找窗口 || ||---[dll]------CallWindowProc2 || ||---[dll]------RegisterWindowMessage || ||---[dll]------OpenProcess || ||---[dll]------ReadProcessMemory || ||---[dll]------CloseHandle || ||---[dll]------SendMessage || ||---[dll]------GetCurrentProcessId || ||---[dll]------IsWindow || ||---[dll]------FindWindow || ||---[dll]------lstrcpyn || ||---[dll]------CallWindowProc || ||---[dll]------WriteProcessMemory || ||---[dll]------_创建事件同步对象 || ||---[dll]------_打开事件同步对象 || ||---[dll]------取菜单条句柄 || ||---[dll]------取子菜单句柄 || ||---[dll]------置窗口特征 || ||---[dll]------建立弹出菜单 || ||---[dll]------添加菜单图标 || ||---[dll]------添加菜单项 || ||---[dll]------执行窗口程序 || ||---[dll]------整理收藏夹 || ||---[dll]------添加到收藏夹 || ||---[dll]------取收藏夹PID || ||---[dll]------清除PID || ||---[dll]------DeleteObject 调用的DLL命令: .DLL命令GetWindowLongA,整数型,"user32","GetWindowLongA",,从指定窗口的结构中取得信息由nIndex决定。零表示出错。会设置GetLastError .参数窗口句柄,整数型,,欲为其获取信息的窗口的句柄 .参数属性,整数型,,欲取回的信息，可以是下述任何一个常数：;GWL_EXSTYLE：扩展窗口样式;GWL_STYLE：窗口样式;GWL_WNDPROC：该窗口的窗口函数的地址;GWL_HINSTANCE：拥有窗口的实例的句柄;GWL_HWNDPARENT：该窗口之父的句柄。不要用SetWindowWord来改变这个值;GWL_ID：对话框中一个子窗口的标识符;GWL_USERDATA：含义由应用程序规定;DWL_DLGPROC：这个窗口的对话框函数地址;DWL_MSGRESULT：在对话框函数中处理的一条消息返回的值;DWL_USER：含义由应用程序规定; .DLL命令SetWindowLongA,整数型,"user32","SetWindowLongA",,在窗口结构中为指定的窗口设置信息指定数据的前一个值 .参数窗口句柄,整数型,,hwnd，欲为其取得信息的窗口的句柄 .参数窗口信息值,整数型,,nIndex，请参考GetWindowLong函数的nIndex参数的说明 .参数窗口信息新值,整数型,,dwNewLong，由nIndex指定的窗口信息的新值 .DLL命令SendMessageA,整数型,"user32","SendMessageA",,调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum，;SendMessageByString是该函数的“类型安全”声明形式由具体的消息决定 .参数窗口句柄,整数型,,要接收消息的那个窗口的句柄 .参数信息值,整数型,,消息的标识符 .参数参数一,整数型,,具体取决于消息 .参数参数二,整数型,,具体取决于消息; .DLL命令API_SendMessage,整数型,"user32","SendMessageA",,调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum，;SendMessageByString是该函数的“类型安全”声明形式　由具体的消息决定 .参数窗口句柄,整数型,,要接收消息的那个窗口的句柄 .参数信息值,整数型,,消息的标识符 .参数参数一,整数型,,具体取决于消息 .参数参数二,整数型,,具体取决于消息; .DLL命令API_SetCursor,整数型,"user32","SetCursor",,将指定的鼠标指针设为当前指针　前一个指针的值 .参数指针句柄,整数型,,要设为当前指针的一个指针的句柄。如设为零，表示不显示任何指针; .DLL命令API_LoadCursor,整数型,"user32","LoadCursorA",,从指定的模块或应用程序实例中载入一个鼠标指针。LoadCursorBynum是LoadCursor函数的类型安全声明　执行成功则返回已载入的指针的句柄；零表示失败。在Windows;95和Win16环境中，这个函数只能载入标准尺寸的图标 .参数实例句柄,整数型,,一个DLL的模块句柄；或者一个实例句柄，指定包含了鼠标指针的可执行程序 .参数鼠标指针标识,整数型,,作为一个字串，指定欲载入的指针资源。作为一个长整数值，指定欲载入的资源ID；或者设置一个常数，代表某幅固有系统指针。如装载的是一个固有系统指针，注意hInstance参数应设为零。在api32.txt文件中以前缀IDC_作为标志; .DLL命令SetWindowRgn,整数型,"user32.dll","SetWindowRgn",,设置窗口区域 .参数hWnd,整数型 .参数hRgn,整数型 .参数bRedraw,逻辑型 .DLL命令_创建圆角矩形区域,整数型,"gdi32.dll","CreateRoundRectRgn" .参数左上横坐标,整数型,,X1，矩形左上角横坐标 .参数左上纵坐标,整数型,,Y1，矩形左上角纵坐标 .参数右下横坐标,整数型,,X2，矩形右下角横坐标 .参数右下纵坐标,整数型,,Y2，矩形右下角纵坐标 .参数圆角椭圆的宽,整数型,,X3，圆角椭圆的宽，其范围从0（没有圆角）到矩形宽（全圆） .参数圆角椭圆的高,整数型,,Y3，圆角椭圆的高，其范围从0（没有圆角）到矩形高（全圆） .DLL命令SetWindowLong,整数型,,"SetWindowLongA" .参数hwnd,整数型 .参数nIndex,整数型 .参数dwNewLong,整数型 .DLL命令_查找窗口,整数型,,"FindWindowExA" .参数父窗口句柄,整数型 .参数子窗口句柄,整数型 .参数窗口类名,文本型 .参数窗口标题,文本型 .DLL命令CallWindowProc2,整数型,"user32","CallWindowProcA" .参数lpPrevWndFunc,整数型 .参数hwnd,整数型 .参数msg,整数型 .参数wParam,整数型 .参数lParam,整数型 .DLL命令RegisterWindowMessage,整数型,,"RegisterWindowMessageA" .参数lpString,文本型 .DLL命令OpenProcess,整数型,"kernel32","OpenProcess" .参数dwDesiredAccess,整数型 .参数bInheritHandle,整数型 .参数dwProcessId,整数型 .DLL命令ReadProcessMemory,整数型,"kernel32","ReadProcessMemory" .参数hProcess,整数型 .参数lpBaseAddress,整数型 .参数lpBuffer,字节集,传址 .参数nSize,整数型 .参数lpNumberOfBytesWritten,整数型 .DLL命令CloseHandle,整数型,"kernel32","CloseHandle" .参数hObject,整数型 .DLL命令SendMessage,整数型,"user32","SendMessageA" .参数hwnd,整数型 .参数wMsg,整数型 .参数wParam,整数型 .参数lParam,整数型 .DLL命令GetCurrentProcessId,整数型,"kernel32","GetCurrentProcessId" .DLL命令IsWindow,逻辑型,"user32","IsWindow" .参数句柄,整数型 .DLL命令FindWindow,整数型,"user32","FindWindowA" .参数lpClassName,文本型 .参数lpWindowName,文本型 .DLL命令lstrcpyn,整数型,"kernel32","lstrcpynA" .参数lpString1,字节集,传址 .参数lpString2,字节集,传址 .参数iMaxLength,整数型 .DLL命令CallWindowProc,整数型,"user32","CallWindowProcA" .参数lpPrevWndFunc,字节集 .参数子程序,子程序指针 .参数参数,整数型 .参数参数,整数型 .参数参数,整数型 .DLL命令WriteProcessMemory,整数型,"kernel32","WriteProcessMemory" .参数hProcess,整数型 .参数lpBaseAddress,整数型 .参数lpBuffer,字节集 .参数nSize,整数型 .参数lpNumberOfBytesWritten,整数型 .DLL命令_创建事件同步对象,,,"CreateEventA",,程序_禁示重复运行 .参数lpEventAttributes,整数型 .参数bManualReset,逻辑型 .参数bInitialState,逻辑型 .参数lpName,文本型 .DLL命令_打开事件同步对象,整数型,,"OpenEventA",,程序_禁示重复运行 .参数dwDesiredAccess,整数型 .参数bInheritHandle,逻辑型 .参数lpName,文本型 .DLL命令取菜单条句柄,整数型,,"GetMenu",,取指定窗口的菜单条句柄 .参数窗口句柄,整数型 .DLL命令取子菜单句柄,整数型,,"GetSubMenu" .参数菜单句柄,整数型 .参数位置,整数型 .DLL命令置窗口特征,子程序指针,,"SetWindowLongA" .参数窗口句柄,整数型 .参数要置的特征,整数型 .参数新特征,子程序指针,,仅易语言3.0支持 .DLL命令建立弹出菜单,整数型,,"CreatePopupMenu" .DLL命令添加菜单图标,逻辑型,,"SetMenuItemBitmaps" .参数菜单句柄,整数型 .参数位置,整数型 .参数标志,整数型 .参数未选图标句柄,整数型 .参数已选图标句柄 .DLL命令添加菜单项,逻辑型,,"InsertMenuA" .参数菜单句柄,整数型 .参数位置,整数型 .参数标志,整数型 .参数ID,整数型 .参数标题,文本型 .DLL命令执行窗口程序,整数型,,"CallWindowProcA" .参数程序指针,子程序指针 .参数窗口句柄,整数型 .参数消息,整数型 .参数参数1,整数型 .参数参数2,整数型 .DLL命令整理收藏夹,整数型,"shdocvw.dll","DoOrganizeFavDlg" .参数hwnd,整数型 .参数root,文本型 .DLL命令添加到收藏夹,整数型,"shdocvw.dll","DoAddToFavDlg" .参数hwnd,整数型 .参数网址,文本型 .参数缓存大小,整数型 .参数标题,文本型 .参数缓存,整数型 .参数pid,整数型 .DLL命令取收藏夹PID,整数型,"shell32.dll","SHGetSpecialFolderLocation" .参数hwnd,整数型 .参数type,整数型 .参数pid,整数型,传址 .DLL命令清除PID,整数型,"ole32.dll","CoTaskMemFree" .参数pid,整数型 .DLL命令DeleteObject,整数型,"gdi32.dll","DeleteObject",,卸载对象 .参数hObject,整数型