⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dbf_collate.pas

📁 tDBF is new ver, this is BDS 2007 insta
💻 PAS
📖 第 1 页 / 共 5 页
字号:

  {$ENDIF}




  {$IFDEF PARADOX_COLLATIONS}

  // iceland    23936

  _iceland :TCollationTable = (
    000, 001, 002, 003, 004, 005, 006, 007, 008, 009, 010, 011, 012, 013, 014, 015,
    016, 017, 018, 019, 020, 021, 022, 023, 024, 025, 026, 027, 028, 029, 030, 031,
    032, 033, 034, 035, 036, 037, 038, 039, 040, 041, 042, 043, 044, 045, 046, 047,
    048, 049, 050, 051, 052, 053, 054, 055, 056, 057, 058, 059, 060, 061, 062, 063,
    064, 070, 076, 079, 082, 089, 093, 095, 097, 099, 103, 105, 107, 109, 111, 114,
    118, 120, 122, 124, 126, 130, 135, 137, 139, 141, 145, 154, 155, 156, 157, 158,
    159, 065, 075, 077, 081, 085, 092, 094, 096, 098, 102, 104, 106, 108, 110, 112,
    117, 119, 121, 123, 125, 127, 134, 136, 138, 140, 144, 160, 161, 162, 163, 035,
    035, 035, 035, 165, 035, 035, 035, 035, 035, 035, 124, 035, 114, 035, 035, 035,
    035, 035, 035, 035, 035, 035, 035, 035, 035, 035, 123, 035, 112, 035, 035, 141,
    180, 170, 035, 164, 035, 035, 035, 035, 035, 035, 035, 171, 167, 035, 035, 035,
    177, 175, 179, 035, 035, 174, 035, 178, 035, 035, 035, 172, 169, 168, 035, 166,
    070, 074, 070, 070, 072, 071, 149, 080, 089, 091, 089, 089, 099, 101, 099, 099,
    084, 111, 114, 116, 114, 114, 152, 035, 153, 130, 133, 130, 131, 143, 147, 173,
    066, 073, 067, 065, 069, 068, 148, 078, 086, 090, 087, 088, 098, 100, 098, 098,
    083, 110, 112, 115, 113, 112, 150, 176, 151, 127, 132, 128, 129, 142, 146, 140
  );
  iceland :PCollationTable = @_iceland;

  {$ENDIF}




  {$IFDEF PARADOX_COLLATIONS}

  // ANSIINTL    58462

  _ANSIINTL :TCollationTable = (
    000, 001, 002, 003, 004, 005, 006, 007, 008, 009, 010, 011, 012, 013, 014, 015,
    016, 017, 018, 019, 020, 021, 022, 023, 024, 025, 026, 027, 028, 029, 030, 031,
    032, 033, 034, 035, 036, 037, 038, 039, 040, 041, 042, 043, 044, 045, 046, 047,
    048, 049, 050, 051, 052, 053, 054, 055, 056, 057, 058, 059, 060, 061, 062, 063,
    064, 070, 078, 081, 085, 092, 098, 100, 102, 108, 114, 116, 118, 120, 123, 131,
    140, 142, 144, 146, 149, 156, 163, 165, 167, 171, 174, 177, 178, 179, 180, 181,
    182, 065, 077, 079, 083, 087, 097, 099, 101, 103, 113, 115, 117, 119, 121, 125,
    139, 141, 143, 145, 148, 152, 162, 164, 166, 168, 173, 183, 184, 185, 186, 187,
    248, 249, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 250, 251, 252,
    253, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 254, 255, 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,
    072, 071, 073, 074, 076, 176, 189, 082, 095, 094, 096, 093, 111, 110, 112, 109,
    086, 124, 133, 132, 134, 135, 138, 246, 136, 158, 157, 159, 161, 172, 151, 147,
    067, 066, 068, 069, 075, 175, 188, 080, 090, 089, 091, 088, 106, 105, 107, 104,
    084, 122, 127, 126, 128, 129, 137, 247, 130, 154, 153, 155, 160, 170, 150, 169
  );
  ANSIINTL :PCollationTable = @_ANSIINTL;

  {$ENDIF}




  {$IFDEF PARADOX_COLLATIONS}

  // ANSII850    29000

  _ANSII850 :TCollationTable = (
    000, 001, 002, 003, 004, 005, 006, 007, 008, 009, 010, 011, 012, 013, 014, 015,
    016, 017, 018, 019, 020, 021, 022, 023, 024, 025, 026, 027, 028, 029, 030, 031,
    032, 033, 034, 035, 036, 037, 038, 039, 040, 041, 042, 043, 044, 045, 046, 047,
    048, 049, 050, 051, 052, 053, 054, 055, 056, 057, 058, 059, 060, 061, 062, 063,
    064, 073, 083, 086, 090, 097, 103, 105, 107, 113, 119, 121, 123, 125, 128, 137,
    146, 148, 150, 152, 155, 162, 169, 171, 173, 177, 180, 181, 182, 183, 184, 185,
    186, 065, 082, 084, 088, 092, 102, 104, 106, 108, 118, 120, 122, 124, 126, 130,
    145, 147, 149, 151, 154, 158, 168, 170, 172, 174, 179, 187, 188, 189, 190, 191,
    248, 249, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 250, 251, 252,
    253, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 254, 255, 215,
    216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 066, 226, 227, 228, 229, 230,
    231, 232, 233, 234, 235, 236, 237, 238, 239, 240, 131, 241, 242, 243, 244, 245,
    076, 075, 077, 079, 081, 078, 074, 087, 100, 099, 101, 098, 116, 115, 117, 114,
    091, 129, 139, 138, 140, 141, 144, 246, 142, 164, 163, 165, 167, 178, 157, 153,
    069, 068, 070, 072, 080, 071, 067, 085, 095, 094, 096, 093, 111, 110, 112, 109,
    089, 127, 133, 132, 134, 135, 143, 247, 136, 160, 159, 161, 166, 176, 156, 175
  );
  ANSII850 :PCollationTable = @_ANSII850;

  {$ENDIF}




  {$IFDEF PARADOX_COLLATIONS}

  // ANSISPAN    33308

  _ANSISPAN :TCollationTable = (
    000, 001, 002, 003, 004, 005, 006, 007, 008, 009, 010, 011, 012, 013, 014, 015,
    016, 017, 018, 019, 020, 021, 022, 023, 024, 025, 026, 027, 028, 029, 030, 031,
    032, 033, 035, 036, 037, 038, 039, 040, 041, 042, 043, 044, 045, 046, 047, 048,
    049, 050, 051, 052, 053, 054, 055, 056, 057, 058, 059, 060, 061, 062, 063, 064,
    066, 075, 085, 088, 092, 099, 105, 107, 109, 115, 121, 123, 125, 127, 129, 140,
    148, 150, 152, 154, 158, 165, 171, 173, 175, 179, 182, 183, 184, 185, 186, 187,
    188, 067, 084, 086, 090, 094, 104, 106, 108, 110, 120, 122, 124, 126, 128, 132,
    147, 149, 151, 153, 156, 160, 170, 172, 174, 176, 181, 189, 190, 191, 192, 193,
    248, 249, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 250, 251, 252,
    253, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216, 254, 255, 217,
    218, 034, 219, 220, 221, 222, 223, 224, 225, 226, 069, 227, 228, 229, 230, 231,
    232, 233, 234, 235, 236, 237, 238, 239, 240, 241, 133, 242, 243, 244, 245, 065,
    077, 076, 078, 079, 080, 081, 083, 089, 102, 101, 103, 100, 118, 117, 119, 116,
    093, 131, 142, 141, 143, 145, 144, 246, 146, 167, 166, 168, 169, 180, 159, 155,
    070, 068, 071, 072, 073, 074, 082, 087, 096, 095, 097, 098, 112, 111, 113, 114,
    091, 130, 135, 134, 136, 138, 137, 247, 139, 162, 161, 163, 164, 177, 157, 178
  );
  ANSISPAN :PCollationTable = @_ANSISPAN;

  {$ENDIF}




  {$IFDEF PARADOX_COLLATIONS}

  // ANSISWFN    44782

  _ANSISWFN :TCollationTable = (
    000, 001, 002, 003, 004, 005, 006, 007, 008, 009, 010, 011, 012, 013, 014, 015,
    016, 017, 018, 019, 020, 021, 022, 023, 024, 025, 026, 027, 028, 029, 030, 031,
    032, 033, 034, 035, 036, 037, 038, 039, 040, 041, 042, 043, 044, 045, 046, 047,
    048, 049, 050, 051, 052, 053, 054, 055, 056, 057, 058, 059, 060, 061, 062, 063,
    064, 070, 076, 079, 083, 090, 096, 098, 100, 106, 112, 114, 116, 118, 121, 128,
    134, 136, 138, 140, 142, 149, 154, 156, 158, 162, 165, 178, 179, 180, 181, 182,
    183, 065, 075, 077, 081, 085, 095, 097, 099, 101, 111, 113, 115, 117, 119, 123,
    133, 135, 137, 139, 141, 145, 153, 155, 157, 159, 164, 184, 185, 186, 187, 188,
    248, 249, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 250, 251, 252,
    253, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 254, 255, 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,
    072, 071, 073, 074, 173, 171, 167, 080, 093, 092, 094, 091, 109, 108, 110, 107,
    084, 122, 130, 129, 131, 132, 175, 245, 169, 151, 150, 152, 177, 163, 144, 246,
    067, 066, 068, 069, 172, 170, 166, 078, 088, 087, 089, 086, 104, 103, 105, 102,
    082, 120, 125, 124, 126, 127, 174, 247, 168, 147, 146, 148, 176, 160, 143, 161
  );
  ANSISWFN :PCollationTable = @_ANSISWFN;

  {$ENDIF}




  {$IFDEF PARADOX_COLLATIONS}

  // ANSINOR4    55290

  _ANSINOR4 :TCollationTable = (
    000, 001, 002, 003, 004, 005, 006, 007, 008, 009, 010, 011, 012, 013, 014, 015,
    016, 017, 018, 019, 020, 021, 022, 023, 024, 025, 026, 027, 028, 029, 030, 031,
    032, 033, 034, 035, 036, 037, 038, 039, 040, 041, 042, 043, 044, 045, 046, 047,
    048, 049, 050, 051, 052, 053, 054, 055, 056, 057, 058, 059, 060, 061, 062, 063,
    064, 065, 075, 077, 081, 085, 095, 097, 099, 101, 111, 113, 115, 117, 119, 123,
    133, 135, 137, 139, 141, 145, 153, 155, 157, 159, 166, 178, 179, 180, 181, 182,
    183, 070, 076, 079, 083, 090, 096, 098, 100, 106, 112, 114, 116, 118, 121, 128,
    134, 136, 138, 140, 142, 149, 154, 156, 158, 162, 167, 184, 185, 186, 187, 188,
    248, 249, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 250, 251, 252,
    253, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 254, 255, 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,
    067, 066, 068, 069, 169, 176, 168, 078, 088, 087, 089, 086, 104, 103, 105, 102,
    082, 120, 125, 124, 126, 127, 173, 245, 172, 147, 146, 148, 161, 160, 143, 246,
    072, 071, 073, 074, 171, 177, 170, 080, 093, 092, 094, 091, 109, 108, 110, 107,
    084, 122, 130, 129, 131, 132, 175, 247, 174, 151, 150, 152, 165, 164, 144, 163
  );
  ANSINOR4 :PCollationTable = @_ANSINOR4;

  {$ENDIF}




  // china    54324

  _china :TCollationTable = (
    000, 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, 001, 002, 003, 004, 005, 006, 007, 008, 009, 010, 011, 012, 013, 014, 015,
    016, 017, 018, 019, 020, 021, 022, 023, 024, 025, 026, 027, 028, 029, 030, 031,
    032, 033, 034, 035, 036, 037, 038, 039, 040, 041, 042, 043, 044, 045, 046, 047,
    048, 049, 050, 051, 052, 053, 054, 055, 056, 057, 058, 059, 060, 061, 062, 063,
    064, 065, 066, 067, 068, 069, 070, 071, 072, 073, 074, 075, 076, 077, 078, 079,
    080, 081, 082, 083, 084, 085, 086, 087, 088, 089, 090, 091, 092, 093, 094, 095,
    096, 097, 098, 099, 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
  );
  china :PCollationTable = @_china;

  korea :PCollationTable = @_china;

  taiwan :PCollationTable = @_china;

  DB936CN0 :PCollationTable = @_china;

  DB949KO0 :PCollationTable = @_china;

  DB950TW0 :PCollationTable = @_china;




  // thai      Checksum: 9864

  _thai :TCollationTable = (
    000, 001, 002, 003, 004, 005, 006, 007, 008, 009, 010, 011, 012, 013, 014, 015, 
    016, 017, 018, 019, 020, 021, 022, 023, 024, 025, 026, 027, 028, 029, 030, 031, 
    032, 033, 034, 035, 036, 037, 038, 039, 040, 041, 042, 043, 044, 045, 046, 047, 
    048, 049, 050, 051, 052, 053, 054, 055, 056, 057, 058, 059, 060, 061, 062, 063, 
    064, 065, 066, 067, 068, 069, 070, 071, 072, 073, 074, 075, 076, 077, 078, 079, 
    080, 081, 082, 083, 084, 085, 086, 087, 088, 089, 090, 091, 092, 093, 094, 095, 
    096, 097, 098, 099, 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, 
    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, 
    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, 191, 
    192, 183, 193, 184, 185, 186, 187, 188, 189, 190, 175, 243, 244, 245, 246, 194, 
    247, 248, 249, 250, 251, 195, 196, 176, 177, 178, 179, 180, 181, 182, 197, 198, 
    199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 252, 253, 254, 255
  );
  thai :PCollationTable = @_thai;

  db874th0 :PCollationTable = @_thai;




  // DB932JP1      Checksum: 8911

  _DB932JP1 :TCollationTable = (
    000, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 
    110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, 
    065, 075, 118, 135, 133, 134, 136, 117, 119, 120, 137, 127, 069, 128, 070, 114, 
    139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 072, 073, 130, 129, 131, 074, 
    138, 149, 151, 153, 155, 157, 159, 161, 163, 165, 167, 169, 171, 173, 175, 177, 
    179, 181, 183, 185, 187, 189, 191, 193, 195, 197, 199, 121, 132, 122, 078, 111, 
    112, 150, 152, 154

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -