Показать сообщение отдельно
Старый 21.12.2007, 02:19   #19
ЛысыЙ_Чук-Иванчук
Дэвелопер
 
Регистрация: 19.03.2006
Сообщений: 1,241
Написано 10 полезных сообщений
(для 17 пользователей)
Радость Re: Несколька вопросов мо БлицМаксу.

Вопрос о подсветке функций остаёться открытым

Почему нельзя в цикле For... Next задавать ей- FI_Surfaces.Array[ i ] , параметры???

Type FI_SurfacesType
	Field Count:Int 
	Field   Array:Int[256]
	Field Texture:Int
End Type


Global FI_Surfaces:FI_SurfacesType = New FI_SurfacesType


Function xCreateImageEx:Int (texture:Int, width:Int, height:Int, imageFlags:Int = -1)
		FI_Surfaces.Texture = texture
		FI_Surfaces.Count = xGetTextureFrames(texture)
		If FI_Surfaces.Count>0 
			If FI_Surfaces.Count>256 FI_Surfaces.Count=256
			For Local i:Int=1 To  FI_Surfaces.Count-1
				
				FI_Surfaces.Array[ i ] = xGetTextureSurface(texture, i)
				
			Next
			'Return xCreateImageExSurf_(FI_Surfaces, width, height, imageFlags)
		EndIf
End Function
(Offline)
 
Ответить с цитированием