SoloCodigo

Programación General => Delphi => Mensaje iniciado por: eliza0_n en Jueves 5 de Mayo de 2005, 19:44

Título: Como Guardar Los Datos De Un Dblookupcombobox
Publicado por: eliza0_n en Jueves 5 de Mayo de 2005, 19:44

Hola: :hola:

Tengo problemas para guardar los datos de un dblookupcombobox en una tabla de paradox, cuando de doy guardar, me guarda los datos de las edit,  y los datos de los dblookupcombobox me los deja en blanco en la tabla.

Ademas me gustaria que no me duplique registros, la búsqueda la estoy haciendo por  el campo ‘serie’. Este es el codigo que tengo:


procedure TForm2.BitBtn1Click(Sender: TObject);
begin
Form2.Table1.IndexFieldNames:='Serie';
If Form2.Table1.FindKey([Edit3.Text])=True then
ShowMessage('ESTE ARTICULO YA ESTA DADO DE ALTA');
Close;
else
table1.post;
table1.edit;
end;

edit3.text es la etiqueta donde se esta capturando el dato ‘serie’, y es en el renglón que esta en negritas donde me marca el error.

La búsqueda la estoy haciendo por el campo ‘serie’, pero me gustaria que tambien se pudiera hacer por el campo ‘inventario’, en la tabla, estos dos campos los puse con asterisco, y en el codigo quedo asi

procedure TForm3.BitBtn1Click(Sender: TObject);
begin
Form2.Table1.IndexFieldNames:='Serie;Inventario';
if Form2.Table1.FindKey([Edit1.text;Edit2.Text])=False then
ShowMessage('NO SE ENCONTRO REGISTRO');
Close;
end;

pero este codigo me obliga a llenar las dos edit, porque si lleno solo una para la búsqueda, me dice que no se encontro registro aunque si este, y lo que me gustaria, es que se pudiera elegir como se hara la búsqueda, si por el campo ‘serie’ o el campo ‘inventario’

Ojala me puedan ayurar.

Título: Re: Como Guardar Los Datos De Un Dblookupcombobox
Publicado por: Ayla en Viernes 6 de Mayo de 2005, 11:27

Hola.

Asegúrate que tengas las propiedades del TDBLookupComboBox correctamente, un ejemplo para que lo veas más claro:

Quiero grabar la provincia (campo lookup) en la tabla clientes.

Tabla cliente ( DataSource ---> DSCli)
Num integer
Nom char(30)
Pro integer

Tabla provincia (DataSource ---> DSPro)
Cod integer
Des char(30)


-DataField: Campo de la tabla que vas a guardar el valor del lookup(Pro).
-DataSource: DataSorce de la tabla que estas guardando datos (DSCli).

-ListSource: DataSorce de la tabla donde sacas el campo lookup (DSPro).
-KeyField: Campo que clave del lookup (Cod) .
-ListField: Campo que muestras (Num).

Un saludo  :comp: