base64 в delphi 2009

[Serge_Bliznykov]

И что же делать, если размер файла не чётен?

Это Вы к чему? При чём здесь размер файла?
Если размер файла в байтах нечетён, значит содержимое файла представлено нечётным числом байт. Или Вы о чём?!

И после этого мы удивляемся, почему получаются дракозябры.

Где появляются?

Строка - это не массив байт. Это массив символов.

Вы не правы. Строка - это массив байт в ЛЮБОМ случае. Просто в случае ANSIString каждый байт представляет один символ строки, а в случае WideString - каждый символ строки представлен двумя байтами. От этого строка не перестаёт быть массивом...

p.s. GunSmoker, Вы уж извините меня, но, честное слово, я не могу понять, ЧТО именно Вы пытаетесь тут нам объяснить (или доказать)... К сожалению, думаю, что тема давным-давно скатилась в оффтоп... Прошу не обижаться, если я в очередной раз просто промолчу...

[GunSmoker]

Сообщение от Serge_Bliznykov

Это Вы к чему? При чём здесь размер файла?
Если размер файла в байтах нечетён, значит содержимое файла представлено нечётным числом байт. Или Вы о чём?!

И как же нечётный размер байтов файла предлагается запихать в чётный размер байтов unicode-строки?

Это к вот этому, а не вам:

Элементарно. строка это массив байт. Файл это массив байт. Массив поместить в массив труда не составит.

Сообщение от Serge_Bliznykov

Строка - это массив байт в ЛЮБОМ случае

Окей, и в чём же сокровенный смысл трактования unicode-строки как массива байт?

Сообщение от Serge_Bliznykov

Вы уж извините меня, но, честное слово, я не могу понять, ЧТО именно Вы пытаетесь тут нам объяснить (или доказать)...

Я ничего не пытаюсь доказать. Это вы влезли и начали что-то доказывать. Я лишь высказал простую мысль: что человек, который пишет:

var
  BinaryFile: String;
begin
  BinaryFile := GetFileFromTextView(EncodedFile);

Где GetFileFromTextView - совершенно любая функция, получающая контент файла по его закодированному представлению. Так вот этот человек имеет серьёзные пробелы в вопросах кодировок и текстового/двоичного представления информации. Кои пробелы и предлагается устранять, позыв к чему я и высказал своей первой репликой в этой теме.

Это я всё про вот это, если ещё непонятно:

text := _decoder.DecodeString(text);

[Stilet]

И что же делать, если размер файла не чётен?

Сделать размер строки нечетным.

Строка - это не массив байт.

Улыбнул )))) Символ это не байт да? (Я не говорю о юникоде. Хотя и там все просто)

в чётный размер байтов unicode-строки?

Что ты за юникод схватился? Будто ANSI уже отменили.

Вообще согласен, пошло тролление. Так что тему закрываю.