Delphi-PRAXiS - Delphi Timer vom Typ Cardinal prozentual erhöhen oder verringern

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi Timer vom Typ Cardinal prozentual erhöhen oder verringern (https://www.delphipraxis.net/119789-timer-vom-typ-cardinal-prozentual-erhoehen-oder-verringern.html)

Timer vom Typ Cardinal prozentual erhöhen oder verringern

Hallo!
Ich habe einen Timer der vom Typ Cardinal ist. Bisher habe ich ihn einfach um einen festen Wert verringert bzw. erhöht. Jedoch möchte ich diesen nun prozentual erhöhen/ verringern also sowas wie 2000 und soll um 10 Prozent erhöht werden so dass dann der neue Wert 2200 ist.

Daher wollte ich sowas wie

Delphi-Quellcode:

Timer1.Interval := Timer1.Interval+(Timer1.Interval*(1/10));

Dabei bekomme ich aber ein Problem mit den unterschiedlichen Datentypen Extended und Cardinal.
Wie kann ich auf möglichst einfache Art das Problem lösen?

Danke für die Hilfe Guevara

Re: Timer vom Typ Cardinal prozentual erhöhen oder verringer

Verwende einfach den Round-Befehl.

Delphi-Quellcode:

Timer1.Interval := Timer1.Interval + Round(Timer1.Interval*(1/10));

Gruß,

Finn

Re: Timer vom Typ Cardinal prozentual erhöhen oder verringer

Oder

Delphi-Quellcode:

Timer1.Interval := Timer1.Interval +Timer1.Interval DIV 10;