Carregando ...
Desculpe, ocorreu um erro ao carregar o conteúdo.

20885Re: RES: [hwguibr] Nome do Usuário do Windows no Xh arbour

Expandir mensagens
  • Luiz Rafael Culik
    6 de dez de 2017
      netname (.t.) ou gete ('username')

      Abraços 
      Luiz 

      Em 6 de dez de 2017 17:21, "'Valdir Cassio Rossi' valdircrossi@... [hwguibr]" <hwguibr@...> escreveu:
       

      Pessoal

       

      Alguém tem uma dica para pegar o nome do Usuário do Windows no Xharbour ou HWGUI

      Tentei via API como abaixo e não deu certo:

       

      PROC NomeUsuario()

      LOCAL cNameUser := Replicate( Chr(0),100  ), nNameSize   := 100,nResult

       

               nResult :=   DllCall(  "Kernel32.dll"         , ;  // DLL to call

                  DC_CALL_STD           , ;  // calling vonvention

                 "GetUserName"         , ;  // BOOL GetVolumeInformation(

                 @cNameUser             , ;  //   LPTSTR lpNameuserBuffer ,

                 nNameSize                )  //   DWORD nVolumeNameSize ,

       

      RETURN cNameUser


      Livre de vírus. www.avast.com.
    • Mostrar todas as 4 mensagens neste tópico