Imagen en dbgrid

[Neftali [Germán.Estévez]]

Necesitas un campo Booleano en u tabla que te indique si se ha convertido ya o no.

Si no quieres programar mucho puedes utilizar el componente TCustomizeGrid.

Basta con que lo sueltes en el formulario, le asignes tu DBGrid, lo actives y en el evento PaintCellImage coloque algo como ésto:

Código Delphi [-]
 
   // Para la columna pulsada
   if (FieldName = 'Convertido') then begin
       // Es verdadero
       if (Field.AsBoolean) then begin
         // Cargar el recurso
         Bitmap.LoadFromFile('.\Punto_verde.bmp');
       end
       else begin
         Bitmap.LoadFromFile('.\Punto_Rojo.bmp');
       end;
       // Indicar que ha cambiado
       Change := True;
   end;

En una de las demos del componente está implementado lo que necesitas.