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.
