Fórum Retornar versão do Windows #398785
07/04/2011
0
estou precisando de uma função que retorne para mim a versão do windows que está rodando...
a função precisa retonar o seguinte:
Windows 98
Windows XP
Windows 2003 Server
Windows Seven
Obrigado,
Fábio C. Hansen
Fábio Hansen
Curtir tópico
+ 0Posts
07/04/2011
Dirceu Morais
dê uma olhada neste artigo http://www.planetadelphi.com.br/artigo/50/verificando-a-versao-do-windows talvez de ajude.
Atenciosamente,
Dirceu Morais
Gostei + 0
07/04/2011
Fábio Hansen
obrigado, resolveu meu problema, muito obrigado
agora estou com outra duvida:
preciso retornar o(s) grupos que um usuario pertence, tem alguma função para isto??
Obrigado
Fábio C. Hansen
Gostei + 0
07/04/2011
Dirceu Morais
http://www.activedelphi.com.br/forum/viewtopic.php?t=28557&sid=df5232c32484627ee66f6ca5618b8585 que pega o usuário logado.
//Para Capturar o usuário Logado no Windows Function GetNetUserName: string; Var NetUserNameLength: DWord; Begin NetUserNameLength:=50; SetLength(Result, NetUserNameLength); GetUserName(pChar(Result),NetUserNameLength); SetLength(Result, StrLen(pChar(Result))); End;
Vê se é isso que vc precisa.
Gostei + 0
07/04/2011
Fábio Hansen
Olá, obrigado pela resposta
O nome do usuario já consigo pegar, mas preciso também retornar a qual grupo esse usuario pertence.
Obrigado
Fábio C. Hansen
Gostei + 0
07/04/2011
Dirceu Morais
Tem também este artigo
(Como descobrir se um usuário do Windows pertence ao grupo especificado?)Em http://pt.w3support.net/index.php?db=so&id=282740.
Espero ter ajudado.
Dirceu Morais
Gostei + 0
07/04/2011
Fábio Hansen
resolveu meu problema
Muito obrigado mais uma vez...
Fábio C. Hansen
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)