How I can get the path of the programs folder?

Forest Dreams · Post by **Forest Dreams** » Wed Jan 26, 2005 11:28 am

(Ignorence spilling out all over me here )

Do you mean ignorance? :roll:

El_Choni · Post by **El_Choni** » Wed Jan 26, 2005 11:31 am

Yep, nice code, GPI.

I guess I'm a Randy-kind of programmer: the less lines, the better...

Randy Walker · Post by **Randy Walker** » Wed Jan 26, 2005 11:40 am

gnozal wrote: English is a foreign language for most people in the world

English is a foreign language here too. I think only the British speak English. Nobody really know what language we speak over here.

Randy Walker · Post by **Randy Walker** » Wed Jan 26, 2005 11:44 am

Forest Dreams wrote:
(Ignorence spilling out all over me here )
Do you mean ignorance? :roll:

Its my ingorence and I'll spill it however I like

... and get it all over me too if I want... and sometines when I don't want.

Randy Walker · Post by **Randy Walker** » Wed Jan 26, 2005 11:45 am

El_Choni wrote:Yep, nice code, GPI.

I guess I'm a Randy-kind of programmer: the less lines, the better...

STOP CALLING ME PROGRAMMER

Post by **Fred** » Wed Jan 26, 2005 12:52 pm

Armoured · Post by **Armoured** » Wed Jan 26, 2005 2:31 pm

Hi

Thanks for all your help

PEACE AND LOVE!

Armoured · Post by **Armoured** » Wed Jan 26, 2005 2:41 pm

P.S.
I'm ITALIAN

Armoured · Post by **Armoured** » Wed Jan 26, 2005 3:07 pm

Procedure.s ExpandEnv (env$)
sizerequired = ExpandEnvironmentStrings_ (env$, dest$, 0)
If (sizerequired)
dest$ = Space (sizerequired)
result = ExpandEnvironmentStrings_ (env$, dest$, 159)
EndIf
ProcedureReturn dest$
EndProcedure

Debug "%SystemDrive%: "+ExpandEnv ("%SystemDrive%")
Debug "%SystemRoot%: "+ExpandEnv ("%Systemroot%")
Debug "%OS%: "+ExpandEnv ("%OS%")
Debug "%Temp%: "+ExpandEnv ("%Temp%")
Debug "%HomePath%: "+ExpandEnv ("%HomePath%")
Debug "%Path%: "+ExpandEnv ("%Path%")
Debug "%Programfiles%: "+ExpandEnv ("%Programfiles%")

Bonne_den_kule · Post by **Bonne_den_kule** » Wed Jan 26, 2005 3:58 pm

GPI · Post by **GPI** » Wed Jan 26, 2005 4:00 pm

path is empty. BTW: does this work with 9x/2000?

Armoured · Post by **Armoured** » Wed Jan 26, 2005 4:22 pm

Hi
In my system WindowsXP Pro path isn't empty.
I don't know if it works on 9.x

Paul · Post by **Paul** » Wed Jan 26, 2005 4:35 pm

Would this not work for you ??

Code: Select all

#CSIDL_BITBUCKET=$30
#CSIDL_DESKTOP=$10
#CSIDL_FAVORITES=$06
#CSIDL_FONTS=$14
#CSIDL_HISTORY=$22
#CSIDL_MYPICTURES=$27
#CSIDL_PROGRAM_FILES=$26
#CSIDL_STARTMENU=$0B
#CSIDL_SYSTEM=$25
#CSIDL_WINDOWS=$24

buffer.l=0
folder.s=Space(255)
SHGetSpecialFolderLocation_(0, #CSIDL_PROGRAM_FILES, @buffer)
SHGetPathFromIDList_(buffer, @folder)


MessageRequester("Program Files",folder,0)

Enjoy!

Armoured · Post by **Armoured** » Wed Jan 26, 2005 6:36 pm

Hi
Thanks again.

P.S.
Paul thanks for your "PureVisionXP" I'm an happy user of your program.

Shannara · Post by **Shannara** » Thu Jan 27, 2005 4:41 am

gnozal wrote:
Randy Walker wrote:Who'd of thought anyone would install Windows in some foreign language?
English is a foreign language for most people in the world

That is actually true, English is not the most popular language, it is #3, with American as #2, and Spanish as #1

PureBasic Forums - English

How I can get the path of the programs folder?

Re: How I can get the path of the programs folder?

Re: How I can get the path of the programs folder?