Что за кодировка?

как раскодировать такие строчки
1.

Code:

n;encoding=quoted-printable;charset=utf-8:=d0=9a=d0=b8=d1=80=d0=b5=d0=b9=d1=87=d1=83=d0=ba;=d0=9e=d0=bb=d1=8f;;;

2.

Code:

n;encoding=quoted-printable;charset=utf-8:=d0=9a=d0=be=d1=81=d1=82=d1=8e=d0=ba;=d0=94=d0=b0=d1=88=d0=b0;;;

3.

Code:

n;encoding=quoted-printable;charset=utf-8:=d0=9e=d0=ba=d1=83=d0=bb=d0=b8=d1=87;=d0=94=d0=b8=d0=bc=d0=b0;;;

utf-8 походу, но как прочитать:? там должен быть текст на русском

 

это ты прав - это utf-8 но между символами поставлен знак =
по этому:
1) Убирай из строки все левые символы. остаться должны тока 0..9 и A..F
2) бери по 2 символа и переводи их из HEX в DEC а из DEC в символ через chr
3) полученную строку через Utf8ToAnsi преобразовывай в обычный вид

 

Разкодируется примерно так:

Code:

var
 s,s1,s2:string;
 x:integer;
 begin
  s:='=d0=9a=d0=b8=d1=80=d0=b5=d0=b9=d1=87=d1=83=d0=ba';
 while pos('=',s)<>0 do delete(s,pos('=',s),1);
 x:=1;
 s1:='';
 while x<length(s) do
  begin
    s1:=s1+chr(strtoint('$'+copy(s,x,2)));
    x:=x+2;
  end;
 s2:=Utf8ToAnsi(s1);
 showmessage(s2);
end;

 

насчет кодировок, конечно, ты не совсем в тот раздел запостил...
Вопрос решен?

 

Раскодируй плиз такие строки

Code:

N;ENCODING=QUOTED-PRINTABLE;CHARSET=UTF-8:=D0=9A=D0=B8=D1=80=D0=B5=D0=B9=D1=87=D1=83=D0=BA;=D0=9E=D0=BB=D1=8F;;;

Code:

N;ENCODING=QUOTED-PRINTABLE;CHARSET=UTF-8:=D0=9A=D0=BE=D1=81=D1=82=D1=8E=D0=BA;=D0=94=D0=B0=D1=88=D0=B0;;;

Code:

N;ENCODING=QUOTED-PRINTABLE;CHARSET=UTF-8:=
[=D0=9C=D1=83=D1=81=D0=BE=D1=80];=D0=9F=D0=B8=D0=B2=D0=BE=D0=B2=D0=B0=D1=
=80=D0=BE=D0=B2;;;

Code:

N;ENCODING=QUOTED-PRINTABLE;CHARSET=UTF-8:=D0=9E=D0=BA=D1=83=D0=BB=D0=B8=D1=87;=D0=94=D0=B8=D0=BC=D0=B0;;;

 

В программу свои подставь.

 

1. Кирейчук Оля
2. Костюк Даша
3. Окулич Дима


вот тебе прога


тока пробелы убирай и точки с запятой =) прога сделана по коду slesh

 

Спасибо