Hag,
please move your program into a c:\users\cUsername folder.
And it works fine!
Bye
Marco
Marco Boschi
info@marcoboschi.it
info@marcoboschi.it
Hag,
please move your program into a c:\users\cUsername folder.
And it works fine!
Bye
Marco
it crashes except when it's opened as an administrator
The program is an over the counter program sold via net world wide. Each user has their own issue re rights. We can't be held responsible of each user.
would it be appropriate to detect win 7 and give them a message to open as an administrator?
would it be appropriate to detect win 7 and give them a message to open as an administrator?
Stefan
The first item u suggest won't work. Too many users.
Iill give the second item (set default) a try.
GLOBAL cHomeDir := "", cInstallDir := "" // Datenverzeichnis, Installationsverzeichis
PROCEDURE Main (cPath)
DEFAULT cPath := ""
cPath := CharRem ("-/", cPath)
IF IsWin98() .or. Upper (cPath) == "HOME"// .or. IsWinME ()
cInstallDir := cFilePath (GetModuleFileName () )
cHomeDir := cInstallDir
ELSE
cInstallDir := cFilePath (GetModuleFileName () )
#IFDEF Demo // Demo wird im eigenen Nutzerverzeichnis erstellt
cUserDir := GetEnv ("UserProfile")+"\Eigene Dateien\"
#ELSE
cUserDir := "c:\ProgramData" //GetEnv ("AllUsersProfile")+"\Dokumente\"
#ENDIF
cHomeDir := cUserDir+"Wintyre\"
ENDIF
SET DEFAULT TO (cHomeDir)
IniFile := Set (_SET_DEFAULT)+"Wt32.ini"
SetErrorLog (cHomeDir+"Error.log") // Errorlog ins Datenverzeichnis schreiben
SET HELPFILE TO cInstallDir+"\Wintyre.chm" // Hilfedatei
cHandbuch := cInstallDir+"\WIntyre.pdf" // Handbuchdatei