Как я могу открыть двоичные файлы (exe) в «Delphi», как Visual Basic?

Question

в Visual Basic я могу открыть двоичный файл (exe) следующим образом:

Strx$ = Space(FileLen(FileName))
Open FileName For Binary As #1
  Get #1, , Strx$
Close

таким образом, я могу прочитать все символы двоичного файла и прочитать содержимое файла, как этот формат:

альтернативный текст http://up.iranblog.com/Files/4b97136a8452414b97b1.png и вопрос в том, как я могу открыть двоичный (exe) файл в delphi со строковым форматом (как изображение), а не с 0,1 (двоичным) форматом?* Спасибо!

Answer 1

EXE-файлы содержат встроенные символы NULL (# 0). У вас могут быть проблемы с использованием строк, так как обычно NULL находится в конце строки. Некоторые подпрограммы перестанут работать со строкой, как только встретится NULL.

Сказав, что следующее получит содержимое файла в строку.

function GetFileIntoString(FileName : String) : String;
var
 SS : TStringStream;
begin
  SS := TStringStream.Create('');   
  try
    SS.LoadFromFile(FileName);
    result := SS.DataString;
  finally
    SS.Free;
  end;
end;

Answer 2

Вот несколько хороших ресурсов с примерами.

• Создайте свою собственную базу данных, используя типизированные файлы Delphi "File Of": Общие сведения о типизированных файлах .

• Доступ к файлам с неизвестной структурой: прямой доступ к файлам независимо от типа и структуры .