Displaying strings like '001235' in an TAdvStringGird by FloatFormat

VCL TMS VCL UI Pack
1

Hello,

how can I display a string like '001235' in a TAdvStringGrid by using the FloatFormat?

I tried this, but the format is not known...

procedure TDesign.FFormat_SG_WeeklyStock(Sender: TObject; ACol, ARow: Integer;
  var IsFloat: Boolean; var FloatFormat: string);
begin
   case ACol of
      0: FloatFormat:='%s';     //Here is a string like '001235'
      1: FloatFormat:='%s';
      2: FloatFormat:='%.0n';
      3: FloatFormat:='%.0n';
      4: FloatFormat:='%.0n';
      5: FloatFormat:='%.0f';
      6: FloatFormat:='%.0f';
      7: FloatFormat:='%.0n';
      8: FloatFormat:='%.0n';
   end;
end;
2

You need to set var parameter isFloat = true

Example:

procedure TForm1.AdvStringGrid1GetFloatFormat(Sender: TObject; ACol,
  ARow: Integer; var IsFloat: Boolean; var FloatFormat: string);
begin
  isFloat := true;
  floatformat := '%.2f';
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  advstringgrid1.cells[1,1] := '00012345';
end;

shows as 12345,00