Thank you!

Implemented.

/Roger


-----Ursprungligt meddelande-----
Från: tmail2000@yahoogroups.com [mailto:tmail2000@yahoogroups.com] För
anyunchen
Skickat: den 1 november 2006 04:58
Till: tmail2000@yahoogroups.com
Ämne: [tmail2000] Bug fix

function DecodeLine7Bit(Texto: String): String;
....
case Encoding of

'B':
begin

GetMem(Buffer, Length(Texto));
Size := DecodeLineBASE64(Texto, Buffer);
if Size>0 then //add by chenanyun
Buffer[Size] := #0;
Texto := String(Buffer);
FreeMem(Buffer); end;

'Q':
begin

while Pos('_', Texto) > 0 do
Texto[Pos('_', Texto)] := #32;

Texto := DecodeQuotedPrintable(Texto);
end;

'U':
begin

GetMem(Buffer, Length(Texto));
Size := DecodeLineUUCODE(Texto, Buffer);
if Size>0 then //fix by chenanyun
Buffer[Size] := #0;
Texto := String(Buffer);
FreeMem(Buffer);
end;
end;





=============================================================

The group's home page is here:
http://groups.yahoo.com/group/tmail2000/

To post a message:
send email to: tmail2000@yahoogroups.com
or go here: http://groups.yahoo.com/group/tmail2000/post

To modify your subcription options (e.g. stop receiving discussions)
go to:
http://groups.yahoo.com/mygroups/tmail2000/join or
http://groups.yahoo.com/convwiz

To subscribe/unsubscribe, send blank email to:
tmail2000-subscribe@yahoogroups.com
tmail2000-unsubscribe@yahoogroups.com

To talk only with the moderator, developer of TMail2000, write email to:
mycelo@...

Please expect 1-2 weeks for my response.

PLEASE POST IN ENGLISH!

Yahoo! Groups Links