Показать сообщение отдельно
Старый 04.09.2005, 05:48   #9
impersonalis
Зануда с интернетом
 
Аватар для impersonalis
 
Регистрация: 04.09.2005
Сообщений: 14,014
Написано 6,798 полезных сообщений
(для 20,935 пользователей)
After переменная_элемента_типа

Параметры
переменная_элемента_типа = не имя типа, а переменная элемента типа.
Описание
Если вы не читали выше о команде TYPE, Вам стоило бы это сделать, перед тем как продолжить чтение.
Используёте эту команду, чтобы получить доступ к следующему элементу типа. См. пример.
См. также: Type, New, Before, First, Last, Each, Insert, Delete.
Пример
;Объявление типа crafts 

Type crafts 
Field x 
Field y 
Field dead 
Field graphic 
End Type 

;создание 100 объектов, с уникальными именами элементов типа
For t = 1 To 100 
alien.crafts = New crafts 
alien\x = Rnd(0,640) 
alien\y = Rnd(0,480) 
alien\dead = 0 
alien\graphic = 1 
Next 

;Двигаем первый элемент типа
alien.crafts = First crafts 

Print alien\x 
Print alien\y 
Print alien\dead 
Print alien\graphic 

; двигаем следующий элемент
alien = After alien 

Print alien\x 
Print alien\y 
Print alien\dead 
Print alien\graphic 

; двигаем последний 
alien.crafts = Last crafts 

Print alien\x 
Print alien\y 
Print alien\dead 
Print alien\graphic 

;двигаем предпоследний
alien = Before alien 

Print alien\x 
Print alien\y 
Print alien\dead 
Print alien\graphic
__________________
http://nabatchikov.com
Мир нужно делать лучше и чище. Иначе, зачем мы живем? tormoz
А я растила сына на преданьях
о принцах, троллях, потайных свиданьях,
погонях, похищениях невест.
Да кто же знал, что сказка душу съест?
(Offline)
 
Ответить с цитированием
Эти 4 пользователя(ей) сказали Спасибо impersonalis за это полезное сообщение:
ABTOMAT (05.01.2009), krlmisha (01.06.2011), pentod65 (10.02.2009), tormoz (30.10.2008)