Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Вычисление интеграла с заданной точностью алгоритмом Симпсона.
Категория: Математика
Категория: Математика
Поиск по EasyTable
Категория: Базы данных
Категория: Базы данных
Удалить пробелы в начале и конце
Категория: Текст и строки
Категория: Текст и строки
Перекодировка в DBASE
Категория: Базы данных
Категория: Базы данных
Число четное или нечетное
Категория: Математика
Категория: Математика
Получить имена всех папок и файлов в директории
Категория: Файловая система
Категория: Файловая система
Сохраняем Bitmap в поле dbase
Категория: Базы данных
Категория: Базы данных
Как получить размер текстового файла, не открывая его
Категория: Текст и строки
Категория: Текст и строки
Группировка TopAdvGrid
Категория: Компоненты
Категория: Компоненты
Получить версию программы VersionInfo
Категория: Приложение
Категория: Приложение
Оборудование для изготовления самоклеющихся этикеток. Изготовление этикеток самоклеющихся рулон.
Delphi - Справочник: FreeAndNil
FreeAndNil
|
procedure FreeAndNil ( var ObjectReference ) ; |
Процедура (Unit SysUtils)
|
Освобождение памяти объекта и установка его в nil
|
Описание:
|
Процедура FreeAndNil освобождает память, используемую объектом, и устанавливает объектную ссылку на ноль (nil). Это фактически делает это в обратном порядке - сначала разыменование объекта перед освобождением памяти. Это очень чистый способ освободить ресурсы. |
Пример кода: Освобождение и обнуление объекта, и затем пытаемся сделать это снова
|
var myList : TList; begin // Создание объекта списка myList := TList.Create; // И теперь освобождаем и обнуляем этот объект FreeAndNil(myList); // Мы можем сделать это безопасно дважды - она игнорирует нулевые объекты FreeAndNil(myList); end;
Результат:
|
Никакого исключения не произойдёт - второй FreeAndNil не ничего делает. |