Float display formata in LazReport?
lazarus / 16-Databases

----------------------------------------------------------------------
tatamata · 2012-02-06 05:36

This procedure I use to apply user-defined float display format to a
dataset controls such as DBGrid:
Code: [Select]procedure TFormMain.SetFloatDisplayFormat(Dataset:
TDataSet);
var J:Integer;
begin
  //Set display format for Float type
  for J:=0 to Dataset.FieldDefs.Count-1 do begin
    if Dataset.FieldDefs[J].DataType=ftFloat
      then begin
        (Dataset.Fields[J] as TFloatField).DisplayFormat
          :=Options.FieldByName('FloatDisplayFormat').AsString;
      end;
  end;
end;
How to do similar for LazReport's frDBDataset?