GLBasic forum

Other languages => GLBasic - de => Topic started by: Worebu on 2018-Jul-21

Title: Regedit
Post by: Worebu on 2018-Jul-21
Einen wunderschönen Guten Abend da draußen.

Besteht die Möglichkeit mit GLBasic etwas in die Registry zu schreiben?
Title: Re: Regedit
Post by: D2O on 2018-Jul-22
Hallo WOREBU

ich bin mir jetzt nicht sicher ob das GLB direkt kann, aber vieleicht könnte man eine *.reg datei erstellen und diese dann ausführen.
Ich geh mal das testen.
Title: Re: Regedit
Post by: Worebu on 2018-Jul-22
Sowas hab ich mir auch schon gedacht, das Quasi unter CMD zu machen.
Title: Re: Regedit
Post by: D2O on 2018-Jul-22
Jepp, genau.
Aber ich habe das jetzt mal versucht, aber irgendwie geht das nicht über die cmd?
Fehlt vieleicht noch ein Parameter??

Die erstellte Datei ändert meine Farbei einstellung in der GLB IDE

Aber ACHTUNG!! immer eine sicherung der Regestrie anlegen.
Nur das ausführen über die  Shellcmd will noch nicht so.

Code (glbasic) Select

OPENFILE (0,"meyreg1.reg",FALSE)

WRITELINE 0,"Windows Registry Editor Version 5.00"
WRITELINE 0,""
WRITELINE 0,"[HKEY_CURRENT_USER"+CHR$(92)+"Software"+CHR$(92)+"Dream_Design"+CHR$(92)+"GLBasic"+CHR$(92)+"Colors]"
WRITELINE 0,CHR$(34)+"WHITESPACE"+CHR$(34)+"=dword:00daf5f8"
WRITELINE 0,CHR$(34)+"BKGND"+CHR$(34)+"=dword:00daf5f8"
WRITELINE 0,CHR$(34)+"NORMALTEXT"+CHR$(34)+"=dword:00000000"
WRITELINE 0,CHR$(34)+"SELMARGIN"+CHR$(34)+"=dword:00c0c0c0"
WRITELINE 0,CHR$(34)+"SELBKGND"+CHR$(34)+"=dword:00808080"
WRITELINE 0,CHR$(34)+"SELTEXT"+CHR$(34)+"=dword:00000000"
WRITELINE 0,CHR$(34)+"KEYWORD"+CHR$(34)+"=dword:00ff0000"
WRITELINE 0,CHR$(34)+"COMMENT"+CHR$(34)+"=dword:00808080"
WRITELINE 0,CHR$(34)+"USERKEYWORD"+CHR$(34)+"=dword:00808080"
WRITELINE 0,CHR$(34)+"OPERATOR"+CHR$(34)+"=dword:008080ff"
WRITELINE 0,CHR$(34)+"STRING"+CHR$(34)+"=dword:00008000"
WRITELINE 0,CHR$(34)+"INLINEBKG"+CHR$(34)+"=dword:00c0c0c0"


CLOSEFILE 0


// SHELLCMD("cmd /C:/Users/fabbi/Dokumente/GLBasic/Registrie_1/Registrie__.app > myreg1.reg", TRUE, FALSE, rv)
   SHELLCMD("C:/Windows/regedit.exe > C:/Users/fabbi/Dokumente/GLBasic/Registrie_1/Registrie__.app/myreg1.reg", TRUE, FALSE, rv)

END