Здравствуйте.
Столкнулся с проблемой, вот кусок кода:
Код:
H:= BeginUpdateResource('Out.exe', False);
GetMem(Buf, Size);
AssignFile(myFile, 'file.exe');
FileMode := fmOpenRead;
Reset(myFile, 1);
BlockRead(myFile, Buf^,Size);
CloseFile(myFile);
UpdateResource(H, 'RT_RCDATA', 'file.exe', MAKEWord(LANG_NEUTRAL, SUBLANG_NEUTRAL), Buf, Size);
FreeMem(Buf);
EndUpdateResource(H, False);
lmikle: Пользуемся тегами.
У меня на борту Windows7 , Delphi10, всё работает как надо, т.е. файл 'file.exe' добавляется в ресурсы файла 'Out.exe'.
Но вот проблема что моя готовая программа с вышенаписанным куском кода , на различных компьютерах (с операционкой Windows XP, win7), непашет, т.е. файл 'Out.exe' остаётся как есть, а в текущем каталоге иногда появляется неизвестный файл RCxxx.tmp.
Никаких ошибок вроде "нехватает каких то библиотек" программа невыдаёт.