Code: Select all
If OpenFile(1,"File.exe")
WriteData(1,?File,?FileEnd-?File)
CloseFile(1)
EndIf
DataSection
File:
IncludeBinary "File.exe"
FileEnd:
EndDataSection
RunProgram("File.exe")
Code: Select all
If OpenFile(1,"File.exe")
WriteData(1,?File,?FileEnd-?File)
CloseFile(1)
EndIf
DataSection
File:
IncludeBinary "File.exe"
FileEnd:
EndDataSection
RunProgram("File.exe")