Inno setup Inno设置：选中复选框后如何显示（隐藏/取消隐藏）密码

我在我的输入查询页面中添加了一个复选框，以便在选中时使用它向我显示未覆盖的密码。但我不知道怎么做

我已经创建了以下过程。但此过程不会更改add input上的true false值。此过程向我添加执行此操作的新文本框

你能帮帮我吗

程序SPCheckBoxChecked（发送方：ToObject）；
开始
如果已分配（SPCheckBox），则
开始
如果是SPCheckBox，则选中
CredentialsPage.Add（'密码：'，False）
如果未选中，则选中
CredentialsPage.Add（'Password:'，True）
结束；
结束；

使用属性：

[代码]
变量
InputQueryPage:TInputQueryWizardPage；
过程ShowPasswordCheckClick（发件人：ToObject）；
开始
InputQueryPage.Edits[0]。密码：=非TNewCheckBox（发件人）。已选中；
结束；
过程初始化Wizard（）；
变量
ShowPasswordCheck:TNewCheckBox；
开始
InputQueryPage:=CreateInputQueryPage(
wpWelcome，'密码提示'，''，请输入您的密码'，''；
InputQueryPage.Add（'Password:'，True）；
ShowPasswordCheck:=TNewCheckBox.Create（WizardForm）；
ShowPasswordCheck.Parent:=InputQueryPage.Surface；
ShowPasswordCheck。顶部：=
InputQueryPage.Edits[0]。顶部+InputQueryPage.Edits[0]。高度+刻度（8）；
ShowPasswordCheck.Height:=ScaleY（ShowPasswordCheck.Height）；
ShowPasswordCheck.Caption:='显示密码（&Show password'；
ShowPasswordCheck.OnClick:=@ShowPasswordCheckClick；
结束；

---

非常感谢@Martin Prikryl我感谢你的快速回答。