Agregar elementos a un DBcomboBox (runtime)
 

;) Hola, una mano por favor!

Tengo un DbcomboBox y quisiera:
1.- que aparezca el dato que escribo (en su casilla) aún cuando no coincida con ningún elemento de su tabla fuente (ListdataSource)

2.- que dicho dato pueda pasarlo como parámetro a un formulario donde añado los datos de la tabla (ListDatasource) del DBcombo

Gracias por sus respuestas.

1.- seria cuestion de que buscaras el elemento con la propiedad text¿?, si no existe, entonces lo creas, la propiedad items tambien es de utilidad
2.- con obtener el text¿? ya lo mandas a donde quieras

Dicho de otra forma:

Código Delphi [-]
procedure Tform1.Combo1KeyUp(var key:word....);
var q:Tquery;
begin

  if key = vk_return then // si pulsa intro chequeamos si existe
   if combo1.items.indexof(combo1.text)  = -1 then // no existe
   begin
      q := Tquery.Create(nil);
     try 
      q.DatabaseName := como se llame...
      q.Database := MiDatabase;
      q.sql.text := ' insert into mitabla (Ciudad) values ('+ quotedstr(combo1.text)+ ');';
      q.ExecSql; // elemento añadido a la tabla de ciudades
    finally
       freeandnil(q);
    end;
  end;

Saludos