How can I detect what OS version is running from?
How can I detect what OS version is running from?
I need to detect if the OS that my appl is running from is WINXP or olders.. etc.. This is because some of the features will be different in code but same in function for the user, you know what I mean? some older OS' has problems with some code that works at newer OS'.. and vice versa..
how to detect?
how to detect?
*lol*, hehe!
Looks like you are a noob, dagcrack. Seriously, reading the manual helps. You can also take a look at some tutorials available at http://www.reelmediaproductions.com/pb.
Greetz!
Looks like you are a noob, dagcrack. Seriously, reading the manual helps. You can also take a look at some tutorials available at http://www.reelmediaproductions.com/pb.
Greetz!
The truth is never confined to a single number - especially scientific truth!
-
- Enthusiast
- Posts: 346
- Joined: Fri Oct 10, 2003 12:42 am
- Location: Tampa,FL,USA
- Contact:
Code: Select all
Debug #PB_OS_Windows_XP
Debug OSVersion()
@degrack: Sorry for noob, of course i meant newbie or 'unexperienced user'. You're right, noob is the wrong word.
The truth is never confined to a single number - especially scientific truth!
-
- Enthusiast
- Posts: 346
- Joined: Fri Oct 10, 2003 12:42 am
- Location: Tampa,FL,USA
- Contact:
Here, mabe this will help:
Code: Select all
Procedure.l GetOSVersion()
;If this procedure retruns 1, then the os is - Windows NT3 51
;If this procedure retruns 2, then the os is - Windows 95
;If this procedure retruns 3, then the os is - Windows NT 4
;If this procedure retruns 4, then the os is - Windows 98
;If this procedure retruns 5, then the os is - Windows ME
;If this procedure retruns 6, then the os is - Windows 2000
;If this procedure retruns 7, then the os is - Windows XP
;If this procedure retruns 8, then the os is - Windows Future
If OSVersion() = #PB_OS_Windows_NT3_51
ProcedureReturn 1
ElseIf OSVersion() = #PB_OS_Windows_95
ProcedureReturn 2
ElseIf OSVersion() = #PB_OS_Windows_NT_4
ProcedureReturn 3
ElseIf OSVersion() = #PB_OS_Windows_98
ProcedureReturn 4
ElseIf OSVersion() = #PB_OS_Windows_ME
ProcedureReturn 5
ElseIf OSVersion() = #PB_OS_Windows_2000
ProcedureReturn 6
ElseIf OSVersion() = #PB_OS_Windows_XP
ProcedureReturn 7
ElseIf OSVersion() = #PB_OS_Windows_Future
ProcedureReturn 8
EndIf
EndProcedure
@ merendo
I'm not DEGCRACK, at least try to write my nick as it is as I did (emh... Ctrl C Ctrl V )
I am just new at this forum.
About PB I started a month ago I call my self a beginner at it.
Dont think that you're the best one... cause you'll end knowing you're no one. (hey I heard that phrase somewhere..)
Don't talk for the others please.
@GPI
Why you had to say badwords just for that?
Hey well I liked this forum, my name is Gus I'm 17. I have some knowladge of VB B+ B3D and now learning PB. And... I will never call my self an ace guy... and plus.. I will never say "you're a noob!!" cause that's the sad part... shows how lame you are sometimes... well anyway I gotta go, I'm busy at work so we talk later.. BTW.. I did read that part of the manual already
Hey is there any thread where you guys shows your desktops (real ones.. desks.. your job environment ? ) cause its a funny idea to know how you work.
I'm not DEGCRACK, at least try to write my nick as it is as I did (emh... Ctrl C Ctrl V )
I am just new at this forum.
About PB I started a month ago I call my self a beginner at it.
Dont think that you're the best one... cause you'll end knowing you're no one. (hey I heard that phrase somewhere..)
Don't talk for the others please.
@GPI
Why you had to say badwords just for that?
Hey well I liked this forum, my name is Gus I'm 17. I have some knowladge of VB B+ B3D and now learning PB. And... I will never call my self an ace guy... and plus.. I will never say "you're a noob!!" cause that's the sad part... shows how lame you are sometimes... well anyway I gotta go, I'm busy at work so we talk later.. BTW.. I did read that part of the manual already
Hey is there any thread where you guys shows your desktops (real ones.. desks.. your job environment ? ) cause its a funny idea to know how you work.