Brett Barabash
BBarabash at TappeConstruction.com
Wed Dec 8 16:10:12 CST 2004
Andy, Screen.ActiveForm can be really picky, and I try to avoid using it if possible. Can you call it instead using the following syntax: =SetCaption([Form],"x") I would try placing this in the On Load event. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, December 07, 2004 4:59 AM To: Dba Subject: [AccessD] Set form's Caption without code Ok, here's the thing. I want to make a few forms lightweight which currently have just a line or two in modules. A few have nothing more than a line which dynamically sets the form's caption. So I wrote a little function like this: Function SetCaption(frm As Form, strCaption As String) frm.Caption = strCaption End Function and then changed my form's OnOpen from being an Event Procedure to : =SetCaption([Screen].[ActiveForm],"x") (The "x" is just for testing. The real call would have something a bit more dynamic, like the result of a function call.) The thing is that it errors because it can't resolve [Screen].[ActiveForm] at that point. Ok, methinks, I'll move the call. But I can't find where to put it. All of the following fail: On Load On GotFocus of the first control On Current The only success I've had is putting a timer interval of 5 and putting the call in OnTimer, but I don't like that much as you can imagine. If I force a call to it once the form's up then there's no problem (eg a command button), but that's not a lot of use to me either. So I know the function is fine, but has anyone got an answer as to where I might get this to run from? -- Andy Lacey http://www.minstersystems.co.uk -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software.