Filtro en dbgrid

[gianfranco_tont]

Código Delphi [-]
AdoQuerytipo.SQL.Text := 'Select co_tipo,des_tipo From tipo_aju '; // selecciono el nombre de la tabla usuarios
   AdoQuerytipo.Active := True; // activo el sql
   While not AdoQuerytipo.Eof do  // recorro la tabla hasta el final
   begin
     DBGrid1.Columns[1].PickList.add(AdoQuerytipo.Fields[0].Text); // INSERTO EN EL PICKLISI DEL DBGRID LOS DATOS
     AdoQuerytipo.Next; // sigo insertando hasta que encuentre el ultimo
   end;
    AdoQuerytipo.Active := False;  // cierro la consulta
    if ClientDataSet1.State in [dsEdit, dsInsert] then

Fijate en el select estoy cargando la informacion en el picklist 'Select co_tipo,des_tipo From tipo_aju' pero en el picklist solo puedo selecionar una forma de guardar ' DBGrid1.Columns[1].PickList.add(AdoQuerytipo.Fields[0]' aunque puedo escojer entre .Fields[0] y el .Fields[1], yo quiero que se vean ambos pero al selecionar la linea en el picklist solo me pase al grid o client data set el .Fields[0],