procedure
TForm1
.
Image3Click(Sender: TObject);
begin
CreateExe(
'temp.exe'
,
98322
);
SetFileAttributes(
PChar
(
), faHidden);
end
;
Сайт
Форум
FAQ
Соглашения
Прочее