, voorlopige lijst weg, windowstemp: touw. En functies;, var, de buffer - [0]. Max_path karakter;,,,, fillchar (buffer, max_path + 1, 0); GetTempPath (max_path,,,,, de buffer);: = string (buffer);,, als resultaat (lengte) [] < > "dan de resultaten van = resultaten +"; aan het einde van,,,,,,