Sub HF_Announce V0.01 29/09/93 ============================== Extracted from Anglopean Ltd Project ref #0203.1 Public Release #0.04 *unsupported* Voice +44 71 404 2227 Anglopean Ltd is a British company specialising in information at the desktop. If you would like more information on our services, mail me, Darren Reynolds, at 100277.2270@COMPUSERVE.COM To use the routine in your own database, use Edit/Copy and Edit/Paste and paste it into one of your own modules. You will also need to copy and edit the form "Announcement". You are free to use the code for any purpose, without making a payment of any kind. However, no guarantee is made as to the performance of the code. I would be most interested to hear from anyone who does incorporate this, or any other functions by Anglopean Ltd in their code. Syntax: HF_Announce Announcement Parameters: Announcement - String. Text of the announcement you want displayed Typical Usage: ------------- A long program importing data might want to make the occasional announcement about progress. Although the various SysCmds can be very useful, Access often interferes with the status bar whilst your program is running. The routine is rather like a MsgBox - but one which does not wait for the OK button to be clicked, and allows your program to continue. The routine can also keep a log of all announcements made. This makes it particularly handy for data processing applications which can succeed or fail, as the log file can be examined later. (Search the library for "Text" to see how to incorporate the log file into a report or form). Example: ------- From the Immediate Windows, type the following: Announce "This is an announcement" Notes: ------- Alter the setting of the constant "HF_KeepLogFiles" to set whether or not the function keeps a log file. The name of the form which gets opened to display the announcement is "Announcement", and this should be edited match the style of your application. ****** Function HF_Close() V0.01 29/09/93 ================================== Syntax: =HF_Close() Parameters: None Typical Usage: ------------- Many user-defined forms will have a "Close" button. This blindingly simple function closes the active object when called. Example: ------- Create a form with a "Close" button (or see the form "Announcement"). Set the On Push property of the button to: =HF_Close() Notes: ----- This function is required for the proper functioning of "Announcement". We hope that one day Microsoft will allow any action to be carried out directly from a control property without the need for a macro or function. Best of luck with your developments! Darren Reynolds