Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Кодирование в UUE


Codec ©   (2005-07-27 11:27:00) 

uses ....IdCoder, IdCoder3to4, IdCoderUUE...;
...
uue: TIdEncoderUUE;
uud: TIdDecoderUUE;
....
var s,s1,s2 : string;
begin
    s := 'med=-1281582115'#$D#$A'ctg=629891937'#$D#$A'med_ctg=-1790040913'#$D#$A'prod=-1962880211'#$D#$A'price=668409718'#$D#$A'p rice_cln=-205990767'#$D#$A;;
    s1 := uue.EncodeString(s);
    s2 := uud.DecodeString(s1);


Должно ли быть в итоге, что s2=s1?
У меня s2='med=-128'#$D#$A;


Codec   (2005-07-27 12:51:00) [1]

Да, - Д7 и Вин2000. Забыл.


Codec   (2005-07-27 11:43:00) [2]

Хм. Эта штука хорошо берет 63 символа, но с большим количеством - начинает дурить. :(


Наверх

Титульная страница Поиск, карта сайта Написать письмо