Agregar elementos a un DBcomboBox (runtime)

[vinicc]

;) 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.

[luisgutierrezb]

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

[Lepe]

Dicho de otra forma:

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