易语言FBEdit代码框组件应用源码

系统结构:A2W,W2A,CheckDlgButton,

======程序集_EC
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _取文本指针
           |  |
           |  |------ _取字节集指针
           |  |
           |  |------ _指针到整数
           |  |
           |  |------ A2W
           |  |
           |  |------ W2A
           |  |
           |  |
======窗口_RAEdit
           |  |
           |  |------ __RAEdit_创建完毕
           |  |
           |  |------ __RAEdit_将被销毁
           |  |
           |  |------ _Init_SubClass
           |  |
           |  |------ _Free_SubClass
           |  |
           |  |------ _RAEdit_SubClass_WndCallBack
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======类_RAEdit
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ _创建控件
           |  |
           |  |------ _控件初始化
           |  |
           |  |------ _设置默认颜色
           |  |
           |  |------ _默认关键字高亮
           |  |
           |  |------ _设置关键字_By_Ini参数
           |  |
           |  |------ _设置关键字词组
           |  |
           |  |------ _设置关键字
           |  |
           |  |------ _sByteToByte
           |  |
           |  |------ _Invoke_SubClass_WndCallBack
           |  |
           |  |------ _撤销
           |  |
           |  |------ _复制
           |  |
           |  |------ _剪贴
           |  |
           |  |------ _粘贴
           |  |
           |  |------ _删除
           |  |
           |  |------ _全选
           |  |
           |  |------ _取行数
           |  |
           |  |------ _取某行文本
           |  |
           |  |------ _置文本
           |  |
           |  |------ _取全部文本
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   _LoadLibrary
           |  |
           |  |---[dll]------   _FreeLibrary
           |  |
           |  |---[dll]------   _CreateDialogParam
           |  |
           |  |---[dll]------   _CreateWindowEx
           |  |
           |  |---[dll]------   _GetModuleHandle
           |  |
           |  |---[dll]------   _ShowWindow
           |  |
           |  |---[dll]------   _SetWindowPos
           |  |
           |  |---[dll]------   _SendMessage
           |  |
           |  |---[dll]------   _SendMessageByInt
           |  |
           |  |---[dll]------   _SendMessageByRECT
           |  |
           |  |---[dll]------   _SendMessageByStr
           |  |
           |  |---[dll]------   _SendMessageByRACOLOR
           |  |
           |  |---[dll]------   _SendMessageByRAFONT
           |  |
           |  |---[dll]------   CheckDlgButton
           |  |
           |  |---[dll]------   _GetWindowText
           |  |
           |  |---[dll]------   _SetWindowText
           |  |
           |  |---[dll]------   _CreateFontIndirect
           |  |
           |  |---[dll]------   _DeleteObject
           |  |
           |  |---[dll]------   _GetCharTabPtr
           |  |
           |  |---[dll]------   _GetCHarTabVal
           |  |
           |  |---[dll]------   _SetCharTabVal
           |  |
           |  |---[dll]------   _SetBlockDef
           |  |
           |  |---[dll]------   _SetHiliteWords
           |  |
           |  |---[dll]------   _MultiByteToWideChar
           |  |
           |  |---[dll]------   _WideCharToMultiByte
           |  |
           |  |---[dll]------   _CallWindowProc
           |  |
           |  |---[dll]------   _SetWindowLong
           |  |
           |  |---[dll]------   _GetWindowLong
           |  |
           |  |---[dll]------   _SetParent
           |  |
           |  |---[dll]------   _GetWindowRect

  

调用的DLL命令:

.DLL命令 _LoadLibrary, 整数型, "KERNEL32.DLL", "LoadLibraryA"
    .参数 lpLibFileName, 文本型

.DLL命令 _FreeLibrary, 整数型, "KERNEL32.DLL", "FreeLibrary"
    .参数 hLibModule, 整数型

.DLL命令 _CreateDialogParam, 整数型, "USER32.DLL", "CreateDialogParamA"
    .参数 hInstance, 整数型
    .参数 lpName, 文本型
    .参数 hWndParent, 整数型
    .参数 lpDialogFunc, 整数型
    .参数 lParamInit, 整数型

.DLL命令 _CreateWindowEx, 整数型, "USER32.DLL", "CreateWindowExA"
    .参数 dwExStyle, 整数型
    .参数 lpClassName, 文本型
    .参数 lpWindowName, 整数型
    .参数 dwStyle, 整数型
    .参数 X, 整数型
    .参数 Y, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型
    .参数 hWndParent, 整数型
    .参数 hMenu, 整数型
    .参数 hInstance, 整数型
    .参数 lpParam, 整数型

