Results 1 to 6 of 6

Thread: Loginnaam windows95 achterhalen

  1. #1
    kylix 3 and delphi 6 user Viper's Avatar
    Join Date
    Apr 2002
    Posts
    511

    Loginnaam windows95 achterhalen

    Hallo allemaal !!

    Mbv. de onderstaande functie kan ik de loginname achterhalen van in ieder geval een windows2000 gebruiker.

    Code:
    function getloginname : string;
    var buf : Pchar;
        len : integer;
    begin
      buf := stralloc(255);
      try
        len := getenvironmentvariable('username',buf,255);
        if len > 0 then
          getloginname := uppercase(string(buf))
        else getloginname := '';
      finally
        strdispose(buf);
      end;
    end;
    Dat werkt perfect, maar nu heeft men hier ook nog windows95 machines. Daar werkt ie niet mee. Weet iemand hoe ik de naam van de ingelogde user kan achterhalen met windows95 als os ?

    Alvast bedankt !!

    Peter

  2. #2

  3. #3
    kylix 3 and delphi 6 user Viper's Avatar
    Join Date
    Apr 2002
    Posts
    511
    Heb ik al lang op gezocht , maar geldt dat ook voor windows 95 ?

  4. #4
    Senior Member PsychoMark's Avatar
    Join Date
    Nov 2001
    Location
    Raamsdonksveer
    Posts
    10,269
    Uit de Platform SDK:

    Requirements

    Windows NT/2000/XP: Included in Windows NT 3.1 and later.
    Windows 95/98/Me: Included in Windows 95 and later.

    ...moet dus werken
    Qui custodiet ipsos custodes

  5. #5
    Senior Member
    Join Date
    Jun 2003
    Location
    Noord-Limburg
    Posts
    533

    NetUser

    Gebruik al geruime tijd de volgende Code, werkt bij mij goed.

    Code:
      //Netwerkgebruiker opvragen
      function GetNetworkUserName : string ;
      var
        temp : PChar ;
        Ptr : DWord ;
      const
        buff = 255 ;
      begin
        ptr := BUFF ;
        temp := StrAlloc(BUFF) ;
        GetUserName(temp, ptr) ;
        Result := string(temp) ;
        StrDispose(temp) ;
      end;
    Groetjes, Peter

  6. #6
    kylix 3 and delphi 6 user Viper's Avatar
    Join Date
    Apr 2002
    Posts
    511
    Jemig zeg, dat zo'n oude thread van bijna een jaar oud weer tot leven wordt geroepen met een antwoord op die 1 jaar oude vraag... Toch leuk ??

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Replies: 3
    Last Post: 13-Mar-04, 01:51
  2. Replies: 2
    Last Post: 01-Dec-03, 12:05
  3. ADO en Windows98 of Windows95
    By labee in forum Databases
    Replies: 3
    Last Post: 27-May-02, 01:47
  4. Moeilijk: procedures achterhalen van classes
    By AndrewDynamo in forum Algemeen
    Replies: 5
    Last Post: 18-May-02, 12:58
  5. Replies: 3
    Last Post: 11-Feb-02, 21:19

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •