Запись в двоичных файлах в Delphi

Question

Я делаю программу в delphi, которая записывает данные в двоичный файл, и у меня есть проблема, я не понимаю, как ее решить.

У меня есть следующий код:

testar: = TFileStream.Create ('test.exe', fmOpenWrite); 
testar.Position: = testar.Size; 

here: = '{test} test {test}'; 

testar.Write (here, 1024); 

Испытано с WinHex

http://img836.imageshack.us/img836/3206/la49.jpg

Это издание мелкие принты в двоичном коде, потому что, когда я вижу его с WinHex выглядит хорошо, но это другое код:

testar: = TFileStream.Create ('test.exe', fmOpenWrite); 
testar.Position: = testar.Size; 

here: = '{test}' + Edit1.Text + '{test}'; 

testar.Write (here, 1024); 

Это не показывает вообще-то, потому что кажется, что есть проблема с редактированием, когда вы хотите отредактировать двоичный код, это странно, потому что когда я использую его, все идет одинарные кавычки, но с примером редактирования не работает.

Примечание: Программа не дает никаких сообщений об ошибках

Кто-то может помочь мне с этой проблемой?

Answer 1

Вы предоставили нереальный код, но я подозреваю, что «здесь» является строкой. Чтобы написать струнный тело в поток, вы можете использовать следующий код:

test.Write(PChar(here)^, SizeOf(Char) * Length(here)); 

P.S. Если вы собираетесь читать эту строку из потока (файла) позже, тогда было бы разумно написать ее длину перед строкой строки.