From ca3e98911d34fbc97b7b327cadb5fc34dc7fb572 Mon Sep 17 00:00:00 2001 From: geby Date: Wed, 31 Jul 2013 08:35:34 +0000 Subject: [PATCH] Published some functions. git-svn-id: https://svn.code.sf.net/p/synalist/code/trunk@185 7c85be65-684b-0410-a082-b2ed4fbef004 --- mimemess.pas | 4 ++-- synachar.pas | 3 +++ 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/mimemess.pas b/mimemess.pas index 0ad814d..0067b4a 100644 --- a/mimemess.pas +++ b/mimemess.pas @@ -266,11 +266,11 @@ type {:Compose message from @link(MessagePart) to @link(Lines). Headers from @link(Header) object is added also.} - procedure EncodeMessage; + procedure EncodeMessage; virtual; {:Decode message from @link(Lines) to @link(MessagePart). Massage headers are parsed into @link(Header) object.} - procedure DecodeMessage; + procedure DecodeMessage; virtual; {pf} {: HTTP message is received by @link(THTTPSend) component in two parts: diff --git a/synachar.pas b/synachar.pas index 9fea63d..5d39b29 100644 --- a/synachar.pas +++ b/synachar.pas @@ -223,6 +223,9 @@ function StringToWide(const Value: AnsiString): WideString; {:Convert WideString to binary string with unicode content.} function WideToString(const Value: WideString): AnsiString; +function GetIconvIDFromCP(Value: TMimeChar): AnsiString; +function GetCPFromIconvID(Value: AnsiString): TMimeChar; + {==============================================================================} implementation