Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Nothine**

oder solange du mit ordinalen werten arbeitest mit mod:

Delphi-Quellcode:

			  if Value mod 1000 > 0 then //1000 soll ja nich 2000 werden *g*

    Result := Value + (1000 - (Value mod 1000) );

Nothine Registriert seit: 3. Jul 2004 Ort: Mülheim an der Ruhr 198 Beiträge Delphi 5 Enterprise	#4 Re: werte auf nächsten 1000er runden 9. Nov 2004, 14:44 oder solange du mit ordinalen werten arbeitest mit mod: markieren Delphi-Quellcode: if Value mod 1000 > 0 then //1000 soll ja nich 2000 werden g Result := Value + (1000 - (Value mod 1000) ); if ThisPost is senseless then ThisPost.WasPostedBy := SomeoneElse();
	Zitat