易语言高级输入框源码，支持附加选择框功能，用于快捷数据修改录入

易语言高级输入框源码，支持附加选择框功能，用于快捷数据修改录入

@657717948

.版本 2

.子程序 载入高级输入框, 逻辑型, 公开, 输入点击确定返回真，取消返回假，输入的结果和选择的结果赋值在：全局变量：高级输入框_输入的文本、高级输入框_选择的结果
.参数 父窗口, 窗口, 可空
.参数 标题, 文本型, 可空, 可空，默认：请输入文本内容
.参数 提示文本, 文本型, 可空, 可空，默认：无
.参数 默认文本, 文本型, 可空, 可空
.参数 提示文本颜色, 整数型, 可空, 可空，默认深灰色
.参数 输入方式, 整数型, 可空, 可空，默认文本通常方式，可参考编辑框输入方式类型值:0. 通常方式 1. 只读方式 2. 密码输入 3. 整数文本输入 4. 小数文本输入 5. 输入字节 6. 输入短整数 7. 输入整数 8. 输入长整数 9. 输入小数 10. 输入双精度小数 11. 输入日期时间
.参数 允许多行, 逻辑型, 可空, 可空，默认假
.参数 文本长度限制, 整数型, 可空, 可空，默认无限制
.参数 编辑框高度, 整数型, 可空, 可空，默认28
.参数 提示标签高度, 整数型, 可空, 可空，默认自动计算
.参数 是否有选择框, 逻辑型, 可空, 可空，默认无
.参数 选择框是否选中, 逻辑型, 可空, 可空，默认假
.参数 选择框标题, 文本型, 可空, 可空

_标题 ＝ 标题
_提示文本 ＝ 提示文本
_默认文本 ＝ 默认文本
.如果 (是否为空 (提示文本颜色) ＝ 真)
    _提示文本颜色 ＝ #深灰
.否则
    _提示文本颜色 ＝ 提示文本颜色
.如果结束
_输入方式 ＝ 输入方式
_文本长度限制 ＝ 文本长度限制
.如果 (是否为空 (编辑框高度))
    _编辑框高度 ＝ 28
.否则
    _编辑框高度 ＝ 编辑框高度
.如果结束
_是否有选择框 ＝ 是否有选择框
_选择框是否选中 ＝ 选择框是否选中
_选择框标题 ＝ 选择框标题
_允许多行 ＝ 允许多行
.如果 (是否为空 (提示标签高度))
    _提示标签高度 ＝ -1
.否则
    _提示标签高度 ＝ 提示标签高度
.如果结束

.如果 (是否为空 (父窗口))
    载入 (输入窗口, , 真)
.否则
    载入 (输入窗口, 父窗口, 真)
.如果结束
返回 (返回值)