Консультация № 59096
16.10.2006, 13:04
0.00 руб.
0 2 1
Как можно загрузить любые фалы (не только текстовые, но и видео, аудио и исполняемые, но в знаковой форме) в Memo?

Обсуждение

Неизвестный
16.10.2006, 13:13
общий
это ответ
Здравствуйте, Томша Павел!
Очень просто, но вы увидите только отображаемые знаки с ASCII кодом<32
memo1.list.loadFromFile(имя файла);
Если Вам не обязательно видеть, а только обрабатывать то лучше воспользоваться потоком - см. приложение

Приложение:
var M:TMemoryStream; b: Любой тип (Char, Byte); M:=TMemoryStream.create; M.LoadFromFile(Имя файла); M.Read(b, Sizeof(b)); M.Free;
Неизвестный
16.10.2006, 17:14
общий
Отображаемые символы, конечно, ASCII кодом >= 32 (код 32 - пробел), но поток действительно лучше. А еще лучше для совсем произвольных двоичных файлов, конечно, Hex-редактор написать. Или поискать готовый с исходниками на Delphi. Наверное, где-дь есть.
Форма ответа