![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите разобраться с кодировкой [D7, Win2k, WinXP]
murom © (2004-09-19 15:54:00)Уважаемые, помогите понять как преобразовать эти данные в нормальный русский текст, у меня есть следующие байты
04 1f 04 40 04 38 04 32 04 35 04 42
П р и в е т
Они обозначают как раз это слово "Привет". Не пойму что за кодировка и как преобразовать, если можно примерчик с кодом. Спасибо большое.
Defunct (2004-09-19 18:03:00) [1]Дык, чтобы правильно задать вопрос порой приходится потратить годы. Если чел. пишет strbytes := '041f04400438043204350442'; я полагаю для вас было очевидно, что он хочет сделать. Только вот словами выразить вопрос - не хватает знаний.
Anatoly Podgoretsky (2004-09-19 17:58:00) [2]Да нет просто, что бы получить ответ, надо задать вопрос.
А вот поможет ли ему ответ, он очень отличается от вопроса в [7], вопрос там совсем другой, там надо сначала жекс символы надо преобразовать в байты, потом остально. Но по сути она может решатбся и так
normalstr := 'Привет';
Пожто до сих пор не ясно, что надо сделать, нет вопроса.
Defunct (2004-09-19 17:54:00) [3]Анатолий мучает новичков, как обычно ;>
Anatoly Podgoretsky (2004-09-19 17:50:00) [4]А то ли это надо? Ты же ничего не спрашивал.
murom (2004-09-19 17:40:00) [5]во спасибо!!, я дельфи еще изучаю, потому и просил пример кода
то что надо
Defunct (2004-09-19 17:37:00) [6]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:19:00) [7]ухх))
люди, у меня есть такой код,
var
strbytes, normalstr: string;
begin
strbytes := '041f04400438043204350442';
normalstr := ???
и как мне здесь получить из строки str
нормальное слово 'Привет' при условии что всё есть именно так как есть
end;
Defunct (2004-09-19 16:49:00) [8]WideString [F1]
Anatoly Podgoretsky (2004-09-19 16:38:00) [9]Блокнот не делает никаких преобразований, для Юникода это не требуется, он сразу поддерживает все кодировки.
murom (2004-09-19 16:08:00) [10]да вся беда в том что мне это преобразование в программе надо реализовать ;(
Anatoly Podgoretsky (2004-09-19 16:06:00) [11]А не надо, оно уже в нормальном виде. Открой Блокнотом и установи шрифт Юникод.
murom (2004-09-19 16:03:00) [12]спасибо, а преобразовать то как?) функций то собых и не вижу в дельфях.
Anatoly Podgoretsky (2004-09-19 15:55:00) [13]Кодировки нет - это Unicode