function Addr

Modified on 15/01/2009 14:47 by CPABED Categorized as Plattform

'''Syntax:'''{BR}
{{{{'''function''' Addr (const Class:TObject):integer;}}}}{BR}
{BR}
'''Beschreibung:'''{BR}
{BR}
Die Funktion gibt einen Zeiger auf ein bestimmtes Objekt zurück.{BR}
Addr gibt die Adresse des angegebenen Objekts zurück. Für X kann ein beliebiger Variablen-, Prozedur- oder Funktionsbezeichner angegeben werden. Die Funktion gibt dann einen Zeiger auf X zurück.{BR}

Der Rückgabewert von Addr ist der vordefinierte Typ Pointer. Dieser Typ ist mit allen Zeigertypen zuweisungskompatibel, kann aber ohne Typumwandlung nicht direkt dereferenziert werden.{BR}

Hinweis:	Addr entspricht dem Operator @, wird aber nicht von der Compiler-Direktive $T beeinflusst.{BR}
{BR}
'''Beispiel:'''{BR}
{BR}
<code pascal>
//Im folgenden Beispiel wird mit der Funktion Addr die Adresse eines numerischen Wertes ermittelt,
//der als benutzerdefiniertes Datum im Knoten eines Baumdiagramms gespeichert ist.
//Sobald die Zuweisung erfolgt ist, können Änderungen an den Elementen im Array NodeNumbers gelesen werden,
//indem die Zeiger dereferenziert werden, welche in der Eigenschaft Data der Gliederungsknoten gespeichert sind.

var
  I : Integer;
  NodeNumbers: array [0 .. 100] of Integer;
 begin
  with TreeView1 do
  begin
    for I := 0 to Items.Count - 1 do
    begin
      NodeNumbers[I] := CalculateValue(Items[I]);
      Items[I].Data := Addr(NodeNumber[I]);
    end;
  end;
end;

</code>

CP Wiki

Navigation¶

function Addr