Einzelnen Beitrag anzeigen

elmar.faber

Registriert seit: 10. Sep 2007
Ort: Neustadt (Hessen)
37 Beiträge
 
Delphi 10.2 Tokyo Architect
 
#3

AW: FireMonkey, Livebinding und Nachkommastellen in einem TGrid

  Alt 9. Aug 2018, 09:36
Vielen Dank für den Hinweis, ich dachte ich könnte damit das Problem lösen, aber
irgendwie denke ich wohl falsch herum... Mal ein einfaches Beispiel:

Delphi-Quellcode:
procedure TFrmZutaten.Grid1DrawColumnCell(Sender: TObject;
  const Canvas: TCanvas; const Column: TColumn; const Bounds: TRectF;
  const Row: Integer; const Value: TValue; const State: TGridDrawStates);
Var
  V : TValue;
  S : String;
begin
  If Column.Header = 'AmountThen Begin
    S := '18';
    V := TValue.From<String>(S);
  End Else
    V := Value;

  Column.DefaultDrawCell(Canvas, Bounds, Row, V, State);
end;
Und so sieht es aus (rechtes Grid), wieder die Ausgabe 18.00
Miniaturansicht angehängter Grafiken
ausgabe.png  
Elmar Faber
  Mit Zitat antworten Zitat