菜鸟问题 VCL组件开发及应用http://www.delphi2007.net/DelphiVCL/html/delphi_20061226125822109.html
edit控件取值我可能用edit.text来取,请问checkbox控件取值用代码怎么写
checkbox.checked
= false or true
checkbox.checked
checkbox.caption
checkbox.tag
......
要什么取什么
我知道你的意思,可是我在inset语句中这样写不能运行,语句如下;
adoquery1.SQL.Add('insert int cg (me01,me02)values('''+checkbox1.checked+''','''+checkbox2.checked+''')');
checkbox1.checked是一个Boolean值,不是字符串,调试都通不过。
要转换成字符串,用function BoolToStr(B: Boolean; UseBoolStrs: Boolean): string;
adoquery1.SQL.Add('insert int cg (me01,me02)values('''+ BoolToStr(checkbox1.checked, True) +''','''+ BoolToStr(checkbox2.checked, True) +''')');
还是不行
什么不行,编译错误?还是存的结果有问题?你要保存的字段数据类型是什么?
[Error] Unit1.pas(148): Illegal character in input file: '(' ($A3A8)
是这个提示
我要保存的是字符型
adoquery1.FieldByName('me16').asstring:=BoolToStr(checkbox1.checked ,trun);
我这样写也不行
'('括号不对啊,智能全拼的,应该‘(’
晕死,不是中午字符的说。
中文
先看书,再调试,实在不行再发问!
adoquery1.SQL.Add('insert int cg (me01,me02)values(:me01,:me02)');
adoquery1.Parameters.ParamByName('me01').value:= checkbox1.checked;
adoquery1.Parameters.ParamByName('me02').value:= checkbox2.checked;
不过建议使用DBCheckBox,少写N行代码