Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Function für Vorzeichen?

    Delphi
    by Hawkeye219, 8. Sep 2006
  Dax, diesmal muß ich dich enttäuschen - SHR erwartet einen ganzzahligen Operanden.
  
  
  
  
  Gruß Hawkeye
• Forum: Object-Pascal / Delphi-Language

  Re: Function für Vorzeichen?

    Delphi
    by Hawkeye219, 8. Sep 2006
  Hallo Cöster!
  
  
  Manuel wollte dich darauf aufmerksam machen, daß die gängigen Vorzeichen-Funktionen für die Zahl 0 den Wert 0 als "Vorzeichen" liefern. Deine Funktion liefert in diesem Fall den Wert 1, betrachtet die Null also als positive Zahl.
  
  
  Ich hatte im Beitrag #15 eine mögliche Lösung vorgestellt (für Integer- und Double-Werte), weil ich auch von einer zweiwertigen Funktion ausging....
• Forum: Object-Pascal / Delphi-Language

  Re: Function für Vorzeichen?

    Delphi
    by Hawkeye219, 8. Sep 2006
  @Flocke
  
  SHR ist in Delphi ein vorzeichenloser Shift nach rechts - unabhängig von der Art des Operanden. Das Gegenstück (ASR) haben die Borländer leider nicht implementiert.
  
  @Cöster:
  
  Die Unit Math wurde/wird ständig erweitert, die Sign-Funktionen wurden in Delphi 6 hinzugefügt. Eine Erklärung zu Manuels Aussage findest du in der Wikipedia.
  
  Gruß Hawkeye
• Forum: Object-Pascal / Delphi-Language

  Re: Function für Vorzeichen?

    Delphi
    by Hawkeye219, 8. Sep 2006
  Hallo Manuel,
  
  
  Ich habe das so verstanden, daß er zwei mögliche Ergebnisse erwartet. Die 0 gilt dabei als positive Zahl. Aber Cöster wollte ja sowieso keine Funktion für Integer-Zahlen...
  
  PS: In deiner Assembler-Routine solltest du das "JA" durch ein "JG" ersetzen. :wink:
  
  Gruß Hawkeye
• Forum: Object-Pascal / Delphi-Language

  Re: Function für Vorzeichen?

    Delphi
    by Hawkeye219, 8. Sep 2006
  Hallo,
  
  hier ist noch eine Assembler-Version:
  
  
  function Sign2 (aValue: Integer): Integer;
  asm
  sar eax,31
  or eax,1
  end;