Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Gibt es einen Toggle Befehl ?

    Delphi
    by Sidorion, 7. Mär 2007
  Das:
  procedure Toggle (const B : Boolean);
  var BPtr : PBoolean;
  begin
  BPtr := @B;
  BPtr^ := not B;
  end;
  kann garnicht funktionieren, da die Direktive 'const' CallByValue (Worth) bewirkt (also genauso wie ohne Direktive, ausser, dass der Wert des Aufrufparameters zusätzlich nicht änderbar ist). Dies hat zur Folge, dass der Wert der Eigenschaft Checked als Kopie übergeben wird und diese...