Assigned.PAS

Язык:
Русский
English


 { Пример программы для функции Assigned }

var
  P : Pointer;

begin
  P := Nil;
 if Assigned(P) then
   WriteLn('Это вы не увидите');
  P := @P;
 if Assigned(P) then
   WriteLn('А это - увидите !');
end.
Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //