Create a temporary file name in Windows Temp Area

create a temporary file name in Windows Temp area

{*************************************** * ************* <Br/> function skugettempfilename (prefix: string): string; <br/> creates a temporary file name with the given prefix. the <br/> Windows Temporary Folder name is used as the path of <br/> the temporary file. <br/> Note: only the first three characters of the prefix are used. <br/> example: tempfile: = skugettempfilename ('fts '); <br/> ************************************ * *****************} <br/> function skugettempfilename (prefix: string): string; <br/> var <br/> temppath, tempfile: string; <br/> begin <br/> setlength (temppath, max_path ); <br/> gettemppath (max_path, pchar (temppath); <br/> setlength (tempfile, max_path); <br/> gettempfilename (pchar (temppath ), pchar (prefix), 0, pchar (tempfile); <br/> setlength (tempfile, strlen (pchar (tempfile); <br/> result: = tempfile; <br/> end; <br/>