Ver Mensaje Individual
  #5  
Antiguo 21-11-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola amigo newtron

Tiempo ya sin verte, se te extrañaba...

Y no. No estas diciendo ninguna tontería, no se me había ocurrido esa posibilidad...

Siendo 2 y 3 las columnas a ocultar segun el valor del campo importe (50 por ejemplo), ¿ Vos te referís a algo parecido a esto ?
Código Delphi [-]
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  with Sender as TDBGrid do
  begin
    if(DataSource.DataSet.FieldByName('Importe').AsFloat <= 50) and (DataCol = 3) then
      DBGrid1.Canvas.FillRect(Rect);
    if (DataSource.DataSet.FieldByName('Importe').AsFloat > 50) and (DataCol = 2) then
      DBGrid1.Canvas.FillRect(Rect);
  end
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 21-11-2012 a las 21:13:05.
Responder Con Cita