Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: "Zeichen" im Integer

    Delphi
    by JasonDX, 19. Jan 2007
  Nein, weil ich das array eigentlich mal in den Code-Block schieben wollte, damit ich nicht auf ein Sprach-abhaengiges array zurueckgreifen haette muessen. Hat aber nicht zu ganz geklappt, und hab aus Gewohnheit die Hex-Werte kopiert... Wenn ich Leute Verwirren will, sieht das anders aus ;)
  Na ja, das mit dem Array hatte dann auch zur folge, dass dann das geschriebene nichmehr kompiliert... warum...
• Forum: Object-Pascal / Delphi-Language

  Re: "Zeichen" im Integer

    Delphi
    by JasonDX, 19. Jan 2007
  Ich wuerde sagen, die staendige Division ist eine unnoetige Bremse, die man nicht zwingend braucht.
  Algorithmisch gesehen sollte das die schnellste Variante sein:
  
  function DecIntLength(x: integer): byte;
  const
  m: packed array of integer = ($A, $64, $3E8, $2710, $186A0, $F4240, $989680, $5F5E100, $3B9ACA00, $0);
  asm
  MOV EAX, x
  MOV ESI, m
  CDQ