Re: Размерность массива
Добавлено: 21 Июль 2014, 3:03
Я как модератор предупреждаю: если и дальше здесь один будет предлагать идиотские советы, а другой их претворять в жизнь и рапортовать о результатах, я эту тему закрою и удалю.
Место общения программистов, форум разработчиков БД на Clarion
https://forum.clarionlife.net/
Код: Выделить всё
sa &stat_array
elementAddress LONG, AUTO
CODE
LOOP aIndex = 1 to array_size
!-- находим адрес очередного эл-та массива
elementAddress = array_address + (aIndex - 1) * SIZE(stat_array)
!-- получаем эл-т
sa &= (elementAddress)
!-- обрабатываем
MESSAGE('Alias '& aIndex &' = ' & CLIP(sa['& aIndex &'].Alias) & '. Date = ' & sa['& aIndex &'].Date & '. Name = ' & CLIP(sa['& aIndex &'].Name) & '. Position = ' & sa['& aIndex &'].Position & '. Status = ' & sa['& aIndex &'].Status)
END