Title should read "Buttons don't work:)"
When i moved my db from v8 to v9 some of my buttons quit working.
The buttons use action scripting to open other forms. I have one form where 6 buttons are now not working.
Here is the xbasic for the action scripts on one button:
Since it is action scripting and not 'home made" xbasic I do not see why it does not work in v9 but is fine in v8.
Thanks for the help
Tony
When i moved my db from v8 to v9 some of my buttons quit working.
The buttons use action scripting to open other forms. I have one form where 6 buttons are now not working.
Here is the xbasic for the action scripts on one button:
Code:
'*******************************this part is in an inline xbasic action script dim global name as c name = topparent:full_name.value ' '************************************this part is an action script 'Check to see if you are running the script from within a Form dim flag_error as l flag_error = .f. if is_object(topparent.this) then p = topparent.this if eval_valid("P:Client_id.value") then DELETE Parameter1 'Set the Parameter variable to the object's .value property Parameter1 = eval("P:Client_id.value") else flag_error = .t. end if else flag_error = .t. end if if flag_error then ui_msg_box("Error","Client_id does not exist. This script cannot be run in this context.",UI_STOP_SYMBOL) end end if filter = "Client_id = [varC->parameter1]" query.filter = replace_parameters(filter,local_variables()) query.order = "" 'Open the layout_type showing just the records that satisfy the filter DIM Shared varP_Bodyfat as P DIM layout_name as c layout_name = "height" varP_Bodyfat = :Form.viewqueried(layout_name,query.filter, query.order ,"dialog","Center","Center") 'After the user closes the dialog form, the form remains in memory and the script 'continues with the next command. 'You can insert any code here that you want to execute before the dialog form (which is now 'hidden) is removed from memory with the .close() command. 'The code that you insert here can refer to the form using the pointer variable, varP_Bodyfat if is_object(varP_Bodyfat) = .t. then varP_Bodyfat.close() end if
Thanks for the help
Tony
Comment