Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**axelf98**

Delphi-Quellcode:

			function runden(Zahl: real): real;

begin

result := trunc(Zahl*10)/10;

end;

axelf98 Registriert seit: 27. Aug 2003 Ort: Ennepetal 440 Beiträge Delphi 2005 Personal	#2 Re: Runden auf eine Nachkommastelle 23. Dez 2003, 07:50 markieren Delphi-Quellcode: function runden(Zahl: real): real; begin result := trunc(Zahl*10)/10; end;
	Zitat