{**********************************************************************************}
{                                                                                  }
{ Project vkDBF - dbf ntx clipper compatibility delphi component                   }
{                                                                                  }
{ This Source Code Form is subject to the terms of the Mozilla Public              }
{ License, v. 2.0. If a copy of the MPL was not distributed with this              }
{ file, You can obtain one at http://mozilla.org/MPL/2.0/.                         }
{                                                                                  }
{ The Initial Developer of the Original Code is Vlad Karpov (KarpovVV@protek.ru).  }
{                                                                                  }
{ Contributors:                                                                    }
{   Sergey Klochkov (HSerg@sklabs.ru)                                              }
{                                                                                  }
{ You may retrieve the latest version of this file at the Project vkDBF home page, }
{ located at http://sourceforge.net/projects/vkdbf/                                }
{                                                                                  }
{**********************************************************************************}
unit VKDBFCollate;

interface

uses
  Windows, Messages, SysUtils, Classes, VKDBFIndex;

const
  Clipper501RusOrder: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,
                          18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,
                          34,35,36,37,38,39,40,41,42,43,44,45,46,47,180,181,
                          182,183,184,185,186,187,188,189,49,50,51,52,53,54,
                          55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,
                          71,72,73,74,75,76,77,78,79,80,81,190,191,192,193,
                          194,195,82,83,84,85,86,87,88,89,90,91,92,93,94,95,
                          96,97,98,99,100,101,102,103,104,105,106,107,196,197,
                          198,199,200,108,109,110,111,112,113,115,116,117,118,
                          119,120,121,122,123,124,125,126,127,128,129,130,131,
                          132,133,134,135,136,137,138,139,140,143,144,145,146,
                          147,148,150,151,152,153,154,155,156,157,158,159,201,
                          202,203,204,205,206,207,208,209,210,211,212,213,214,
                          215,216,217,218,219,220,221,222,223,224,225,226,227,
                          228,229,230,231,232,233,234,235,236,237,238,239,240,
                          241,242,243,244,245,246,247,248,160,161,162,163,164,
                          165,166,167,168,169,170,171,172,173,174,175,114,149,
                          176,177,141,178,142,179,249,250,251,252,253,254,48,
                          255);

  GermanCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,67,68,69,70,
                          71,72,73,74,75,76,77,78,79,80,
                          82,83,84,85,86,87,89,90,91,92,
                          93,94,95,96,97,98,99,100,102,103,
                          104,105,106,107,108,109,110,111,112,113,
                          114,115,117,118,119,120,122,123,125,126,
                          127,128,129,130,131,132,133,134,135,124,
                          136,137,101,138,139,140,141,142,143,144,
                          145,146,66,147,148,149,150,151,116,152,
                          153,154,155,81,88,156,157,158,159,160,
                          161,162,163,164,165,166,167,168,169,170,
                          171,172,173,174,175,176,177,178,179,180,
                          181,182,183,184,185,186,187,188,189,190,
                          191,192,193,194,195,196,197,198,199,200,
                          201,202,203,204,205,206,207,208,209,210,
                          211,212,213,214,215,216,217,218,219,220,
                          221,222,223,224,225,121,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255  );

  FrenchCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          70,71,72,73,74,75,76,77,78,79,
                          80,81,82,83,84,85,86,87,88,89,
                          90,91,92,93,94,95,96,97,102,103,
                          104,105,110,111,112,113,118,119,120,121,
                          122,123,128,129,130,131,132,133,138,139,
                          140,141,142,143,144,145,146,147,148,137,
                          106,100,101,99,149,150,108,109,107,117,
                          116,115,151,152,153,154,155,126,127,125,
                          136,135,156,157,158,159,160,161,162,163,
                          98,114,124,134,164,165,166,167,168,169,
                          170,171,172,173,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  SpanishCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          71,72,73,74,75,76,77,78,79,81,
                          82,83,84,85,86,87,88,89,90,91,
                          93,97,98,99,100,101,102,103,105,106,
                          107,108,110,111,112,113,115,116,117,118,
                          119,121,123,124,125,126,127,128,130,131,
                          132,133,135,139,140,141,142,143,144,134,
                          109,145,137,146,136,147,148,149,150,151,
                          152,153,95,94,70,154,155,156,138,157,
                          158,129,159,96,92,160,161,162,163,164,
                          104,114,122,165,120,80,166,167,168,169,
                          170,171,172,173,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  ItalianCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          71,72,73,74,75,76,77,78,79,80,
                          81,82,83,84,85,86,87,88,89,90,
                          91,92,93,94,95,96,97,98,101,102,
                          103,104,107,108,109,110,113,114,115,116,
                          117,118,121,122,123,124,125,126,129,130,
                          131,132,133,134,135,136,137,138,139,140,
                          105,141,142,99,143,144,145,146,106,147,
                          148,111,149,150,70,151,152,153,154,119,
                          155,127,156,157,158,159,160,161,162,163,
                          100,112,120,128,164,165,166,167,168,169,
                          170,171,172,173,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  SwedishCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          71,72,73,74,75,76,77,78,79,80,
                          81,82,83,84,85,86,87,88,89,90,
                          92,96,97,98,99,100,101,102,103,104,
                          105,106,108,109,110,111,112,113,114,115,
                          116,117,118,119,120,121,122,123,124,125,
                          126,127,129,133,134,135,136,137,138,128,
                          139,140,131,141,130,142,145,146,107,147,
                          148,149,94,93,70,144,143,150,132,151,
                          152,153,154,95,91,155,156,157,158,159,
                          160,161,162,163,164,165,166,167,168,169,
                          170,171,172,173,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  PortugueseCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          70,71,72,73,74,75,76,77,78,79,
                          80,81,82,83,84,85,86,87,88,89,
                          90,91,92,93,94,95,96,97,98,99,
                          100,101,102,103,104,105,106,107,108,109,
                          110,111,112,113,114,115,116,117,118,119,
                          120,121,122,123,124,125,126,127,128,129,
                          130,131,132,133,134,135,136,137,138,139,
                          140,141,142,143,144,145,146,147,148,149,
                          150,151,152,153,154,155,156,157,158,159,
                          160,161,162,163,164,165,166,167,168,169,
                          170,171,172,173,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  NorwegianCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          71,72,73,74,75,76,77,78,79,80,
                          81,82,83,84,85,86,87,88,89,90,
                          92,96,97,98,99,100,101,102,103,104,
                          105,106,108,109,110,111,112,113,114,115,
                          116,117,118,119,120,121,122,123,124,125,
                          126,127,129,134,135,136,137,138,139,128,
                          131,140,141,142,133,143,144,145,107,146,
                          147,148,149,95,70,130,93,150,151,152,
                          153,154,155,156,91,132,157,94,158,159,
                          160,161,162,163,164,165,166,167,168,169,
                          170,171,172,173,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  FinnishCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          71,72,73,74,75,76,77,78,79,80,
                          81,82,83,84,85,86,87,88,89,90,
                          92,96,97,98,99,100,101,102,103,104,
                          105,106,108,109,110,111,112,113,114,115,
                          116,117,118,119,120,121,122,123,124,125,
                          126,127,129,133,134,135,136,137,138,128,
                          107,139,131,140,130,141,142,143,144,145,
                          146,147,94,93,70,148,149,150,132,151,
                          152,153,154,95,91,155,156,157,158,159,
                          160,161,162,163,164,165,166,167,168,169,
                          170,171,172,173,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  DutchCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,68,69,71,72,
                          74,75,76,77,78,79,80,81,82,84,
                          86,87,88,89,90,91,93,94,95,96,
                          97,98,99,100,101,102,103,104,110,111,
                          113,114,119,120,121,122,128,129,130,131,
                          132,134,139,140,141,142,144,145,150,151,
                          152,153,154,155,156,157,158,159,70,146,
                          115,105,106,107,108,112,116,117,118,123,
                          124,125,66,67,73,160,161,135,136,137,
                          147,148,127,85,92,162,163,164,165,166,
                          109,126,138,149,133,83,167,168,169,170,
                          171,172,173,174,175,176,177,178,179,180,
                          181,182,183,184,185,186,187,188,189,190,
                          191,192,193,194,195,196,197,198,199,200,
                          201,202,203,204,205,206,207,208,209,210,
                          211,212,213,214,215,216,217,218,219,220,
                          221,222,223,224,225,143,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  DanishCollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          71,72,73,74,75,76,77,78,79,80,
                          81,82,83,84,85,86,87,88,89,90,
                          92,98,99,100,101,102,103,104,105,106,
                          107,108,110,111,112,113,114,115,116,117,
                          118,119,120,121,122,123,124,125,126,127,
                          128,129,131,137,138,139,140,141,142,130,
                          143,144,133,145,136,146,147,148,109,149,
                          150,151,94,97,70,132,93,152,135,153,
                          154,155,156,96,91,134,157,95,158,159,
                          160,161,162,163,164,165,166,167,168,169,
                          170,171,172,173,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  Greek437Collation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          70,71,72,73,74,75,76,77,78,79,
                          80,81,82,83,84,85,86,87,88,89,
                          90,91,92,93,94,95,96,97,98,99,
                          100,101,102,103,104,105,106,107,108,109,
                          110,111,112,113,114,115,116,117,118,119,
                          120,121,122,123,124,125,126,127,128,131,
                          133,135,137,140,142,145,147,151,153,155,
                          157,159,161,164,166,168,171,173,177,179,
                          181,183,129,132,134,136,138,141,143,146,
                          148,152,154,156,158,160,162,165,167,169,
                          170,172,174,178,180,182,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,184,130,139,144,150,149,
                          163,175,176,185,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  Greek851Collation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,66,67,68,69,
                          70,71,72,73,74,75,76,77,78,79,
                          80,81,82,83,84,85,86,87,88,89,
                          90,91,92,93,94,95,96,97,98,99,
                          100,101,102,103,104,105,106,107,108,109,
                          110,111,112,113,114,115,116,117,118,119,
                          120,121,122,123,124,125,126,127,186,187,
                          188,189,190,191,192,193,194,195,196,197,
                          198,199,200,201,202,203,204,205,206,207,
                          208,209,210,211,212,130,213,139,144,149,
                          150,214,163,175,128,131,133,135,137,140,
                          142,215,145,147,216,217,218,219,220,221,
                          222,151,153,155,157,223,224,225,226,159,
                          161,227,228,229,230,231,232,233,164,166,
                          234,235,236,237,238,239,240,168,171,173,
                          177,179,181,183,129,132,134,241,242,243,
                          244,136,138,245,141,143,146,148,152,154,
                          156,158,160,162,165,167,169,170,172,246,
                          247,248,174,178,180,249,182,250,251,252,
                          184,176,253,185,254,255);

  Icelandic850Collation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,67,68,69,71,
                          73,74,75,76,78,79,80,81,82,83,
                          85,86,87,88,89,90,92,93,94,95,
                          97,101,102,103,104,105,106,107,109,110,
                          111,113,115,116,117,118,120,121,122,123,
                          124,125,127,128,129,130,131,132,134,135,
                          136,137,139,143,144,145,146,147,148,149,
                          114,150,151,152,153,154,155,156,157,158,
                          159,160,161,162,72,141,99,163,142,164,
                          165,166,167,100,168,169,170,171,172,173,
                          108,119,126,133,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,66,191,192,193,194,195,196,197,198,
                          199,200,201,202,203,204,205,206,207,208,
                          209,210,211,212,213,214,215,216,112,70,
                          217,218,219,220,77,221,222,223,224,225,
                          226,227,228,229,84,230,231,232,233,234,
                          235,140,98,91,236,237,138,96,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  Icelandic861Collation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,67,68,69,71,
                          73,74,75,76,78,79,80,81,82,83,
                          85,86,87,88,89,90,92,93,94,95,
                          97,101,102,103,104,105,106,107,109,110,
                          111,113,115,116,117,118,120,121,122,123,
                          124,125,127,128,129,130,131,132,134,135,
                          136,137,139,143,144,145,146,147,148,149,
                          114,150,151,152,153,154,155,156,157,70,
                          112,98,158,159,72,141,99,160,142,140,
                          161,96,138,100,162,163,164,165,166,167,
                          108,119,126,133,66,77,84,91,168,169,
                          170,171,172,173,174,175,176,177,178,179,
                          180,181,182,183,184,185,186,187,188,189,
                          190,191,192,193,194,195,196,197,198,199,
                          200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,219,
                          220,221,222,223,224,225,226,227,228,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);

  Polish852Collation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,
                          10,11,12,13,14,15,16,17,18,19,
                          20,21,22,23,24,25,26,27,28,29,
                          30,31,32,33,34,35,36,37,38,39,
                          40,41,42,43,44,45,46,47,48,49,
                          50,51,52,53,54,55,56,57,58,59,
                          60,61,62,63,64,65,67,68,70,71,
                          73,74,75,76,77,78,79,81,82,84,
                          86,87,88,89,91,92,93,94,95,96,
                          97,100,101,102,103,104,105,106,108,109,
                          111,112,114,115,116,117,118,119,120,122,
                          123,125,127,128,129,130,132,133,134,135,
                          136,137,138,141,142,143,144,145,146,147,
                          148,149,150,151,110,152,121,153,154,155,
                          156,98,157,69,158,159,160,161,162,163,
                          164,90,131,165,166,167,168,80,169,170,
                          171,172,126,173,66,107,174,175,72,113,
                          176,139,177,178,179,180,181,182,183,184,
                          185,186,187,188,189,190,191,192,193,99,
                          140,194,195,196,197,198,199,200,201,202,
                          203,204,205,206,207,208,209,210,211,212,
                          213,214,215,216,217,218,219,220,221,222,
                          223,224,225,226,85,227,228,83,124,229,
                          230,231,232,233,234,235,236,237,238,239,
                          240,241,242,243,244,245,246,247,248,249,
                          250,251,252,253,254,255);


  HungarianCWICollation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,
                          18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,
                          33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,
                          48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,
                          63,64,65,67,68,69,70,72,73,74,75,77,78,79,80,
                          81,82,86,87,88,89,90,91,95,96,97,98,99,100,101,
                          102,103,104,105,106,108,109,110,111,113,114,115,
                          116,118,119,120,121,122,123,127,128,129,130,131,
                          132,136,137,138,139,140,141,142,143,144,145,146,
                          134,112,147,148,149,150,151,152,153,154,155,156,76,
                          157,66,71,158,159,126,125,83,135,92,94,84,93,160,
                          161,162,163,164,107,117,124,133,165,166,167,85,168,
                          169,170,171,172,173,174,175,176,177,178,179,180,
                          181,182,183,184,185,186,187,188,189,190,191,192,
                          193,194,195,196,197,198,199,200,201,202,203,204,
                          205,206,207,208,209,210,211,212,213,214,215,216,
                          217,218,219,220,221,222,223,224,225,226,227,228,
                          229,230,231,232,233,234,235,236,237,238,239,240,
                          241,242,243,244,245,246,247,248,249,250,251,252,
                          253,254,255);

  Hungarian852Collation: TVKCollatingSequence = (
                          0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,
                          19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,
                          35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,
                          51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,67,
                          68,69,70,72,73,74,75,77,78,79,80,81,82,86,87,88,
                          89,90,91,95,96,97,98,99,100,101,102,103,104,105,
                          106,108,109,110,111,113,114,115,116,118,119,120,
                          121,122,123,127,128,129,130,131,132,136,137,138,
                          139,140,141,142,143,144,145,146,134,112,147,148,
                          149,150,151,152,153,85,126,154,155,156,157,71,
                          158,159,160,125,161,162,163,164,84,93,165,166,
                          167,168,169,107,117,124,133,170,171,172,173,174,
                          175,176,177,178,179,180,181,182,183,184,185,186,
                          66,187,188,189,190,191,192,193,194,195,196,197,
                          198,199,200,201,202,203,204,205,206,207,208,209,
                          210,211,212,213,214,215,216,217,218,76,219,220,
                          221,222,223,224,225,226,227,83,228,229,230,231,
                          232,233,234,235,92,236,94,237,238,239,240,241,
                          242,243,244,245,246,247,248,249,250,251,135,252,
                          253,254,255);

implementation

end.
