Como dar formato numerico StringGrid

[ecfisa]

Empezado por JAI_ME

...
Quizas me puedan ayudar a detectar cuando un usuario sale de una celda ???

Hola JAI_ME.

Cuando un usuario sale de una celda de un TStringGrid, existen dos posibilidades. Que lo haga para ingresar en otra, en cuyo caso se dispara el evento OnSelectCell, o para darle el foco a otro control en cuyo caso se dispara el evento OnExit.

Si no entendí mal lo que estas buscando tal vez te sirva de este modo:

Código Delphi [-]
  ...
  private
     FC: TPoint;
  end;
  ...

implementation

procedure TForm1.FormCreate(Sender: TObject);
begin
  FC.X := 0;
  FC.Y := 0;
end;

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer;
  var CanSelect: Boolean);
var
  Nro: Double;
begin
  with TStringGrid(Sender) do
   if TryStrToFloat(Cells[FC.X,FC.Y], Nro) then
     Cells[FC.X,FC.Y]:= FormatFloat('#0,.000',Nro);
  FC.X := ACol;
  FC.Y := ARow;
end;

procedure TForm1.StringGrid1Exit(Sender: TObject);
var
  Nro: Double;
begin
  with TStringGrid(Sender) do
   if TryStrToFloat(Cells[FC.X,FC.Y], Nro) then
     Cells[FC.X,FC.Y]:= FormatFloat('#0,.000',Nro);
end;

Saludos.