Forum: Object-Pascal / Delphi-Language
Delphi
by HeZa,
4. Nov 2004
Hi Shaman
nur das du damit nicht die Adresse sondern nur den Wert der Variablen getauscht hast. Versuch folgendes und staune:
oldAdr := Integer(@ax);
Swap(ax,by);
if oldAdr = Integer(@ax) then ShowMessage('War wohl nichts.');
Ciao HeZa
Forum: Object-Pascal / Delphi-Language
Delphi
by HeZa,
4. Nov 2004
Hm..., die Adresse einer benannten Variablen kann man gar nicht ändern. Sieh dir mal die Fehlermeldung an wenn man deb folgenden Code ausführt.
procedure Tausche(var A, B);
var
C: Pointer;
begin
Move(A, C, SizeOf(C));
Move(B, A, SizeOf(C));
Move(C, B, SizeOf(C));
end;