Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Schleife für StringReplace

    Delphi
    by marabu, 14. Jun 2006
  Eine kleine Code-Spende:
  
  
  const
  S_UNITS = 'pnµm kMGT';
  
  function FloatToSym(value: Extended): String;
  var
  i, sign: Integer;
  log: Extended;
• Forum: Sonstige Fragen zu Delphi

  Re: Schleife für StringReplace

    Delphi
    by marabu, 3. Jun 2006
  Herzlich willkommen in der Delphi-PRAXiS, Stevens.
  
  Hier noch eine kleine Funktion, welche die technische Notation im Bereich E-9 bis E6 von Exponentialschreibweise auf Symbolschreibweise umstellt. Ohne Prüfcode - nur zur Verdeutlichung der Vorgehensweise:
  
  
  function EngUnit(s: String): String;
  const
  S_UNITS = 'nµm kM';
  var
  i, exp: Integer;