Delphi-PRAXiS - Ergebnis der Suchanfrage

Ergebnis der Suchanfrage

Datum des Suchindex: Heute, 21:17

Parameter dieser Suchanfrage:

Suche in Thema: Ganze Zahl immer auf nächste 50 runden?
Suche alle Beiträge, die von "juergen" geschrieben wurden

• Suchmethode: "Suche nach allen Begriffen"
• Nach Datum (firstpost) sortiert
• Zeige Treffer als Beiträge

Zeige 1 von insges. 1 Treffern
Suche benötigte 0.003s

Es liegen Ergebnisse in folgenden Bereichen vor:

Forum: Object-Pascal / Delphi-Language
AW: Ganze Zahl immer auf nächste 50 runden?
Delphi
by juergen, 26. Feb 2017
Hallo,

in der Umsetzung aufwändig, aber das Ergebnis scheint zu stimmen : :shock:
function auf50kaufmaennisch_runden(Const Value: Integer): Integer;
Var
i, temp: Integer;
begin
temp := Value;
if temp > 49 then begin
if (StrToInt(copy(IntToStr(temp), Length(IntToStr(temp)) - 1, Length(IntToStr(temp)))) > 49) then begin

URL zu dieser Suchanfrage:

https://www.delphipraxis.net/dp_search.php?do=usersearch&search_username=juergen&search_exact_username=1&search_sortby=dateline&search_resulttype=post&search_matchmode=0&searchthreadid=191869

Ergebnis der Suchanfrage

Parameter dieser Suchanfrage:

Es liegen Ergebnisse in folgenden Bereichen vor:

AW: Ganze Zahl immer auf nächste 50 runden?

URL zu dieser Suchanfrage: