Name | Modified | Size | Downloads / Week |
---|---|---|---|
Parent folder | |||
inc_builder.dpr | 2023-03-31 | 1.3 kB | |
Totals: 1 Item | 1.3 kB | 0 |
Программа предназначена для перевода любого файла в массив байтов в формате Delphi/Pascal В дальнейшем такой файл/массив использую для сохранения исходного кода программы в теле исполняемого файла программы. использование: inc_builder.exe <some_file> результат: файл "inc.inc" (при запуске программы без параметров извлекается архив исходника inc_builder_src.rar) 1. контекстное меню Windows на скомпилированной программе предлагает только заархивировать её (смотри instruction.png) 2. добавляю исходный код программы в архив 3. при архивации использую пароль, если требуется 4. полученный архив перетаскиваю на ехе-шник inc_builder и в результате получаю файл inc.inc 5. содержимое файла inc.inc 6. включаю файл inc.inc в исходный код программы, для того чтобы Delphi обязательно скомпилировал массив использую вывод одного байта хоть куда, лишь бы Delphi не удалил массив как незадействованный … var {$INCLUDE inc.inc} begin PostMessage(0,SrcData[0],0,0); … 7. в контекстном меню Windows на скомпилированной программе появляется пункт просмотра архива =============================================================================== Google translate Eng The program is designed to convert any file into an array of bytes in Delphi / Pascal format In the future, such a file/array is used to save the source code of the program in the body of the program's executable file. usage: inc_builder.exe <some_file> result: "inc.inc" file (when you run the program without parameters, the source archive inc_builder_src.rar is extracted) 1. Windows context menu on a compiled program only offers to archive it (see instruction.png) 2. I add the source code of the program to the archive 3. I use a password when archiving, if required 4. I drag the resulting archive onto the inc_builder exe-shnik and as a result I get the inc.inc file 5. contents of the inc.inc file 6. I include the inc.inc file in the source code of the program so that Delphi will surely compile the array I use the output of one byte anywhere, so long as Delphi does not delete the array as unused … var {$INCLUDE inc.inc} begin PostMessage(0,SrcData[0],0,0); … 7. in the context menu of Windows on the compiled program, the item for viewing the archive appears