Gebühren in währungssrechner

[Jack Spades]

wenn ich das jetzt wie du machen möchte und die check box nutze
kann ich dann

Delphi-Quellcode:

Procedure MachWasMitGebuehrErheben;
begin
  if GebuehrErheben then
  begin
    result:=floattostr(strtofloat(eingabe)-5)
  end
  else
  begin
    result:=floattostr (strtofloat(eingabe))
  end;

schreiben? oder hab ich dann einen fehler?
nur mal neben bei, nutze die TEdit für meine eingaben

[Luckie]

Probiere es doch aus.

[Jack Spades]

leider kann ich es erst morgen ausprobieren &da wird es dann auch mit dem zeitplan etwas eng, deshalb wäre es nicht schlecht das jetzt schon zu wissen ob meine idee stimmt oder nicht