        Encoding: TZCharEncoding = ceAnsi; const CP: Word = $ffff;
           const ZAlias: String = ''; CharWidth: Integer = 1;
           const ConsistentCP: Boolean = True);
         <span style="color:navy"><b>PROCEDURE</b></span> ResetCodePage (const OldID: Integer; const Name: String;
           const ID:  Integer; {may be an ordinal value of predefined Types...}
           Encoding: TZCharEncoding = ceAnsi; const CP: Word = $ffff;
           const ZAlias: String = ''; CharWidth: Integer = 1;
        