FreeBasic转NiceBasicV101

系统结构:FB2NB,子程序1,创建,取文本,替换,搜索全部,取匹配数量,取匹配文本,取子匹配文本,API_透明窗口,API_设置窗口信息,API_发送消息,

======窗口程序集1

           |  |

           |  |------ __启动窗口_创建完毕

           |  |

           |  |------ __启动窗口_尺寸被改变

           |  |

           |  |------ _编辑框1_内容被改变

           |  |

           |  |------ FB2NB

           |  |

           |  |------ _编辑框1_获得焦点

           |  |

           |  |------ _编辑框2_获得焦点

           |  |

           |  |------ 子程序1

           |  |

           |  |

======彗星正则表达式类

           |  |

           |  |------ _初始化

           |  |

           |  |------ _销毁

           |  |

           |  |------ 创建

           |  |

           |  |------ 取文本

           |  |

           |  |------ 替换

           |  |

           |  |------ 搜索全部

           |  |

           |  |------ 取匹配数量

           |  |

           |  |------ 取匹配文本

           |  |

           |  |------ 取子匹配文本

           |  |

           |  |

======调用的Dll

           |  |

           |  |---[dll]------   API_透明窗口

           |  |

           |  |---[dll]------   API_设置窗口信息

           |  |

           |  |---[dll]------   API_发送消息

调用的DLL命令:

.DLL命令 API_透明窗口, 逻辑型, , "SetLayeredWindowAttributes", , 成功返回真，否则返回假

    .参数 hwnd, 整数型, , 透明窗体的句柄

    .参数 crKey, 整数型, , 颜色值

    .参数 bAlpha, 字节型, , 透明度，取值范围是[0,255]

    .参数 dwFlags, 整数型, , 透明方式：LWA_ALPHA(2)时，crKey参数无效，bAlpha参数有效 || LWA_COLORKEY(1)时，bAlpha参数有效而窗体中的所有颜色为crKey的地方将变为透明

.DLL命令 API_设置窗口信息, 整数型, , "SetWindowLongA", , 在窗口结构中为指定的窗口设置信息  指定数据的前一个值

    .参数 hwnd, 整数型

    .参数 nIndex, 整数型

    .参数 dwNewLong, 整数型

.DLL命令 API_发送消息, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum， ;    SendMessageByString是该函数的“类型security”声明形式  由具体的消息决定

    .参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄

    .参数 信息值, 整数型, , 消息的标识符

    .参数 参数一, 整数型, , 具体取决于消息

    .参数 参数二, 文本型, , 具体取决于消息;