Stringgrid의 숫자 포멧 설정

stringgrid의 셀에서 숫자의 실수형의 포멧을 지정하는 방법

procedure TForm1.StringGrid1GetEditText(Sender: TObject; ACol, ARow: Integer; var Value: string);
begin
  // Set format for real numbers in column 2
  if (ACol = 2) and TryStrToFloat(Value, Value) then
    Value := FormatFloat('#,##0.00', StrToFloat(Value));
end;