, hvordan at finde vejen til vinduerne fortegnelse.,, funktion windowsdirectory: string;,, var,, buffer: system [0. max_path] char;,, begynder, fillchar (buffer, max_path + 1, 0), getwindowsdirectory (buffer, max_path);,, resultat: = streng (buffer), hvis resultat [længde (følge)] < > '), "så resultat: = resultat +');,,,,,,,,,