vault backup: 2025-02-25 10:46:10
This commit is contained in:
@ -151,9 +151,9 @@
|
||||
- **初始值文本**:编辑框控件设置输入文本类型初始值,“使用初始值”启用且“初始值类 型”为“用户输入”时属性设置才有效
|
||||
- **字体颜色**:设置字体大小及样式颜色
|
||||
- **脚本**:编写脚本内容
|
||||
- **按钮单击执行**:设置 [窗体表单脚本](200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在单击按钮时执行
|
||||
- **值改变时执行**:设置 [窗体表单脚本](200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在属性值改变时执行
|
||||
- **单击执行**:设置 [窗体表单脚本](200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在单击控件时执行
|
||||
- **双击执行**:设置 [窗体表单脚本](200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在双击控件时执行
|
||||
- **获得焦点执行**:设置 [窗体表单脚本](200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在控件获取焦点时执行
|
||||
- **失去焦点执行**:设置 [窗体表单脚本](200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在控件失去焦点时执行
|
||||
- **按钮单击执行**:设置 [窗体表单脚本](../4.other/200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在单击按钮时执行
|
||||
- **值改变时执行**:设置 [窗体表单脚本](../4.other/200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在属性值改变时执行
|
||||
- **单击执行**:设置 [窗体表单脚本](../4.other/200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在单击控件时执行
|
||||
- **双击执行**:设置 [窗体表单脚本](../4.other/200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在双击控件时执行
|
||||
- **获得焦点执行**:设置 [窗体表单脚本](../4.other/200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在控件获取焦点时执行
|
||||
- **失去焦点执行**:设置 [窗体表单脚本](../4.other/200.Delphi脚本.md) ,窗体表单实例或编辑对象常规属性时,脚本在控件失去焦点时执行
|
@ -1,6 +1,6 @@
|
||||
# 介绍
|
||||
|
||||
窗体表单能够根据用户需求 [自定义控件页面](170.自定义控件页面.md) ;绑定流程实现数据流转和自动签名; [绑定流程过程用户](180.窗体表单绑定流程过程用户.md) 控制属性操作权限; 为属性控件编辑事件 [脚本](200.Delphi脚本.md) 来实现个性化的操作
|
||||
窗体表单能够根据用户需求 [自定义控件页面](170.自定义控件页面.md) ;绑定流程实现数据流转和自动签名; [绑定流程过程用户](180.窗体表单绑定流程过程用户.md) 控制属性操作权限; 为属性控件编辑事件 [脚本](../4.other/200.Delphi脚本.md) 来实现个性化的操作
|
||||
|
||||
# 窗体表单模板制作
|
||||
|
||||
|
@ -1,87 +0,0 @@
|
||||
# 介绍
|
||||
|
||||
在窗体表单或对象常规属性中支持 `Delphi` 脚本来实现一些特性化操作
|
||||
|
||||
# 脚本编辑器
|
||||
|
||||
这是一个编辑、检查脚本的窗体
|
||||
|
||||
由主菜单、工具栏、 [控件区](#控件区) 、 [脚本编辑区](#脚本编辑区) 、 [函数/变量区](#函数/变量区) 、 [错误提示区](#错误提示区) 组成,界面如下图:
|
||||
|
||||

|
||||
|
||||
## 布局介绍
|
||||
|
||||
### 文件
|
||||
|
||||
保存或者关闭脚本编辑器
|
||||
|
||||
操作:检查语法正确性
|
||||
|
||||
查找/替换/查找下一个:TXT文本功能
|
||||
|
||||
设置:
|
||||
|
||||
1. 修改 Tab 键跳转列数:设置缩进列数
|
||||
2. 工具栏:显示脚本编辑器常用操作
|
||||
|
||||
### 控件区
|
||||
|
||||
显示源窗体中的编辑控件,双击控件节点时,在 [脚本编辑器](#脚本编辑器) 的当前光标位置增加控件名称,支持节点拖动
|
||||
|
||||
### 脚本编辑区
|
||||
|
||||
编辑脚本的地方。 编辑时支持模糊匹 **配控件区** 的控件名和 **函数/变量区** 的函数或变量名;
|
||||
|
||||
如果文本是控件名,输入 “ . ” 将提示控件支持的属性或方法
|
||||
|
||||
按 “ Tab ” 键支持选择文本的定长缩进
|
||||
|
||||
按 “ Shift + Tab ” 键支持选择文本的定长反缩进
|
||||
|
||||
支持文本搜索、搜索替换功能
|
||||
|
||||
使用的脚本为 `Delphi` 脚本,参考代码如下所示:
|
||||
|
||||
```Delphi
|
||||
uses MyClass,Variables,BaseUtil,CommonFunc,DataConst,CFFrm,CFSimplePropFrm,Forms,StdCtrls,Variants,SysUtils,Classes,Controls,Dialogs,
|
||||
CHostIntf,ProductClas,DocClas,LoginClas,VirtualTrees,CEntClas,PathClas;
|
||||
var
|
||||
StringList: TStringList;
|
||||
|
||||
begin
|
||||
// 创建和初始化TStringList
|
||||
StringList := TStringList.Create;
|
||||
try
|
||||
// 如果fedtusr_substrate_id的值不为空,则将值添加到StringList中
|
||||
if fedtusr_substrate_id.Text <> '' then
|
||||
StringList.Add(fedtusr_substrate_id.Text);
|
||||
if fedtusr_substrate_id2.Text <> '' then
|
||||
StringList.Add(fedtusr_substrate_id2.Text);
|
||||
if fedtusr_substrate_id3.Text <> '' then
|
||||
StringList.Add(fedtusr_substrate_id3.Text);
|
||||
if fedtusr_substrate_id4.Text <> '' then
|
||||
StringList.Add(fedtusr_substrate_id4.Text);
|
||||
|
||||
// 转换为逗号分隔的字符串
|
||||
mmmusr_substrate2.Text := StringList.DelimitedText; // 默认使用逗号作为分隔符
|
||||
|
||||
// 如果需要指定其他分隔符,可以设置Delimiter属性
|
||||
// StringList.Delimiter := ';'; // 设置分隔符为分号
|
||||
// Result := StringList.DelimitedText;
|
||||
finally
|
||||
StringList.Free;
|
||||
end;
|
||||
end.
|
||||
|
||||
```
|
||||
|
||||
### 函数/变量区
|
||||
|
||||
显示系统支持的变量和函数,双击节点时,在 **脚本编辑区** 的当前光标位置增加变量或函数名称,鼠标移到树节点时,提示信息窗显示变量类型或函数原型,支持节点拖动
|
||||
|
||||

|
||||
|
||||
### 错误提示区
|
||||
|
||||
执行 **保存** 或 **检查语法正确性** 命令时,如果脚本存在错误,则错误信息被显示在 **错误提示区**,双击错信息行时,在 **脚本编辑区** 中对于的错误行用红色背景标记
|
Binary file not shown.
Before Width: | Height: | Size: 371 KiB |
Binary file not shown.
Before Width: | Height: | Size: 306 KiB |
Reference in New Issue
Block a user