Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Help App Window
Message
From
15/12/2001 12:25:03
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
 
To
15/12/2001 11:32:52
John Marrone
Bloodstock Research Inc.
Lexington, Kentucky, United States
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Miscellaneous
Thread ID:
00594801
Message ID:
00594812
Views:
21
>Hi
> I have been working with vfp for about 3 weeks now. I love how easy it is
>to get at your data and work with it. But the UI is killing me. Here is what
>I want:
>
>1. Foxpro window to disappear. I do not want my users to know anything about
> vfp. As far as thier concern it is just an exe the are running. So I don't
> want vfp to show itself.
> A. If I set SCREEN=OFF in the config file everything disappears. VFP as
> well as my form.

There are 2 types of windows - MDI and SDI (development environment is MDI). For MDI forms (ShowWindow=In top level) you need to have main fox window. For them however you could do many things like :
-Set caption to your caption : _screen.Caption = 'My Application'
-Set Icon to your icon : _Screen.icon 'iconpath'
-Set titlebar off : _Screen.Titlebar = 0
-Set menu off : Set sysmenu off
-Set status bar off
etc. _screen is main fox window and could be managed like any other window (form).

For SDI (ShowWindow=As top level), you could do _screen = off in config.fpw but be sure you have show() fo the form called (Practically in init of every top level form - this.Show)



>
>2. I want to be able to use my own menu. I have created a menu and I code a
> DO mainmenu.mpr right before I open my window with a DO FORM mainform.scx.
> I push _MSYSMENU at the very start. When I do see my form by deleting
> the _SCREEN=OFF, I have no menu.
>



Needs _screen.visible=.t. or Screen=on (default) in config.fpw. But you could also make that in SDI. See in solution.app.


>3. When I go to quit it turns into a nitemare.


Be sure you have a 'clear events' in your exit routine.


>
> I have bought 3 books. And they have explain VFP piece by piece. But none
>of them give you a clue on what it takes to turn VFP off put up your main
>window and menu, and god forbid I still have to put up the toolbar. I suppose
>all of this is easy if you know how. If I could just get VFP to the point where
>I have VFP hiden my main window up with a menu I would proably go out and
>get drunk, and I have never been drunk in my life. I am really desperate.
>I have program in 2 or 3 different languages over the last 15 years but VFP
>is getting the best of me. Please If you can help, do. Here is the code of
>my main program.
>
>* This is the main start up file - mc2.prg
>* Aurther: John Marrone Jr
>* Date: Dec 15, 2001
>* Langauge: VFP 7.0
>* Note: Wish me luck
>****************************************************************************
>* This will not be geared towards oop type project. It will be more
>* procedure since it is a simple horse race handicapping program.
>****************************************************************************
>
>
>
>
>SET TALK OFF
>SET EXACT OFF
>
>
>
>* Set path...
>SET PATH TO Graphics; Libs; Progs; HTML; HELP; MENUS; FORMS; DATA; Downloads
>
>* Set onshutdown, this will be called anytime the program trys to quit..
>ON SHUTDOWN DO FinalCleanUp
>
>PUSH MENU _MSYSMENU
>
>DO mainmenu.mpr
>
>DO FORM frmMain.scx
>
>READ EVENTS
>
>ON SHUTDOWN
>
>
>Procedure FinalCleanUp
>LPARAMETERS LPARAMETER
>
>LOCAL nChoice AS INTEGER
>
>nChoice = MESSAGEBOX('Quit Multicaps?', 36, 'Confirm Quitting')
>
>DO CASE
> CASE nChoice = 6 && Yes
> POP MENU _MSYSMENU
> CLEAR EVENTS
> CASE nChoice = 7 && No
> RETURN .T.
>ENDCASE
>
>RETURN .T.
>
>Hope somebody can help. Thanks

Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform