Hallo Klaus,
Startprogramm mit folgendem Inhalt:
** ------------------------------------------------------------------------- **
***************************************
** Diese SETS prüfen und gegebenenfalls löschen/ändern
SET ANSI OFF
SET BELL OFF
SET BLOCKSIZE TO 64
SET CARRY OFF
SET CENTURY ON
SET CLOCK STATUS
SET COLLATE TO „“
SET COMPATIBLE OFF
SET CONFIRM ON
SET CPDIALOG OFF
SET CURRENCY RIGHT
SET CURRENCY TO " €"
SET DATE TO GERMAN
SET DECIMALS TO 2
SET DELETED ON
SET ESCAPE OFF
SET EXACT ON
SET EXCLUSIVE OFF
SET FDOW TO 2
SET FWEEK TO 2
SET HEADINGS ON
SET HOURS TO 24
SET KEYCOMP TO WINDOWS
SET LOCK OFF
SET MARK TO „.“
SET MULTILOCKS ON
SET NEAR OFF
SET NOTIFY ON
SET NULL ON
SET NULLDISPLAY TO SPACE(1)
SET ODOMETER TO 100
SET OPTIMIZE ON
SET PALETTE OFF
SET POINT TO „,“
SET REFRESH TO 5, 1
SET REPROCESS TO AUTOMATIC
SET SAFETY OFF
SET SECONDS ON
SET SEPARATOR TO „.“
SET STRICTDATE TO 1
SET SYSFORMATS OFF
SET TALK OFF
SET UNIQUE OFF
***************************************
** Hier Hauptform aufrufen
DO FORM frmMain.scx
*’#########################################################
READ EVENTS && ###########
*’#########################################################
CLEAR ALL
CLOSE DATABASES ALL
RETURN
** ------------------------------------------------------------------------- **
Bei mir läuft i.d.R. eine Hauptform modal, ohne Screen. Dort einenen Button mit folgendem Click-Code
** ------------------------------------------------------------------------- **
#INCLUDE …FOXPRO.H
IF MESSAGEBOX(„Wollen Sie das Programm“ + CHR(13)+ „wirklich beenden?“, MB_YESNO + MB_ICONQUESTION + MB_DEFBUTTON2 + MB_SYSTEMMODAL , THISFORM.CAPTION) == IDYES
CLEAR EVENTS
THISFORM.RELEASE
ELSE
NODEFAULT
ENDIF
** ------------------------------------------------------------------------- **
Thema für FoxPro-Programme auf anderen Rechnern laufen zu lassen findest Du hier:
http://msdn.microsoft.com/de-de/library/aa903381(VS…
Eine Gute Adresse mit massig Infos findest Du hier:
http://www.dfpug.de
Ich hoffe dass Du damit klar kommts…
Gruss ms