dev.net.ua

Є функція, що читає Теги з заголовку Ogg файла

Результатом роботи є String^
Свято грибів і форелів
Якщо його перекодувати в з UFT-8 у Windows-1251 вийде
Свято грибів і форелів

А як його перекодувати? Хотілося б, щоб це відбувалося одразу при зчитуванні, бо як перекодувати вміст повернутого String^ я знаю.

Коротше щось треба змітити тут : text += td->GetEncoding(1251)->GetString(byt);

Код функції

String^ BOggtags::readNext(FileStream^ fs, System::Text::UTF8Encoding^ & td)

{

String^ text = "";

array<Byte>^ byt = gcnew array<Byte>(1);

do

{

fs->Read(byt,0,1);

if (byt[0] == 0x00) //the tag is finished: all tags are followed by 0? and one or more 00

{

text = text->Remove(text->Length-1, 1); //remove the 0? byte

break;

}

else if (byt[0] == 0x01) //0x01 is at the end of all tags. no more tags in the file

break;

text += td->GetEncoding(1251)->GetString(byt);

} while (true);

return text;

}

Ось код який виконує перекодування з вашої строки з "крякозябами" у нормальну строку:

        Dim Source = "Свято РіСЂРёР±С–РІ С– форелів"
        Console.WriteLine(Text.Encoding.UTF8.GetString(Text.Encoding.GetEncoding(1251).GetBytes(Source)))

Щодо вашого коду, мені здається що GetEncoding(1251) треба замінита на GetEncoding(65001)

---

Artyom Krivokrisenko
Web Reflection, Development Department

дякую, завдяки вам вирішив проблему так:

замість return text;
    return Text::Encoding::UTF8->GetString(Text::Encoding::GetEncoding(1251)->GetBytes(text));

більше нічого не змінював. 65001 це utf-8, так? я одразу так і писав, але отримував не те щоби пусте значення text, а декілька пробілів у ньому...
тільки я трохи не розумію, як це працює. ми двічі перекодовуємо у win-1251... мда...

kirpi:

дякую, завдяки вам вирішив проблему так:

замість return text;
    return Text::Encoding::UTF8->GetString(Text::Encoding::GetEncoding(1251)->GetBytes(text));

більше нічого не змінював. 65001 це utf-8, так? я одразу так і писав, але отримував не те щоби пусте значення text, а декілька пробілів у ньому...
тільки я трохи не розумію, як це працює. ми двічі перекодовуємо у win-1251... мда...

Почему же дважды???
Этим получаешь объект кодировки для 1251 и вызываешь его метод
Text::Encoding::GetEncoding(1251)->GetBytes(text)

а этим

Text::Encoding::UTF8->GetString

объект кодировки для UTF8 и вызываешь его перегруженный метод.

---

С уважением, Вячеслав