Показать сообщение отдельно
Старый 26.06.2013, 20:31   #1
Gector
Легенда
 
Аватар для Gector
 
Регистрация: 14.10.2007
Сообщений: 3,878
Написано 2,012 полезных сообщений
(для 5,072 пользователей)
Веселый Handle

Type my_type
Field a
End Type

For i=0 To 5
mt.my_type = New my_type
mt\a=i
a=Handle(mt)
Print a
Next

Print "-------------"

For i=1 To 6
mv.my_type= Object.my_type(i)
Print mv\a
Next
До недавнего времени я думал, что функция handle тупо возвращает ссылку на тип. Но как оказалось это не совсем так. Не знаю, что она делает, но без нее применить object к типу нельзя в принципе. Хотя сам по себе хендл - это элементарный порядковый номер. WTF? Попробуйте закомментировать a=Handle(mt).
(Offline)
 
Ответить с цитированием