Hey there Tracy, About a missing Char, well, I already add in at the end - a Chr(13) + Chr(0), which I've already been doing for the Methods property - and it should supposedly work for the Reserved3 field as well - I AssUMe - since its also a Memo field. But, of course, I could be wrong about that.
I didn't know about Automation of Form Designer access, but, could have guessed it was possible. I'm guessing that this lcMethodCode var. would hold the Contents that I am trying to stuff into the Method. Is that clip of Code from the VFP online help? I only ask - since it looks like standard type of var names - that I might see come up in the VFP help file. OR - is that some of your own code. Just curious... -K- -----Original Message----- From: ProfoxTech [mailto:[email protected]] On Behalf Of Tracy Pearson Sent: Tuesday, February 12, 2013 4:27 PM To: [email protected] Subject: RE: More Screen Hacking & Custom Methods... Kurt wrote on 2013-02-12: > Hey there Richard, > > Sorry to be such a Tool - and come up with yet another related problem! > But... > > So - I take these 2 procedures - and I got them loaded into the Method code > - and I also have that Reserved3 field updated with Both of the procedure > names. And, I can even see the code in the Methods field - and it SEEMS to > look right. > > However, when I open the Screen In the Form designer - only the FIRST > Procedure comes up as a new Custom Method. The 2nd is nowhere to be seen. > > And, if for the Hell of it - I just go and add a Dummy Method via Add Method > - then I open up the screen like a DBF again - I find its re-arranged all > the Methods/Procedures in the Methods field - and the one procedure that WAS > There in the Methods code before - but, did NOT show up within the Screen > designer as a Custom Method - its now completely Gone! > > So - yet again - I am stumped... > > -K- > Kurt, Most likely, I'm referring back to something Ted pointed out, there is a character missing in the Reserved3 field. Did you know that you can automate writing the properties and methods in design time? DIMENSION laForm[1] MODIFY FORM myform NOWAIT ACTIVATE WINDOW "Form Designer -" =ASELOBJ("laForm", 1) laForm(1).AddProperty(lcPropertyName, lcPropertyValue) laForm(1).WriteMethod(lcMethodName, lcMethodCode, .T.) SYS(1500, "_MFI_SAVE", "_MFILE") SYS(1500, "_MFI_CLOSE", "_MFILE") IF WEXIST("Form Designer -") RELEASE WINDOWS "Form Designer -" ENDIF Tracy Pearson PowerChurch Software [excessive quoting removed by server] _______________________________________________ Post Messages to: [email protected] Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/7ED6645884014608B7591015FA92ABC2@Programming2 ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
