Programowanie w języku Delphi

New

  • 2010-10-31 18:27
  • 0 komentarzy
  • 1992 odsłony
  • Oceń ten tekst jako pierwszy
New
Moduł: System

procedure New(var P: Pointer);

Tworzy nową dynamiczną zmienną; wówczas P wskazuje na tę zmienną.

Parametr P może być dowolnego typu wskaźnikowego. Rozmiar alokowanej pamięci obliczana jest na podstawie danych na jakie wskazuje P. Następnie, do zmiennej należy odwoływać się w ten sposób: P^. Jeżeli nie ma wystarczająco dużo pamięci, aby wykonać tę operację, wywołany zostanie wyjątek EOutOfMemory.

Przykład użycia:

program Foo;
 
{$APPTYPE CONSOLE}
 
type
  PMyRec = ^TMyRec;
  TMyRec = packed record
     S : String;
     I : Integer;
  end;
 
var
  P : PMyRec;
begin
  New(P);
  P^.S := 'String';
  P^.I := 1;
 
  Writeln(P^.S);
  Dispose(P); // zwolnienie pamięci
  Readln;
end.


Zobacz też: