Colors 在Inno设置中,如何设置输入字段中文本的文本颜色?

Colors 在Inno设置中,如何设置输入字段中文本的文本颜色?,colors,inno-setup,Colors,Inno Setup,在Inno设置中,如果用户输入的文本是无效值,我希望以红色显示它。(由我在别处决定。)您将设置所选编辑的Font.Color属性。例如,要在文本更改时立即更改编辑字体颜色,可以为OnChange事件编写一个处理程序,在代码中可能是这样的: [代码] 变量 自定义编辑:TNewEdit; 程序CustomEditChange(发送方:ToObject); 开始 如果发送者是TEdit,那么 开始 {当用户输入更多时,字体颜色将更改为红色} {在编辑中少于3个字符,否则为默认颜色;规则为} {此声明

在Inno设置中,如果用户输入的文本是无效值,我希望以红色显示它。(由我在别处决定。)

您将设置所选编辑的
Font.Color
属性。例如,要在文本更改时立即更改编辑字体颜色,可以为
OnChange
事件编写一个处理程序,在代码中可能是这样的:

[代码]
变量
自定义编辑:TNewEdit;
程序CustomEditChange(发送方:ToObject);
开始
如果发送者是TEdit,那么
开始
{当用户输入更多时,字体颜色将更改为红色}
{在编辑中少于3个字符,否则为默认颜色;规则为}
{此声明由您负责}
如果长度(TEdit(发送方).Text)>3,则
TEdit(发送方)。Font.Color:=clRed
其他的
TEdit(发送方)。Font.Color:=clWindowText;
结束;
结束;
程序初始化;
变量
自定义页面:TWizardPage;
开始
CustomPage:=CreateCustomPage(wpWelcome,'Caption','Description');
CustomEdit:=TNewEdit.Create(CustomPage);
CustomEdit.Parent:=CustomPage.Surface;
CustomEdit.OnChange:=@CustomEditChange;
结束;

如果要在用户退出编辑框时验证输入,可以为
OnExit
事件编写类似的处理程序。

该输入字段是什么?这是编辑框、输入查询页面中的项还是?