Функция ObjPtr
ObjPtr(Ptr)
Недокументированная функция ObjPtr служит для получения указателя на объект (адрес объекта в памяти)
Возвращаемое значение
Возвращает данные типа Long, содержащие указатель на объект
Параметры
Ptr | Обязательный аргумент - объектная переменная, указатель на которую требуется получить
|
Пример
' Используем ObjPtr для тестирования
Dim col As New Collection
Dim obj As CPerson
' создаем новый CPerson объект и добавляем его в коллекцию
Set obj = New CPerson
obj.Name = "Some Object"
col.Add obj, CStr(ObjPtr(obj)) ' ключ должен быть строкой
' Удаляем объект из коллекции
col.Remove CStr(ObjPtr(obj))
Категория Функции работы с указателями |