Ver Mensaje Individual
  #1  
Antiguo 23-01-2014
novato_erick novato_erick is offline
Miembro
 
Registrado: ago 2010
Ubicación: Panamá
Posts: 397
Reputación: 16
novato_erick Va por buen camino
Cambiar campo a mostrar en un dbgrid con clientdataset.

Hola chicos es posible cambiar que en ejecusión un dbgrid cambie el campo a mostrar en caso de tener un valor 0 en la consulta?

ejemplo:

Tengo mi clientDataSet pero en uno de los campos Tengo PRECIO_CIV y otro Campo PRECIO_SIV (Precio con impuesto y precio sin impuesto) lo que necesito es si en precio con impuesto me trae a la hora de abrir mi ClientDataSet valor 0 se muestre entonces el campo PRECIO_SIV en el dbgrid relacionado a un DataSourse...


Este es mi codigo..

Código Delphi [-]
if (tipoConsulta in ['0' .. '9']) and
      (length(trim(eBusquedArticulo.Text)) > 0) then
    begin
      dmlogicaArticulos.cdsConsultaArticuloCodigo.Active := False;
      dsConsultaArticulo.DataSet := dmlogicaArticulos.FindComponent
        ('cdsConsultaArticuloCodigo') as TDataSet;
      dsConsultaArticulo.DataSet.Close;
      with dmlogicaArticulos.qConsultaArticuloCodigo do
      begin
        Close;
        Params.ParamByName('CodigoBarra').AsString :=
          trim(eBusquedArticulo.Text);
      end;
      dsConsultaArticulo.DataSet.Open;
      dmlogicaArticulos.cdsConsultaArticuloCodigo.Active := True;
      eBusquedArticulo.SelectAll;
      if dmlogicaArticulos.cdsConsultaArticuloCodigo.RecordCount = 0 then
      begin
        SHOWMESSAGE('No se Encuentra Artículo');
        eBusquedArticulo.Clear;
      end;
    end;

Alguna sugerencia?


Saludos
Responder Con Cita