Показать сообщение отдельно
Старый 12.02.2009, 14:55   #6
Dream
быдло
 
Регистрация: 05.08.2007
Сообщений: 1,435
Написано 614 полезных сообщений
(для 1,489 пользователей)
Ответ: К вопросу об указателях

Type one
	Field x
End Type

Type two
	Field y
End Type

For i =1 To 5
	one.one=New one
	one\x=i
Next

For i=5 To 10
	two.two=New two
	two\y=i
Next


For one.one=Each one
	i=i+1
	Print Handle (one)
Next

For two.two=Each two
	i=i+1
	Print Handle (two)
Next

WaitKey()
Type one
	Field x
End Type

Type two
	Field y
End Type

For i =1 To 5
	one.one=New one
	one\x=i
Next

For i=5 To 10
	two.two=New two
	two\y=i
Next

two.two=First two
For one.one=Each one
	
	Print Handle (one)
	Print Handle (two)
	two=After (two)
Next

Print 
For two.two=Each two
	Print Handle(two)
Next

WaitKey()
вот сопстно подтверждение того что было сказано выше.
Хендл обьектом даётся по порядку его вызова, и сохраняются за елементом.
в первом случаем вызывались по порядку, сначало все елементы первого типа, потом все елементы второго типа. Хендлы шли по порядку.

во втором случае хендлы вызывались через один. зендлы идут попорядку
и чтобы убедится в утверждениях, вызываем ещё раз хендлы для второго списка и получаем числа через одно)
(Offline)
 
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо Dream за это полезное сообщение:
impersonalis (12.02.2009), tormoz (12.02.2009)