[ygkw]

Hola muchachos, nuevamente los estoy visitando

Ayer estube trabajando con un DBGrid que se encuentra conectado a un TDataset por medio de un TDataSource y en el cual cargo los detalles de los comprobantes de venta, compra, etc.

Lo que he tratado de hacer es que cuando se este haciendo una nueva factura o comprobante (en modo de Insercion o Edicion) no pueda duplicar un mismo codigo de articulo en la grilla ya que mi tabla tiene el campo codigo como parte de la Clave Primaria y en el caso de que sea duplicado se posicione en el codigo que ya estaba anteriormente.

IMPORTANTE: LO QUE QUIERO CON ESTO ES QUE CUANDO SE INGRESE UN CODIGO QUE YA EXISTE, BUSQUE LA POSICION EN QUE ESTA EL CODIGO ANTERIOR Y QUE SE TRASLADE EL FOCO A LA FILA Y COLUMNA DEL CODIGO ANTERIOR. ASI SI EL OPERADOR DESEA AGREGAR MAS CANTIDAD DE UN PRODUCTO QUE YA HABIA CARGADO ANTERIORMENTE, DIRECTAMENTE SE POSICIONE EN LA COLUMNA DE LA CANTIDAD Y LA FILA DEL CODIGO ANTERIOR PARA EDITARLO MAS RAPIDAMENTE.

Para el tema de la deteccion de codigos duplicados estube buscando de que valide de alguna manera en el evento OnValidate del campo anticulo en el dataset, que no se esten duplicando los codigos mediante alguna funcion que valide el constraint de la DB para el PK el tiempo de ejecucion, deseado, sin enbargo no encontre informacion para eso.

Con respecto al tema de posicionar en la fila del codigo anterior surgio la idea de utilizar el locate en el dataset_detalle, lo interesante es que funciona a nivel del dataset, pero los datos no se reflejan correctamente en el dbgrid distorsionandolos.

Tambien probe una opcion interesante, que es la de manejar la tabla como un stringgrid, lo que me permite moverme correctamente a nivel de grilla pero que no se refleja en el Dataset.

Código Delphi [-]
begin  
with TStringGrid(DBGrid1) do    
  begin      
    Row:=VaribleFilaAnterior;//Fila en donde se encuentra el codigo anterior      
    Col:=3;  //Columna donde se modifica la cantidad del articulo.      
    SetFocus;
  end;
end;

Ojala que alguien tenga una idea de como hacer funcionar esto..

Saludos..