Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Max. 3 Nachkommastellen

    Delphi
    by BAMatze, 15. Jun 2009
  Hab mir auch mal eine Lösung überlegt, könnt ja mal raufschauen:
  
  
  unit Unit1;
  
  interface
  
  uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Math;
• Forum: Object-Pascal / Delphi-Language

  Re: Max. 3 Nachkommastellen

    Delphi
    by BAMatze, 15. Jun 2009
  Also mir fällt da spontan folgendes Vorgehen ein:
  
  1. Bediener gibt Nachkommastellen ein (z.B. n = 3)
  2. du berechnest dann: 10^n (in diesem Fall 1000)
  3. du multiplizierst es mit deiner eingegebenen Zahl für dein 3.Beispiel sähe das wie folgt aus: 0,3972 * 1000 = 397,2
  4. du rundest(round) es => 397
  5. du dividierst es wieder durch 1000 und gibst es mit format aus => 0,397
  
  ist zwar...