Indicar Item "default" Combobox

[JcTaztoman]

Hola Buenos dias, espero que alguno de uds me pueda ayudar con la consulta que tengo, he buscado pero no encuentro nada parecido.

bueno mi cuestion es esta:

Tengo un Nextgrid con varios campos, uno de ellos es un NextCombobox,
lleno los datos del Nextcombobox a travez de una consulta sql a postgres. todo se hace bien, ahora lo que necesito es como indicar el valor que tiene ese elemento desde la consulta de la BD.

el codigo es este:

Código Delphi [-]
procedure TForm1.CBLocalidadChange(Sender: TObject);
var topico:string;
begin topico:=CBLocalidad.Text; edit1.Text:=topico; with zquery1 do begin   if active then Close;
    sql.Clear;
    sql.Add('Select substr(p.serie,8,6),p.activa,p.serie,p.nombre,r.localidad,r.nombre_ruta from posiciones p, rutas r');
    sql.Add('where r.localidad='+QuotedStr(CBLocalidad.text));
    sql.add('and p.id_ruta=r.id and p.activa =1');
    sql.add('group by localidad,nombre_ruta,nombre,serie,activa');
    open;
    ngrutas.ClearRows;
    while not eof do       begin          NGRutas.InsertRow(recno-1);          NGRutas.cells[0,recno-1]:=zquery1.FieldValues['substr'];
         NGRutas.cells[1,recno-1]:=zquery1.FieldValues['nombre_ruta'];
         NGRutas.cells[2,recno-1]:=zquery1.FieldValues['nombre'];
         NGRutas.cells[3,recno-1]:=zquery1.FieldValues['activa'];
         Ncbruta.Items.Add(zquery1.FieldValues['nombre_ruta']);
         next;
      end;
      if active then Close;
        sql.Clear;
        SQL.Add('Select r.nombre_ruta from rutas r,posiciones p ');
        sql.add('where r.localidad='+QuotedStr(CBLocalidad.text));
        sql.Add('and p.activa =1 and p.id_ruta=r.id group by nombre_ruta');
        Open;
       NCBRuta.Items.Clear;
            If Not IsEmpty Then             Begin               While Not Eof Do begin               NCBRuta.Items.Add(zquery1.FieldValues['nombre_ruta']);
              Next;
             End;
          close;
          sql.clear;

         End;
end;
end;

espero alguien pueda ayudarme

[JcTaztoman]

ya checando mi post ni yo entendi lo que necesito, bueno lo que quiero es
llenar el NCBRuta que es un NxCombobox, pero asu vez que indique que valor es el que tiene actualmente ese renglon en la base de datos, para el momento de seleccionar otro, meter el evento y que me lo actualize en la BD.

espero si puedan ayudarme