Показать сообщение отдельно
Старый 01.09.2009, 14:55   #2
EvilChaotic
Мастер
 
Аватар для EvilChaotic
 
Регистрация: 05.04.2008
Сообщений: 910
Написано 530 полезных сообщений
(для 3,006 пользователей)
Ответ: имя текстуры

TextureName$(texture)

Параметры

texture - указатель текстуры

Описание

Возвращает полное имя файла текстуры. 

Чтобы узнать только название текстуры, Вы должны будете анализировать строку, возвращенную TextureName. Вот одна из функций для этой цели:
; начало 
Function StripPath$(file$) 

If Len(file$)>0 

For i=Len(file$) To 1 Step -1 

mi$=Mid$(file$,i,1) 
If mi$="\" Or mi$="/" Then Return name$ Else name$=mi$+name$ 

Next 

EndIf 

Return name$ 

End Function 
; конец
__________________

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