[Kylix]Gebruikers home-dir?

[NaliXL]

Okee, ik zit met het volgende probleempje. De kylix-handleiding geeft niet echt duidelijkheid op dit gebied, en ook via GOT/Google heb ik hier niet veel over kunnen vinden : hoe vind je met Kylix de home-dir van de huidige gebruiker terug?

Ik wil nl. in de homedir van de huidige gebruiker een verborgen dir met settings etc. aanmaken, zoals bijvoorbeeld de Gimp dat doet. Maar helaas, stukjes code als dit :

Delphi:

                if (NOT DirectoryExists('$HOME/.hexie-ed')) then CreateDir('$HOME/.hexie-ed');
                if (FileExists('$HOME/.hexie-ed/filebuffer')) then DeleteFile('$HOME/.hexie-ed/filebuffer');

werken voor geen meter, en ook het vervangen van "$HOME" door "~" lijkt niet te werken .

[GraveR]

Ik weet niet in hoeverre deze C-code te porten is naar Kylix, maar het is in ieder geval een manier om je gegevens te achterhalen. Dingen als $HOME zijn environment-variabelen in de/een shell, ik weet niet of ze ook bereikbaar zijn vanuit Kylix.

code:

#include <sys/types.h>
#include <pwd.h>
#include <stdio.h>

int main ( void ) {
    struct passwd *myent;   
    
    myent = getpwnam((char *)getlogin());
    endpwent();
    
    if (myent != NULL) {
        printf("Username\t\t: %s\n",myent->pw_name);
        printf("Password\t\t: %s\n",myent->pw_passwd);
        printf("User ID\t\t\t: %d\n",myent->pw_uid);
        printf("Group ID\t\t: %d\n",myent->pw_gid);
        printf("Login Info\t\t: %s\n",myent->pw_gecos);
        printf("Home\t\t\t: %s\n",myent->pw_dir);
        printf("Shell\t\t\t: %s\n",myent->pw_shell);    
    } else {
        printf("It failed...\n");   
    }
}

Geeft als output:

code:

Username                : graver
Password                : *
User ID                 : 1001
Group ID                : 1001
Login Info              : Frits Letteboer
Home                    : /home/graver
Shell                   : /usr/local/bin/bash

[Creepy]

En kijk anders eens naar de GetEnvironmentVariable functie

[NaliXL]

Creepy, dat was 'm inderdaad. Bedankt. Die is niet makkelijk te vinden zeg