2024 年 11月 2 日随笔档案 - del88

2024年11月2日

CheckBox、ToggleSwitch 代码修改自动触发 onclick的问题，把onclick的逻辑写在onmouseup里解决问题

摘要：半夜2点失眠，继续写博客。。。。。例子如下： procedure TForm4.btn1Click(Sender: TObject); begin CheckBox1.Checked := True; ToggleSwitch1.State := tssOn; end; procedure TFo 阅读全文

posted @ 2024-11-02 02:45 del88 阅读(7) 评论(0) 推荐(0) 编辑