zizzo81 / bin2inc Goto Github PK

A Delphi binary file to .inc file tool with full source code.

This tool takes as input any file, reads it binary and creates a include file with constants arrays containing the file contents.

Simply run the bin2inc tool from command line and specify the parameters you want to personalizze your output file.

You can include a .inc file almost anywhere in a .pas file putting a $I compiler directive as long as the code doesn't break, for example you could include it under your interface or implementation section like this.

...
implementation

uses
  SysUtils;

{$I 'bin\test.inc'}
...

Or also, include this inside a function like this.

...
procedure GenerateOutputFile;
{$I 'bin\test.inc'}
var
  I: Integer;
  S: String;
begin
...

You can access the constant as you wish, but you can move it back to a memory stream for example in this way:

var MStream := TMemoryStream.Create;
MStream.Write(BIN_FILE_BIN[0], SizeOf(BIN_FILE_BIN));

Firstly build (but don't run) Bin2Inc.dpr "bin" folder, then execute:

bin2inc -i:commedia.txt -o:test.inc -y

Now, build IncTest.dpr in the "bin" folder too and just run it from the folder, it will compare content of original file with that in the include file.