.DLL命令 _GetModuleHandle, 整数型, "KERNEL32.DLL", "GetModuleHandleA"
    .参数 lpModuleName, 整数型

.DLL命令 _ShowWindow, 整数型, "USER32.DLL", "ShowWindow"
    .参数 hWnd, 整数型
    .参数 nCmdShow, 整数型

.DLL命令 _SetWindowPos, 整数型, "USER32.DLL", "SetWindowPos"
    .参数 hWnd, 整数型
    .参数 hWndInsertAfter, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 cx, 整数型
    .参数 cy, 整数型
    .参数 wFlags, 整数型

.DLL命令 _SendMessage, 整数型, "USER32.DLL", "SendMessageA"
    .参数 hWnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型, 传址

.DLL命令 _SendMessageByInt, 整数型, "USER32.DLL", "SendMessageA"
    .参数 hWnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 _SendMessageByRECT, 整数型, "USER32.DLL", "SendMessageA"
    .参数 hWnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, RECT

.DLL命令 _SendMessageByStr, 整数型, "USER32.DLL", "SendMessageA"
    .参数 hWnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 文本型

.DLL命令 _SendMessageByRACOLOR, 整数型, "USER32.DLL", "SendMessageA"
    .参数 hWnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, RACOLOR

.DLL命令 _SendMessageByRAFONT, 整数型, "USER32.DLL", "SendMessageA"
    .参数 hWnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, RAFONT, 传址

.DLL命令 CheckDlgButton, 整数型, "USER32.DLL", "CheckDlgButton"
    .参数 hWnd, 整数型
    .参数 nIDButton, 整数型
    .参数 uCheck, 整数型

.DLL命令 _GetWindowText, 整数型, "USER32.DLL", "GetWindowTextA"
    .参数 hWnd, 整数型
    .参数 lpString, 文本型, 传址
    .参数 cch, 整数型

.DLL命令 _SetWindowText, 整数型, "USER32.DLL", "SetWindowTextA"
    .参数 hWnd, 整数型
    .参数 lpString, 文本型

.DLL命令 _CreateFontIndirect, 整数型, "GDI32.DLL", "CreateFontIndirectA"
    .参数 lpLogFont, LOGFONT

.DLL命令 _DeleteObject, 整数型, "GDI32.DLL", "DeleteObject"
    .参数 hObject, 整数型

.DLL命令 _GetCharTabPtr, 整数型, "FBEDIT.DLL", "GetCharTabPtr"

.DLL命令 _GetCHarTabVal, 整数型, "FBEDIT.DLL", "GetCHarTabVal"
    .参数 nChar, 整数型

.DLL命令 _SetCharTabVal, 整数型, "FBEDIT.DLL", "SetCharTabVal"
    .参数 nChar, 整数型
    .参数 nValue, 整数型

.DLL命令 _SetBlockDef, 整数型, "FBEDIT.DLL", "SetBlockDef"
    .参数 lpRABLOCKDEF, 整数型

.DLL命令 _SetHiliteWords, 整数型, "FBEDIT.DLL", "SetHiliteWords"
    .参数 nColor, 整数型
    .参数 lpWords, 文本型

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

.DLL命令 _WideCharToMultiByte, 整数型, "kernel32.dll", "WideCharToMultiByte", , 将通配符映像为多字节
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpWideCharStr, 字节集
    .参数 cchWideChar, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cchMultiByte, 整数型
    .参数 lpDefaultChar, 文本型
    .参数 lpUsedDefaultChar, 整数型

.DLL命令 _CallWindowProc, 整数型, "USER32.DLL", "CallWindowProcA", , 将消息传答窗口函数
    .参数 lpPrevWndFunc, 整数型
    .参数 hWnd, 整数型
    .参数 msg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 _SetWindowLong, 整数型, "USER32.DLL", "SetWindowLongA"
    .参数 hWnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong, 整数型

.DLL命令 _GetWindowLong, 整数型, "USER32.DLL", "GetWindowLongA"
    .参数 hWnd, 整数型
    .参数 nIndex, 整数型

.DLL命令 _SetParent, 整数型, "USER32.DLL", "SetParent"
    .参数 hWndChild, 整数型
    .参数 hWndNewParent, 整数型

.DLL命令 _GetWindowRect, 整数型, "USER32.DLL", "GetWindowRect"
    .参数 hWnd, 整数型
    .参数 lpRect, RECT