Разъясните с условиями пожалуйста
Имею такую функцию:
Function LoadProject (path$ = "")
If path$ = "" RuntimeError "Отсутствует фаил проекта!" + Chr$ (13) + " Укажите правильный путь!"
project = ReadFile (path$)
If project = 0 RuntimeError("Отсутствует фаил!")
While Not Eof(project)
ln$ = ReadLine$(project)
;/---------------Загрузка главной модели
If Instr (ln$, "#model = ", 1) Then
path_file$ = Mid$ (ln$, 10)
If path_file$ <> "" Then model = LoadAnimMesh (path_file$)
EndIf
;---------------/
If (model = 0) Then RuntimeError ("Модель не создана!")
If Instr (ln$, "#child = ", 1)
lst.children = New children
lst\mesh_chld = FindChild (model, Mid$(ln$, 10))
If lst\mesh_chld <> 0 EntityColor lst\mesh_chld, Rnd (255), Rnd (255), Rnd (255)
EndIf
Wend
End Function
проблемма в том, что когда коментируеш условие
If (model = 0) Then RuntimeError ("Модель не создана!")
все работает
если оставляеш как есть, model начинает равнятся нулю
чего я не знаю, подскажите пожалуйста
переменную model ставил и глобальной для программы, и локальной для данной функции, результат один. затыкается на этом месте.
PS ну не присваивается же в условии этой переменной ноль?
|