请教delphi combobox

请教 怎么让
ComboBox1.Items.Add(ADOQuery1.FieldValues['Name']);  //数据如  xxx_yyy
ComboBox2显示yyy 当选择了ComboBox2的yyy  查询数据的条件变为xxx_yyy

补充：ComboBox1.Items.Add(ADOQuery1.FieldValues['Name']);  可以显示数据 xxx_aaa 和xxx_bbb   我想让ComboBox2显示aaa 和bbb    或者查询到的数据直接在ComboBox1显示aaa和bbb

追问：begin
       for i:=0 to ADOQuery1.RecordCount-1 do
       begin
       ComboBox1.Items.Add(ADOQuery1.FieldValues['Name']);
       ADOQuery1.Next;
       end;
       for J:= 0 to Combobox1.items.count-1 do
       begin
       str:=copy(Combobox1.Items[J],Pos('_', Combobox1.items[J]),3);
       end;
    end;
运行 错误 未指定的错误ComboBox2显示截取ComboBox1数据的某部分

答案：这个字符串截取就可以了
for I := 0 to Combobox1.items.count-1 do
   str := copy(Combobox1.Items[I], Pos('_', Combobox1.items[I]), 3);//3表示yyy的长度
把str加到combobox2中，就可以了。
当在combobox2中选择了yyy，做一个字符串连接就好了

其他：为什么要搞两个ComboBox呢？ComboBox1和ComboBox2有什么关系？ ComboBox1.Items.Add(ADOQuery1.FieldValues['Name']);  这个还是改成ComboBox1.Items.Add(ADOQuery1.FieldValues['Name'].asstring);
不过你的需求没看懂，按照你的意思第二个combobox其实没啥作用啊。 

上一个：求Delphi+SQLServer数据库应用系统开发与案例，完整版，带源码，谢谢！！
下一个：delphi7序列号