What else does installing v11 change?

[Sandy Garrett]

I installed the v11 trial on a system with a properly running v8. So far everything but one script works, but that one script no longer works in v8 either. I suspect it has to do with one of those Microsoft items (.net 4 and something else) that v11 installed. Any guesses?

'Inline-Xbasic. Converted from: Set filename for an Image File Reference field: 'Scan' in  current window.
'Set filename for an Image File Reference field: 'Scan' in  current window.
Dim ImageFilename as c
ImageFilename = a5_eval_expression("=a5.get_path() + chr(92) + \"Photos\" + chr(92) + trim(Imgname)+\".jpg\"",local_variables())
IF .not. file.exists(a5.get_path() + chr(92) + "Photos" + chr(92) + trim(photos->IMGNAME)+ ".jpg")
	ImageFilename=a5.get_path() + chr(92) + "Photos" + chr(92) + "unavail.jpg"
end if
Dim TempObj as p
dim readonly_flag as l	
'Get a pointer to the Object on the Form/Browse that has the image file ref field.
TempObj = obj(parentform.name(16)+":"+"Scan")
'Check if the image field is readonly
readonly_flag = TempObj.field.readonly
if readonly_flag = .t. then 
	ui_msg_box("Error","Cannot change image in Image field '"+"Scan"+"' because it is read-only",UI_STOP_SYMBOL)
	end 
else
	dim Tbl as p 
	'Get a pointer to the table for the image field
	Tbl = tempobj.Field_Get().table_get()
	dim Fld as p 
	'Get a pointer to the image field
	Fld = tempobj.field_get()
	
	'If the table is in View mode, put it in change mode
	If tbl.mode_get() = 0 then 
		tbl.change_begin()
		fld.value_put(image_filename_encode(ImageFileName))
		tbl.dchanged=date()
		tbl.change_end(.t.)
	else
		fld.value_put(image_filename_encode(ImageFileName))
		tbl.dchanged=date()
	end if 
	
	'now refresh the object
	tempObj.refresh()
	
end if

'Refresh  'Scan' in current form.
topparent:Scan.refresh()

[DaveM]

Re: What else does installing v11 change?

what error are you getting?

I just was working on a v8 app and after opening everything on the app to see what was going on with v11. I started a new script and using a5.get_path did not work in v8.

Maybe it was something I thought that made the system mad???

[Sandy Garrett]

Re: What else does installing v11 change?

No error; nothing happens. When the script works it makes the Image reference field display the JPG - whose name was just provided elsewhere.

The providing part still works because I see the JPG in the right folder with the right name. The previous script moves or copies a JPG to the Photos folder and renames it. It includes

dim photodir as C = a5.get_path() + chr(92) + "Photos" + chr(92)

[DaveM]

Re: What else does installing v11 change?

I don't know
Supposedly v11 and 10.5 started installing .net and c++ runtime files. you alos have dhtml, but they aren't suppoed to be using.net much yet and if they are, it should be webside. I just found a few small discrepancies from all the way back to v7 when jumping the app to v11. most may have been my doing it wrong.

[Tom Cone Jr]

Re: What else does installing v11 change?

Sandy, if no one has better ideas for you I'd suggest troubleshooting this by duplicating the script and then replacing all the indirect object references with actual table, form and field names. Test it, then add back one indirect object reference at a time til you break it.

[Sandy Garrett]

Re: What else does installing v11 change?

Dave, do you still have v 11 installed? If so, could you try the attached experiment? There is a short Readme.

[Tom Cone Jr]

Re: What else does installing v11 change?

Sandy

Your form seems to be working just fine under vers 11 for me. Check this silent screencast.

Are you running the same "build" of v11 as me ?

I'm running under Win7 Pro on a 64 bit machine.

-- tom

[Sandy Garrett]

Re: What else does installing v11 change?

Kool video, thanks.

I use True Image's Try & Decide for iffy installs and such, so I will have to reinstall to catch the version number. It's whatever the 30-day free trial offers.

More later...

Yup, 3381 build 4096. One more install should do it....

Total mystery. I worked up to reinstalling the whole thing, and the error is gone. Both the sample and the real thing work in both v8 and v11. Some days the gremlins laugh all the way home.