Proper Table Referencesin Set

[Tom Cone Jr]

RE: Proper Table Referencesin Set

Greg,

I use f2.activate(), then f2.show(), then f2.close() because that's the way more experienced folks have done it. If you don't have any problems leaving it out I'd say that's ok. You might want to test whether the dialog form is actually closing if decide to do this.

Concerning resynch(), I did not do any actual editing in my work last night. You may need to include it to get the edits to display in the original form. Try it both ways, and again, verify that the dialog is actually closing.

-- tom

[JerryBrightbill]

RE: Proper Table Referencesin Set

Tom,

I am always behind.

Jerry

[Greg Fong]

RE: Proper Table Referencesin Set

Thanks Tom,I will try it with f2.activate(). With regard to the example, I recall somewhere that I had some trouble when the parentform was not hidden. After hiding the parentform the problem disappeared.

[Tom Cone Jr]

RE: Proper Table Referencesin Set


Greg, you're welcome.

I make it a personal rule to ALWAYS check to verify that the called dialog form has closed when modifying a script which loads or opens one. You can do this in xbasic, or you can just check the Xbasic Explorer after opening the dialog several times in a row.

-- tom

[Greg Fong]

RE: Proper Table Referencesin Set

OK I give up, how do you check for open dialogs with xbasic?

[Tom Cone Jr]

RE: Proper Table Referencesin Set

Greg,

Just like you would test to see if any other object exists, I suppose. Have you tried Obj() or Is_Object(), as discussed at the end of chapter 6 of the Xbasic Ref. Manual?

I routinely check to see if a form is already loaded, before loading it again. If it's loaded I don't bother, I just work with the instance that already exists. If it's not yet in existence then I load it. I've assumed the code could be easily modified to check whether a dialog form remains open.

Assume your dialog form is named 'Customer':

p = obj(":Customer")
if .not. is_object(p) then 'form is not loaded
ui_msg_box("Ok","Form was closed")
else
ui_msg_box("Oops","Form is still open")
end if

-- tom