Zitat von
Delphi Hilfe:
Syntax: function Swap(X: Integer): Integer;
Beschreibung
In Delphi vertauscht Swap das höherwertige mit dem niederwertigen Byte des mit X angegebenen Wertes. X ist ein Ausdruck des Typs SmallInt oder Word (16 Bit). Die Funktion ist nur aus Gründen der Abwärtskompatibilität vorhanden.
WAS willst du denn überhaupt machen???
Die Funktion macht 100 pro nicht das was du möchtest.
Es ist unmöglich, witzig zu sein ohne ein bisschen Bosheit. Die Bosheit eines guten Witzes ist der Widerhaken, der ihn haften lässt. - Georg Christoph Lichtenberg