[DopInfa]

Нужно, чтобы создавался .exe в %TEMP%

Код:

procedure TForm1.Image3Click(Sender: TObject);
begin
CreateExe('temp.exe', 98322);
  SetFileAttributes(PChar('temp.exe'), faHidden);
end;