Jim,
These are the two routines I use. The dll declare only needs to be done once
in your main program obviously and I use this because certain printer
drivers call divide by zero errors by not resetting the floating point
routines on exit.
* Use the Fix Below to stop Divide by 0 errors
declare _fpreset in msvcrt20.dll
=_fpreset() && after print instructions
*********************
* Set up Environment
*
Function SetEnv(pWhen)
*#define DODEBUG .T.
Local cOld_Alias
* We need to do this as sometimes
* the set date british changes the alias() name!!!
cOld_Alias=Alias()
=_FPReset()
on shutdown do Do_Shutdown
Set Exact Off
Set Ansi Off
=Sys(3055,500) && SQL For Complexity
Set Reprocess To 10
set console off
set near off
set exclusive off
set talk off
set safety off
set deleted on
Set Refresh To 5
****
* These Commands cause an Int 10 Error
* if used with certain printers if you don't use the _fpreset before
* them
*
_fpreset()
* This instruction SOMETIMES changes the current alias
* hence the setup at the start of the routine
set date british
_fpreset()
set currency to "£"
_fpreset()
set century on
* End of special commands
****
Set Fixed off
Set Decimals To 8
* Only VFP version 7+
If Version(5)>=700
* Set Strict Dates off
set strictdate to 0
endif
If Version(5)>=800
Set Refresh To 1,1
* set EngineBehavior 70
=SYS(3099,70) && Enginebehaviour to V7
* _Screen Themes
=Sys(2700,1) && Themes Support off
set tablevalidate to 0
*
Endif
If Version(5)>=900
Set ReportBehavior 80
EndIf
set status bar off
set memowidth to 80
*
* Reset the Alias
SelectAlias(cOld_Alias)
*
Return .T.
*
endFunc
Dave Crozier
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf
Of Jim Harvey
Sent: 09 June 2008 14:30
To: 'ProFox Email List'
Subject: Form settings in Load
These are the settings in the load of most of my forms that I began using
years ago when I went from DOS to VFP5.
Now, most forms use buffering set to 5 on the tables in the load, =
cursorsetprop("Buffering",5,"STALLIONS"), some are set to 3.
We have about 20 users, and everything seems to work fairly well, most of
the time.
How out of date are these settings, and what's a better way to set this up,
or since nothing is "broke" should I not "fix it"...
set century on
set talk off
set refresh to 0,0
set reprocess to 1
set safety off
set exclusive off
set deleted on
set multilocks on
set status bar off
set escape on
on escape
on error do ERRTRAP with error()
James E Harvey
Hanover Shoe Farms, Inc.
M.I.S./Corresponding Officer
Off: 717-637-8931
fax: 717-637-6766
email: [EMAIL PROTECTED]
[excessive quoting removed by server]
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED]
** 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.
