El código no es muy complejo, se limita a usar la función GetEnvironmentVariable. Esta función nos devuelve el valor de una variable de entorno, pasándole como parámetros el nombre de la variable, un buffer donde almacenar el valor y la longitud del buffer (en caracteres).
Primero llamamos a la función indicándole que la longitud del buffer es cero, de esta forma nos devuelve la longitud (en caracteres) de valor. Entonces usamos GetMem para reservar tantos bytes en memoria como longitud tiene el valor mas uno (por el carácter nulo). Entonces volvemos a llamar a la función con los parámetros correctos. Por ultimo ya solo nos queda liberar la memoria que habíamos reservado utilizando FreeMem.
|