Foxpro Graphs

One of my FoxPro project is to make a graph and show it in one of the form. At first I had a hard time making a graph. But after researching and doing some testing on forms, I finally made it.

Close Buttons

 

Different FoxPro Close Buttons

FoxPro Menu

Sample FoxPro Menu for the following:

Menu Processing Utility
Menu Tools
Menu Report
Menu Module
Menu Database

Local Area Network Database for FoxPro

Local Area Network Database for FoxPro

System Requirements for LAN Database for FoxPro:
Pentium 4 processor or higher
Minimum of 512MB of RAM
Minimum of 80 Gb of Hard disk
Minimum of Windows XP
Should be a member of Company Domain
With ‘LANDatabase’ Map Network Drive (Z:)

How to Install LAN Database for FoxPro:
Copy the System Folder and paste it to the Drive C
Install the VFP9SPORT
Make sure that the ‘LANDatabase’ Map Network Drive is available (Z:)
Make a desktop shortcut of the cfd Application and rename it as ‘LANDatabase’

FoxPro Buttons

Sample FoxPro Buttons for the following:

Logout

Close

Edit

New

Print

Delete Code

This is delete code where you can delete a line or specific data from the table one at a time.

SELECT TableName

LOCATE FOR ALLTRIM(TableName.Allottee) = ALLTRIM(THISFORM.Text1.Value)

IF FOUND()

IF ALLTRIM(TableName.Allottee) = ALLTRIM(THISFORM.Text1.Value)

SELECT TableName

LOCATE FOR Allottee = ALLTRIM(THISFORM.Text1.Value)

SELECT TableName

USE

USE Allotments EXCLU

DELETE

PACK

=TABLEUPDATE(.T.)

ENDIF

ENDIF

Tag Code

Here is a sample of my tag code or tagging an amount .

lAnswer = MESSAGEBOX("Do you want to tag Journal Entry?", 4, "Confirmation")
IF lAnswer = 6
SELECT SviewJournalUpdate
LOCATE FOR IdNum = THISFORM.Text2.Value
IF FOUND()
REPLACE lDate WITH pJeDate
REPLACE RefDocu WITH pRefDocu
REPLACE JvNumber WITH THISFORM.TEXT10.Value
REPLACE LibUpdate WITH THISFORM.TEXT15.Value
THISFORM.Grid1.REFRESH
ENDIF
THISFORM.ActivityTag()
THISFORM.Release()
ENDIF