一个读取数据的问题

Question

'List index out of Bounds(1)的意思是参数只有1个就是params[0]，不存在第二个(也就是params[1])。
另外，你的：
query1.sql.add('select * from Post where name:=Combobox1.text') 
有问题，改为：
query1.sql.add('select * from Post where name=:Param1') 
然后使用query1.params[0].asstring或者query1.ParamByName['Param1'].asstring—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
    

Answer 1

query1.sql.add('select * from Post where name:=Combobox1.text') ;
query1.params[0].asstring:=Combobox1.text' ;
或者这两句也成一句
query1.sql.add('select * from Post where name:='''+Combobox1.text''''') ;或改成
query1.sql.add('select * from Post where name:=P1:') ;
query1.parambyname('p1').asstring:=Combobox1.text' ;

Answer 2

to:lxpbuaa(桂枝香在故国晚秋) and netlib(河外孤星) 
用query1.parambyname('p1').asstring:=Combobox1.text' 后
edit1.text:=query1.params[0].asstring 便可以了吗？