Eintrag in Listview nach Eingabe formatieren

[RWarnecke]

Hallo Uli,

danke für Deinen Tip:

Zitat von uligerhardt:

Wenn nicht, sollte es reichen, den formatierten Wert auf S zuzuweisen.

Wenn ich das ganze jetzt so mache :

Delphi-Quellcode:

procedure TMainForm.AdvLV_GrunddatenzuschuesseEdited(Sender: TObject;
  Item: TListItem; var S: string);
var
  tmpBetrag: Extended;
begin
  case AdvLV_Grunddatenzuschuesse.ColumnIndex of
    0 : begin
          // ToDo Something
        end;
    1 : begin
          if TryStrToFloat(S, tmpBetrag) then
            S := Format('%2.2n €', [tmpBetrag]);
        end;
    2 : begin
          // ToDo Something
        end;
  end;
end;

Funktioniert es wunderbar. Habe da wohl den Wald vor lauter Bäumen nicht gesehen.