Verkettung ? Fragen für Info-Klausur

[Christian Seehase]

Moin VeeJay,

mit Zusammenhang wird's schwierig

Ich hab' Dir hier mal ein "wildes" Beispiel zusammengestellt:
(um das try/finally brauchst Du Dich erstmal nicht zu kümmern, auch wenn's wichtig ist)

Delphi-Quellcode:

var
  p : PChar; // Pointer auf Char
  c : Char;  // Ein Character

begin
  p := AllocMem(1); // Speicher reservieren und Adresse dieses Speichers nach p
  try
    p^ := 'a';      // Jetzt an diese Stelle ein Zeichen schreiben.
    c  := p^;       // und jetzt dieses Zeichen an die Charactervariable übergeben
    ShowMessage(c); // Anzeigen, dass es auch geklappt hat
  finally
    FreeMem(p,1);   // Nun kann der Speicher wieder freigegeben werden
  end;
  p  := @c;         // Jetzt die Adresse der Charactervariablen nach p
  ShowMessage(p^);  // Und sich das a anzeigen lassen
  c  := 'b';        // Jetzt ein anderes Zeichen in der Charactervariablen speichern
  ShowMessage(p^);  // aber wieder anzeigen lassen, auf was p zeigt... siehe da es erscheint ein b
end;

War das soweit verständlich mit ^ und @ ?