Помогите разобраться с кодировкой

← →
murom (2004-09-19 15:54) [0]

Уважаемые, помогите понять как преобразовать эти данные в нормальный русский текст, у меня есть следующие байты
04 1f 04 40 04 38 04 32 04 35 04 42
П р и в е т
Они обозначают как раз это слово "Привет". Не пойму что за кодировка и как преобразовать, если можно примерчик с кодом. Спасибо большое.

← →
Anatoly Podgoretsky © (2004-09-19 15:55) [1]

Кодировки нет - это Unicode

← →
murom (2004-09-19 16:03) [2]

спасибо, а преобразовать то как?) функций то собых и не вижу в дельфях.

← →
Anatoly Podgoretsky © (2004-09-19 16:06) [3]

А не надо, оно уже в нормальном виде. Открой Блокнотом и установи шрифт Юникод.

← →
murom (2004-09-19 16:08) [4]

да вся беда в том что мне это преобразование в программе надо реализовать ;(

← →
Anatoly Podgoretsky © (2004-09-19 16:38) [5]

Блокнот не делает никаких преобразований, для Юникода это не требуется, он сразу поддерживает все кодировки.

← →
Defunct © (2004-09-19 16:49) [6]

WideString [F1]

← →
murom (2004-09-19 17:19) [7]

ухх))
люди, у меня есть такой код,

var
strbytes, normalstr: string;

begin
strbytes := "041f04400438043204350442";
normalstr := ???
и как мне здесь получить из строки str
нормальное слово "Привет" при условии что всё есть именно так как есть

end;

← →
Defunct © (2004-09-19 17:37) [8]

murom (19.09.04 17:19) [7]

Вы читать умеете? см. [6]

Const A: Array[1..12] of byte = ($1f, $04, $40, $04, $38, $04, $32, $04, $35, $04, $42, $04); procedure TForm1.Button1Click(Sender: TObject); Var W:WideString; begin SetLength(W,6); CopyMemory( @W[1], @A, 12); Button1.Caption := W; end;

← →
murom (2004-09-19 17:40) [9]

во спасибо!!, я дельфи еще изучаю, потому и просил пример кода
то что надо

А то ли это надо? Ты же ничего не спрашивал.

Анатолий мучает новичков, как обычно ;>

Да нет просто, что бы получить ответ, надо задать вопрос.
А вот поможет ли ему ответ, он очень отличается от вопроса в [7], вопрос там совсем другой, там надо сначала жекс символы надо преобразовать в байты, потом остально. Но по сути она может решатбся и так

normalstr := "Привет";

Пожто до сих пор не ясно, что надо сделать, нет вопроса.

Дык, чтобы правильно задать вопрос порой приходится потратить годы. Если чел. пишет strbytes := "041f04400438043204350442"; я полагаю для вас было очевидно, что он хочет сделать. Только вот словами выразить вопрос - не хватает знаний.

Помогите разобраться с кодировкой Найти похожие ветки