size : 358 uploaded_on : Fri Jan 15 00:00:00 1999 modified_on : Wed Dec 8 14:03:32 1999 title : Get temp file name org_filename : GetTempFileName.txt author : Gerd Kayser authoremail : Gerd.Kayser@Okay.Net description : How to get an unique temp file and it's name keywords : tested : not tested yet submitted_by : The CKB Crew submitted_by_email : ckb@netalive.org uploaded_by : nobody modified_by : nobody owner : nobody lang : plain file-type : text/plain category : delphi-filehandling __END_OF_HEADER__ procedure TForm1.Button1Click(Sender: TObject); var TempName : Array [0..255] of Char; Dummy : Integer; begin // Prefix is "XXX" Dummy := GetTempFileName('c:\temp', 'XXX', 0, TempName); Label1.Caption := IntToHex(Dummy, 4); Label2.Caption := TempName; DeleteFile(TempName); // the file will be created by GetTempFileName end;