I have the following code:
I would like to change it so instead of the static message "Not able to load image file. Program aborting" printing out when the image doesn't excist, i would like it to print "Not able to load image file filename_here. Program aborting". I have tried the following code to no avail
Any ideas?
'--------------------------------------------------------------------------------------------------- ' Fuction CreateObject ' Creates the Game Object '--------------------------------------------------------------------------------------------------- Function CreateObject(Obj:TGameObject, Image:TImage, New_X_Start_Position:Int,New_Y_Start_Position:Int, New_Scale:Float=1.0) Obj.X_Start_Position = New_X_Start_Position Obj.y_start_position = New_Y_Start_Position Obj.X_Scale = New_Scale Obj.Y_Scale = New_Scale Obj.Image = Image If Obj.Image=Null Print "Not able to load image file. Program aborting" End EndIf Obj.Reset() ListAddLast GameObjects, Obj End Function
I would like to change it so instead of the static message "Not able to load image file. Program aborting" printing out when the image doesn't excist, i would like it to print "Not able to load image file filename_here. Program aborting". I have tried the following code to no avail
'--------------------------------------------------------------------------------------------------- ' Fuction CreateObject ' Creates the Game Object '--------------------------------------------------------------------------------------------------- Function CreateObject(Obj:TGameObject, Image:TImage, New_X_Start_Position:Int,New_Y_Start_Position:Int, New_Scale:Float=1.0) Obj.X_Start_Position = New_X_Start_Position Obj.y_start_position = New_Y_Start_Position Obj.X_Scale = New_Scale Obj.Y_Scale = New_Scale Obj.Image = Image If Obj.Image=Null Print "Not able to load image file " + String(Obj.Image) + ".Program aborting" End EndIf Obj.Reset() ListAddLast GameObjects, Obj End Function
Any ideas?