Ja, wo ist denn das Beispiel?

[littleDave]

Bei mir in der Delphi-Hilfe (Delphi 7) gibt es folgendes Beipiel:

Delphi-Quellcode:

var P: Pointer;
begin
  P := nil;
  if Assigned (P) then Writeln ('You won''t see this');
  GetMem(P, 1024);   { P ist gültig }
  FreeMem(P, 1024);   { P ist nicht mehr gültig und noch nicht nil }
  if Assigned (P) then Writeln ('You''ll see this');
end;

Vieleicht haben die vergessen, dieses Beispiel mit einzubinden