Показать сообщение отдельно
Старый 14.06.2014, 19:03   #21
dsd
Мастер
 
Аватар для dsd
 
Регистрация: 13.06.2011
Сообщений: 1,103
Написано 481 полезных сообщений
(для 1,836 пользователей)
Ответ: Помогите с Type

Сообщение от Arton Посмотреть сообщение
Вопрос как листать тайп?
Мне нужно, доходя до конца списка автоматически перемещаться в начало и наоборот.
Вот так наверно.
If xKeyHit(44) = True Then ;назад "z"

	If Handle(Sobj) = First StaticObject Then Sobj.StaticObject = Last StaticObject	
        Else Sobj = Before Sobj EndIf
	
       
End If

If xKeyHit(45) = True Then ;вперёд "x"
        
        If Handle(Sobj) = Last StaticObject Then Sobj.StaticObject = First StaticObject
	Else Sobj = After Sobj EndIf

End If
(Offline)
 
Ответить с цитированием