home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 5_2007-2008.ISO / data / Zips / UniText_RC2116676132008.psc / UniList / UniList.ctl
Text File  |  2008-06-14  |  39KB  |  600 lines
  1. VERSION 5.00
  2. Begin VB.UserControl UniList 
  3.    BackColor       =   &H80000005&
  4.    ClientHeight    =   3600
  5.    ClientLeft      =   0
  6.    ClientTop       =   0
  7.    ClientWidth     =   4800
  8.    ForeColor       =   &H80000008&
  9.    ScaleHeight     =   240
  10.    ScaleMode       =   3  'Pixel
  11.    ScaleWidth      =   320
  12.    ToolboxBitmap   =   "UniList.ctx":0000
  13. End
  14. Attribute VB_Name = "UniList"
  15. Attribute VB_GlobalNameSpace = False
  16. Attribute VB_Creatable = True
  17. Attribute VB_PredeclaredId = False
  18. Attribute VB_Exposed = False
  19. '*************************************************************************************************
  20. '* UniList 0.9.1 - Unicode listbox user control
  21. '* --------------------------------------------
  22. '* By Vesa Piittinen aka Merri, http://vesa.piittinen.name/ <vesa@piittinen.name>
  23. '* Unicode on 2000/XP/Vista
  24. '*
  25. '* LICENSE
  26. '* -------
  27. '* http://creativecommons.org/licenses/by-sa/1.0/fi/deed.en
  28. '*
  29. '* Terms: 1) If you make your own version, share using this same license.
  30. '*        2) When used in a program, mention my name in the program's credits.
  31. '*        3) May not be used as a part of commercial (unicode) controls suite.
  32. '*        4) Free for any other commercial and non-commercial usage.
  33. '*        5) Use at your own risk. No support guaranteed.
  34. '*
  35. '* SUPPORT FOR UNICONTROLS
  36. '* -----------------------
  37. '* http://www.vbforums.com/showthread.php?t=500026
  38. '* http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=69738&lngWId=1
  39. '*
  40. '* REQUIREMENTS
  41. '* ------------
  42. '* Note: TLBs are compiled to your program so you don't need to distribute the files
  43. '* - OleGuids3.tlb      = Ole Guid and interface definitions 3.0
  44. '* - UniListModule.bas
  45. '*
  46. '* HOW TO ADD TO YOUR PROGRAM
  47. '* --------------------------
  48. '* 1) OPTIONAL: Copy OleGuids3.tlb to Windows system folder.
  49. '* 2) Copy UniListModule.bas, UniList.ctl and UniList.ctx to your project folder.
  50. '* 3) In your project, add a reference to OleGuids3.tlb (Project > References...)
  51. '* 4) Add UniListModule.bas
  52. '* 5) Add UniList.ctl
  53. '*
  54. '* VERSION HISTORY
  55. '* ---------------
  56. '* Version 0.9.1 RELEASE CANDIDATE 1 (2008-06-14)
  57. '* - Many new properties and methods plus some similar fixes/changes as in the UniText control.
  58. '*
  59. '* Version 0.6 BETA (2008-06-11)
  60. '* - Initial release.
  61. '*
  62. '* CREDITS
  63. '* -------
  64. '* - Mike Gainer, Matt Curland and Bill Storage for their work on IOLEInPlaceActivate
  65. '* - Paul Caton and LaVolpe for their work on SelfSub, SelfHook and SelfCallback
  66. '*************************************************************************************************
  67. Option Explicit
  68.  
  69. Public Event Click(Button As UniListMouseButton)
  70. Attribute Click.VB_MemberFlags = "200"
  71. Public Event DblClick(Button As UniListMouseButton)
  72. Public Event FontChanged()
  73. Public Event ItemCheck(Index As Long)
  74. Public Event KeyDown(KeyCode As Integer, ByVal Shift As UniListShift)
  75. Public Event KeyPress(KeyAscii As Integer)
  76. Public Event KeyUp(KeyCode As Integer, ByVal Shift As UniListShift)
  77. Public Event MouseDown(Button As UniListMouseButton, ByVal Shift As UniListShift, X As Single, Y As Single)
  78. Public Event MouseEnter()
  79. Public Event MouseLeave()
  80. Public Event MouseMove(Button As UniListMouseButton, ByVal Shift As UniListShift, X As Single, Y As Single)
  81. Public Event MouseUp(Button As UniListMouseButton, ByVal Shift As UniListShift, X As Single, Y As Single)
  82. Public Event MouseWheel(ByVal Wheel As UniListMouseWheel, ByVal Shift As UniListShift)
  83. 'Public Event OLECompleteDrag(Effect As Long)
  84. 'Public Event OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
  85. 'Public Event OLEDragOver(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, State As Integer)
  86. 'Public Event OLEGiveFeedback(Effect As Long, DefaultCursors As Boolean)
  87. 'Public Event OLESetData(Data As DataObject, DataFormat As Integer)
  88. 'Public Event OLEStartDrag(Data As DataObject, AllowedEffects As Long)
  89. Public Event Scroll(ByVal Direction As UniListScrollDirection)
  90.  
  91. Private Type NMHDR
  92.     hwndFrom As Long
  93.     idfrom As Long
  94.     code As Long
  95. End Type
  96.  
  97. Private Type MSGFILTER
  98.     NMHDR As NMHDR
  99.     MSG As Long
  100.     wParam As Long
  101.     lParam As Long
  102. End Type
  103.  
  104. Private Enum TRACKMOUSEEVENT_FLAGS
  105.     TME_HOVER = &H1&
  106.     TME_LEAVE = &H2&
  107.     TME_QUERY = &H40000000
  108.     TME_CANCEL = &H80000000
  109. End Enum
  110.  
  111. Public Enum UniListAppearance
  112.     [Classic 3D]
  113.     [Windows 3D]
  114. End Enum
  115.  
  116. Public Enum UniListBorderStyle
  117.     [No Border] = 0&
  118.     [Flat3D] = 1&
  119.     [3D] = 2&
  120. End Enum
  121.  
  122. Public Enum UniListLocale
  123.     [Invalid Locale] = 0&
  124.     [Locale Afrikaans] = &H436  ' Afrikaans (South Africa)    af-ZA   Latn    1252
  125.     [Locale Albanian] = &H41C  ' Albanian (Albania)  sq-AL   Latn    1252
  126.     [Locale Alsatian] = &H484  ' Windows Vista and later: Alsatian (France)  gsw-FR
  127.     [Locale Amharic] = &H45E  ' Windows Vista and later: Amharic (Ethiopia)     am-ET       Unicode only
  128.     [Locale Arabic/Algeria] = &H1401 ' Arabic (Algeria)    ar-DZ   Arab    1256
  129.     [Locale Arabic/Bahrain] = &H3C01 ' Arabic (Bahrain)    ar-BH   Arab    1256
  130.     [Locale Arabic/Egypt] = &HC01  ' Arabic (Egypt)  ar-EG   Arab    1256
  131.     [Locale Arabic/Iraq] = &H801  ' Arabic (Iraq)   ar-IQ   Arab    1256
  132.     [Locale Arabic/Jordan] = &H2C01 ' Arabic (Jordan)     ar-JO   Arab    1256
  133.     [Locale Arabic/Kuwait] = &H3401 ' Arabic (Kuwait)     ar-KW   Arab    1256
  134.     [Locale Arabic/Lebanon] = &H3001 '' Arabic (Lebanon)    ar-LB   Arab    1256
  135.     [Locale Arabic/Libya] = &H1001 '' Arabic (Libya)  ar-LY   Arab    1256
  136.     [Locale Arabic/Morocco] = &H1801 '' Arabic (Morocco)    ar-MA   Arab    1256
  137.     [Locale Arabic/Oman] = &H2001 '' Arabic (Oman)   ar-OM   Arab    1256
  138.     [Locale Arabic/Qatar] = &H4001 '' Arabic (Qatar)  ar-QA   Arab    1256
  139.     [Locale Arabic/Saudia Arabia] = &H401  '' Arabic (Saudi Arabia)   ar-SA   Arab    1256
  140.     [Locale Arabic/Syria] = &H2801 '' Arabic (Syria)  ar-SY   Arab    1256
  141.     [Locale Arabic/Tunisia] = &H1C01 '' Arabic (Tunisia)    ar-TN   Arab    1256
  142.     [Locale Arabic/U.A.E.] = &H3801 '' Arabic (U.A.E.)     ar-AE   Arab    1256
  143.     [Locale Arabic/Yemen] = &H2401 '' Arabic (Yemen)  ar-YE   Arab    1256
  144.     [Locale Armenian] = &H42B  '' Windows 2000 and later: Armenian (Armenia)  hy-AM   Armn    Unicode only
  145.     [Locale Assamese] = &H44D  '' Windows Vista and later: Assamese (India)   as-IN       Unicode only
  146.     [Locale Azeri/Cyrillic] = &H82C  '' Azeri (Azerbaijan, Cyrillic)    az-Cyrl-AZ  Cyrl    1251
  147.     [Locale Azeri/Latin] = &H42C  '' Azeri (Azerbaijan, Latin)   az-Latn-AZ  Latn    1254
  148.     [Locale Bashkir] = &H46D  '' Windows Vista and later: Bashkir (Russia)   ba-RU
  149.     [Locale Basque] = &H42D  '' Basque (Basque)     eu-ES   Latn    1252
  150.     [Locale Belarusian] = &H423  '' Belarusian (Belarus)    be-BY   Cyrl    1251
  151.     [Locale Bengali] = &H445  '' Windows XP SP2 and later: Bengali (India)   bn-IN   Beng    Unicode only
  152.     [Locale Bosnian/Cyrillic] = &H201A '' Windows XP SP2 and later (downloadable); Windows Vista and later: Bosnian (Bosnia and Herzegovina, Cyrillic)    bs-Cyrl-BA  Cyrl    1251
  153.     [Locale Bosnian/Latin] = &H141A '' Windows XP SP2 and later: Bosnian (Bosnia and Herzegovina, Latin)   bs-Latn-BA  Latn    1250
  154.     [Locale Breton] = &H47E  '' Breton (France)     br-FR   Latn    1252
  155.     [Locale Bulgarian] = &H402  '' Bulgarian (Bulgaria)    bg-BG   Cyrl    1251
  156.     [Locale Burmese] = &H455  '' Not supported: Burmese
  157.     [Locale Catalan] = &H403  '' Catalan (Catalan)   ca-ES   Latn    1252
  158.     [Locale Chinese/Hong Kong SAR, PRC] = &HC04  '' Chinese (Hong Kong SAR, PRC)    zh-HK   Hant    950
  159.     [Locale Chinese/Macao SAR] = &H1404 '' Windows 98/Me, Windows XP and later: Chinese (Macao SAR)    zh-MO   Hant    950
  160.     [Locale Chinese/PRC] = &H804  '' Chinese (PRC)   zh-CN   Hans    936
  161.     [Locale Chinese/Singapore] = &H1004 '' Chinese (Singapore)     zh-SG   Hans    936
  162.     [Locale Chinese/Taiwan] = &H404  '' Chinese (Taiwan)    zh-TW   Hant    950
  163.     [Locale Croatian/Bosnia and Herzegovina/Latin] = &H101A '' Windows XP SP2 and later: Croatian (Bosnia and Herzegovina, Latin)  hr-BA   Latn    1250
  164.     [Locale Croatian] = &H41A  '' Croatian (Croatia)  hr-HR   Latn    1250
  165.     [Locale Czech] = &H405  '' Czech (Czech Republic)  cs-CZ   Latn    1250
  166.     [Locale Danish] = &H406  '' Danish (Denmark)    da-DK   Latn    1252
  167.     [Locale Dari] = &H48C  '' Windows XP and later: Dari (Afghanistan)    prs-AF  Arab    1256
  168.     [Locale Divehi] = &H465  '' Windows XP and later: Divehi (Maldives)     dv-MV   Thaa    Unicode only
  169.     [Locale Dutch/Belgium] = &H813  '' Dutch (Belgium)     nl-BE   Latn    1252
  170.     [Locale Dutch/Netherlands] = &H413  '' Dutch (Netherlands)     nl-NL   Latn    1252
  171.     [Locale English/Australia] = &HC09  '' English (Australia)     en-AU   Latn    1252
  172.     [Locale English/Belize] = &H2809 '' English (Belize)    en-BZ   Latn    1252
  173.     [Locale English/Canada] = &H1009 '' English (Canada)    en-CA   Latn    1252
  174.     [Locale English/Caribbean] = &H2409 '' English (Caribbean)     en-029  Latn    1252
  175.     [Locale English/India] = &H4009 '' Windows Vista and later: English (India)    en-IN   Latn    1252
  176.     [Locale English/Ireland] = &H1809 '' English (Ireland)   en-IE   Latn    1252
  177.     [Locale English/Jamaica] = &H2009 '' English (Jamaica)   en-JM   Latn    1252
  178.     [Locale English/Malaysia] = &H4409 '' Windows Vista and later: English (Malaysia)     en-MY   Latn    1252
  179.     [Locale English/New Zealand] = &H1409 '' English (New Zealand)   en-NZ   Latn    1252
  180.     [Locale English/Philippines] = &H3409 '' Windows 98/Me, Windows 2000 and later: English (Philippines)    en-PH   Latn    1252
  181.     [Locale English/Singapore] = &H4809 '' Windows Vista and later: English (Singapore)    en-SG   Latn    1252
  182.     [Locale English/South Africa] = &H1C09 '' English (South Africa)  en-ZA   Latn    1252
  183.     [Locale English/Trinidad and Tobago] = &H2C09 '' English (Trinidad and Tobago)   en-TT   Latn    1252
  184.     [Locale English/United Kingdom] = &H809  '' English (United Kingdom)    en-GB   Latn    1252
  185.     [Locale English/United States] = &H409  '' English (United States)     en-US   Latn    1252
  186.     [Locale English/Zimbabwe] = &H3009 '' Windows 98/Me, Windows 2000 and later: English (Zimbabwe)   en-ZW   Latn    1252
  187.     [Locale Estonian] = &H425  '' Estonian (Estonia)  et-EE   Latn    1257
  188.     [Locale Faroese] = &H438  '' Faroese (Faroe Islands)     fo-FO   Latn    1252
  189.     [Locale Filipino] = &H464  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Filipino (Philippines)    fil-PH  Latn    1252
  190.     [Locale Finnish] = &H40B  '' Finnish (Finland)   fi-FI   Latn    1252
  191.     [Locale French/Belgium] = &H80C  '' French (Belgium)    fr-BE   Latn    1252
  192.     [Locale French/Canada] = &HC0C  '' French (Canada)     fr-CA   Latn    1252
  193.     [Locale French/France] = &H40C  '' French (France)     fr-FR   Latn    1252
  194.     [Locale French/Luxembourg] = &H140C '' French (Luxembourg)     fr-LU   Latn    1252
  195.     [Locale French/Monaco] = &H180C '' French (Monaco)     fr-MC   Latn    1252
  196.     [Locale French/Switzerland] = &H100C '' French (Switzerland)    fr-CH   Latn    1252
  197.     [Locale Frisian] = &H462  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Frisian (Netherlands)     fy-NL   Latn    1252
  198.     [Locale Galician] = &H456  '' Windows XP and later: Galician (Spain)  gl-ES   Latn    1252
  199.     [Locale Georgian] = &H437  '' Windows 2000 and later: Georgian (Georgia)  ka-GE   Geor    Unicode only
  200.     [Locale German/Austria] = &HC07  '' German (Austria)    de-AT   Latn    1252
  201.     [Locale German/Germany] = &H407  '' German (Germany)    de-DE   Latn    1252
  202.     [Locale German/Liechtenstein] = &H1407 '' German (Liechtenstein)  de-LI   Latn    1252
  203.     [Locale German/Luxembourg] = &H1007 '' German (Luxembourg)     de-LU   Latn    1252
  204.     [Locale German/Switzerland] = &H807  '' German (Switzerland)    de-CH   Latn    1252
  205.     [Locale Greek] = &H408  '' Greek (Greece)  el-GR   Grek    1253
  206.     [Locale Greenlandic] = &H46F  '' Windows Vista and later: Greenlandic (Greenland)    kl-GL   Latn    1252
  207.     [Locale Gujarati] = &H447  '' Windows XP and later: Gujarati (India)  gu-IN   Gujr    Unicode only
  208.     [Locale Hausa] = &H468  '' Windows Vista and later: Hausa (Nigeria, Latin)     ha-Latn-NG  Latn    1252
  209.     [Locale Hebrew] = &H40D  '' Hebrew (Israel)     he-IL   Hebr    1255
  210.     [Locale Hindi] = &H439  '' Windows 2000 and later: Hindi (India)   hi-IN   Deva    Unicode only
  211.     [Locale Hungarian] = &H40E  '' Hungarian (Hungary)     hu-HU   Latn    1250
  212.     [Locale Icelandic] = &H40F  '' Icelandic (Iceland)     is-IS   Latn    1252
  213.     [Locale Igbo] = &H470  '' Igbo (Nigeria)  ig-NG
  214.     [Locale Indonesian] = &H421  '' Indonesian (Indonesia)  id-ID   Latn    1252
  215.     [Locale Inuktitut/Latin] = &H85D  '' Windows XP and later: Inuktitut (Canada, Latin)     iu-Latn-CA  Latn    1252
  216.     [Locale Inuktitut/Syllabics] = &H45D  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Inuktitut (Canada, Syllabics)     iu-Cans-CA  Cans    Unicode only
  217.     [Locale Irish] = &H83C  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Irish (Ireland)   ga-IE   Latn    1252
  218.     [Locale Italian/Italy] = &H410  '' Italian (Italy)     it-IT   Latn    1252
  219.     [Locale Italian/Switzerland] = &H810  '' Italian (Switzerland)   it-CH   Latn    1252
  220.     [Locale Japanese] = &H411  '' Japanese (Japan)    ja-JP   Hani;Hira;Kana  932
  221.     [Locale Kannada] = &H44B  '' Windows XP and later: Kannada (India)   kn-IN   Knda    Unicode only
  222.     [Locale Kazakh] = &H43F  '' Windows 2000 and later: Kazakh (Kazakhstan)     kk-KZ   Cyrl    1251
  223.     [Locale Khmer] = &H453  '' Windows Vista and later: Khmer (Cambodia)   kh-KH   Khmr    Unicode only
  224.     [Locale K'iche] = &H486  '' Windows Vista And later: K 'iche (Guatemala)     qut-GT  Latn    1252
  225.     [Locale Kinyarwanda] = &H487  '' Windows Vista and later: Kinyarwanda (Rwanda)   rw-RW   Latn    1252
  226.     [Locale Konkani] = &H457  '' Windows 2000 and later: Konkani (India)     kok-IN  Deva    Unicode only
  227.     [Locale Korean/Johab] = &H812  '' Windows 95, Windows NT 4.0 only: Korean (Johab)
  228.     [Locale Korean/Korea] = &H412  '' Korean (Korea)  ko-KR   Hang;Hani   949
  229.     [Locale Kyrgyz] = &H440  '' Windows XP and later: Kyrgyz (Kyrgyzstan)   ky-KG   Cyrl    1251
  230.     [Locale Lao] = &H454  '' Windows Vista and later: Lao (Lao PDR)  lo-LA   Laoo    Unicode only
  231.     [Locale Latvian] = &H426  '' Latvian (Latvia)    lv-LV   Latn    1257
  232.     [Locale Lithuanian] = &H427  '' Lithuanian (Lithuania)  lt-LT   Latn    1257
  233.     [Locale Lower Sorbian] = &H82E  '' Windows Vista and later: Lower Sorbian (Germany)    dsb-DE  Latn    1252
  234.     [Locale Luxembourgish] = &H46E  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Luxembourgish (Luxembourg)    lb-LU   Latn    1252
  235.     [Locale Macedonia] = &H42F  '' Windows 2000 and later: Macedonian (Macedonia, FYROM)   mk-MK   Cyrl    1251
  236.     [Locale Malay/Brunei Darussalam] = &H83E  '' Windows 2000 and later: Malay (Brunei Darussalam)   ms-BN   Latn    1252
  237.     [Locale Malay/Malaysia] = &H43E  '' Windows 2000 and later: Malay (Malaysia)    ms-MY   Latn    1252
  238.     [Locale Malayalam] = &H44C  '' Windows XP SP2 and later: Malayalam (India)     ml-IN   Mlym    Unicode only
  239.     [Locale Maltese] = &H43A  '' Windows XP SP2 and later: Maltese (Malta)   mt-MT   Latn    1252
  240.     [Locale Maori] = &H481  '' Windows XP SP2 and later: Maori (New Zealand)   mi-NZ   Latn    1252
  241.     [Locale Mapudungun] = &H47A  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Mapudungun (Chile)    arn-CL  Latn    1252
  242.     [Locale Marathi] = &H44E  '' Windows 2000 and later: Marathi (India)     mr-IN   Deva    Unicode only
  243.     [Locale Mohawk] = &H47C  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Mohawk (Canada)   moh-CA  Latn    1252
  244.     [Locale Mongolian/Mongolia] = &H450  '' Windows XP and later: Mongolian (Mongolia)  mn-Cyrl-MN  Cyrl    1251
  245.     [Locale Mongolian/PRC] = &H850  '' Windows Vista and later: Mongolian (PRC)    mn-Mong-CN  Mong    Unicode only
  246.     [Locale Nepali] = &H461  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Nepali (Nepal)    ne-NP   Deva    Unicode only
  247.     [Locale Norwegian/Bokmσl] = &H414  '' Norwegian (Bokmσl, Norway)  nb-NO   Latn    1252
  248.     [Locale Norwegian/Nynorsk] = &H814  '' Norwegian (Nynorsk, Norway)     nn-NO   Latn    1252
  249.     [Locale Occitan] = &H482  '' Occitan (France)    oc-FR   Latn    1252
  250.     [Locale Oriya] = &H448  '' Oriya (India)   or-IN   Orya    Unicode only
  251.     [Locale Pashto] = &H463  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Pashto (Afghanistan)  ps-AF
  252.     [Locale Persian] = &H429  '' Persian (Iran)  fa-IR   Arab    1256
  253.     [Locale Polish] = &H415  '' Polish (Poland)     pl-PL   Latn    1250
  254.     [Locale Portuguese/Brazil] = &H416  '' Portuguese (Brazil)     pt-BR   Latn    1252
  255.     [Locale Portuguese/Portugal] = &H816  '' Portuguese (Portugal)   pt-PT   Latn    1252
  256.     [Locale Punjabi] = &H446  '' Windows XP and later: Punjabi (India)   pa-IN   Guru    Unicode only
  257.     [Locale Quechua/Bolivia] = &H46B  '' Windows XP SP2 and later: Quechua (Bolivia)     quz-BO  Latn    1252
  258.     [Locale Quechua/Ecuador] = &H86B  '' Windows XP SP2 and later: Quechua (Ecuador)     quz-EC  Latn    1252
  259.     [Locale Quechua/Peru] = &HC6B  '' Windows XP SP2 and later: Quechua (Peru)    quz-PE  Latn    1252
  260.     [Locale Romanian] = &H418  '' Romanian (Romania)  ro-RO   Latn    1250
  261.     [Locale Romansh] = &H417  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Romansh (Switzerland)     rm-CH   Latn    1252
  262.     [Locale Russian] = &H419  '' Russian (Russia)    ru-RU   Cyrl    1251
  263.     [Locale Sami/Inari] = &H243B '' Windows XP SP2 and later: Sami (Inari, Finland)     smn-FI  Latn    1252
  264.     [Locale Sami/Lule/Norway] = &H103B '' Windows XP SP2 and later: Sami (Lule, Norway)   smj-NO  Latn    1252
  265.     [Locale Sami/Lule/Sweden] = &H143B '' Windows XP SP2 and later: Sami (Lule, Sweden)   smj-SE  Latn    1252
  266.     [Locale Sami/Northern/Finland] = &HC3B  '' Windows XP SP2 and later: Sami (Northern, Finland)  se-FI   Latn    1252
  267.     [Locale Sami/Northern/Norway] = &H43B  '' Windows XP SP2 and later: Sami (Northern, Norway)   se-NO   Latn    1252
  268.     [Locale Sami/Northern/Sweden] = &H83B  '' Windows XP SP2 and later: Sami (Northern, Sweden)   se-SE   Latn    1252
  269.     [Locale Sami/Skolt/Finland] = &H203B '' Windows XP SP2 and later: Sami (Skolt, Finland)     sms-FI  Latn    1252
  270.     [Locale Sami/Southern/Norway] = &H183B '' Windows XP SP2 and later: Sami (Southern, Norway)   sma-NO  Latn    1252
  271.     [Locale Sami/Southern/Sweden] = &H1C3B '' Windows XP SP2 and later: Sami (Southern, Sweden)   sma-SE  Latn    1252
  272.     [Locale Sanskrit] = &H44F  '' Windows 2000 and later: Sanskrit (India)    sa-IN   Deva    Unicode only
  273.     [Locale Serbian/Bosnia and Herzegovina/Cyrillic] = &H1C1A '' Windows XP SP2 and later: Serbian (Bosnia and Herzegovina, Cyrillic)    sr-Cyrl-BA  Cyrl    1251
  274.     [Locale Serbian/Bosnia and Herzegovina/Latin] = &H181A '' Windows XP SP2 and later: Serbian (Bosnia and Herzegovina, Latin)   sr-Latn-BA  Latn    1250
  275.     [Locale Serbian/Serbia/Cyrillic] = &HC1A  '' Serbian (Serbia, Cyrillic)  sr-Cyrl-CS  Cyrl    1251
  276.     [Locale Serbian/Serbia/Latin] = &H81A  '' Serbian (Serbia, Latin)     sr-Latn-CS  Latn    1250
  277.     [Locale Sesotho sa Leboa] = &H46C  '' Windows XP SP2 and later: Sesotho sa Leboa/Northern Sotho (South Africa)    ns-ZA   Latn    1252
  278.     [Locale Setswana / Tswana] = &H432  '' Windows XP SP2 and later: Setswana/Tswana (South Africa)    tn-ZA   Latn    1252
  279.     [Locale Sinhala] = &H45B  '' Windows Vista and later: Sinhala (Sri Lanka)    si-LK   Sinh    Unicode only
  280.     [Locale Slovak] = &H41B  '' Slovak (Slovakia)   sk-SK   Latn    1250
  281.     [Locale Slovenian] = &H424  '' Slovenian (Slovenia)    sl-SI   Latn    1250
  282.     [Locale Spanish/Argentina] = &H2C0A '' Spanish (Argentina)     es-AR   Latn    1252
  283.     [Locale Spanish/Bolivia] = &H400A '' Spanish (Bolivia)   es-BO   Latn    1252
  284.     [Locale Spanish/Chile] = &H340A '' Spanish (Chile)     es-CL   Latn    1252
  285.     [Locale Spanish/Colombia] = &H240A '' Spanish (Colombia)  es-CO   Latn    1252
  286.     [Locale Spanish/Costa Rica] = &H140A '' Spanish (Costa Rica)    es-CR   Latn    1252
  287.     [Locale Spanish/Dominican Republic] = &H1C0A '' Spanish (Dominican Republic)    es-DO   Latn    1252
  288.     [Locale Spanish/Ecuador] = &H300A '' Spanish (Ecuador)   es-EC   Latn    1252
  289.     [Locale Spanish/El Salvador] = &H440A '' Spanish (El Salvador)   es-SV   Latn    1252
  290.     [Locale Spanish/Guatemala] = &H100A '' Spanish (Guatemala)     es-GT   Latn    1252
  291.     [Locale Spanish/Honduras] = &H480A '' Spanish (Honduras)  es-HN   Latn    1252
  292.     [Locale Spanish/Mexico] = &H80A  '' Spanish (Mexico)    es-MX   Latn    1252
  293.     [Locale Spanish/Nicaragua] = &H4C0A '' Spanish (Nicaragua)     es-NI   Latn    1252
  294.     [Locale Spanish/Panama] = &H180A '' Spanish (Panama)    es-PA   Latn    1252
  295.     [Locale Spanish/Paraguay] = &H3C0A '' Spanish (Paraguay)  es-PY   Latn    1252
  296.     [Locale Spanish/Peru] = &H280A '' Spanish (Peru)  es-PE   Latn    1252
  297.     [Locale Spanish/Puerto Rico] = &H500A '' Spanish (Puerto Rico)   es-PR   Latn    1252
  298.     [Locale Spanish/Spain] = &HC0A  '' Spanish (Spain)     es-ES   Latn    1252
  299.     [Locale Spanish/Spain Traditional] = &H40A  '' Spanish (Spain, Traditional Sort)   es-ES_tradnl    Latn    1252
  300.     [Locale Spanish/United States] = &H540A '' Windows Vista and later: Spanish (United States)    es-US
  301.     [Locale Spanish/Uruguay] = &H380A '' Spanish (Uruguay)   es-UY   Latn    1252
  302.     [Locale Spanish/Venezuela] = &H200A '' Spanish (Venezuela)     es-VE   Latn    1252
  303.     [Locale Sutu] = &H430  '' Not supported: Sutu
  304.     [Locale Swahili] = &H441  '' Windows 2000 and later: Swahili (Kenya)     sw-KE   Latn    1252
  305.     [Locale Swedish/Finland] = &H81D  '' Swedish (Finland)   sv-FI   Latn    1252
  306.     [Locale Swedish/Sweden] = &H41D  '' Swedish (Sweden)    sv-SE   Latn    1252
  307.     [Locale Syriac] = &H45A  '' Windows XP and later: Syriac (Syria)    syr-SY  Syrc    Unicode only
  308.     [Locale Tajik] = &H428  '' Windows Vista and later: Tajik (Tajikistan)     tg-Cyrl-TJ  Cyrl    1251
  309.     [Locale Tamazight] = &H85F  '' Windows Vista and later: Tamazight (Algeria, Latin)     tmz-Latn-DZ     Latn    1252
  310.     [Locale Tamil] = &H449  '' Windows 2000 and later: Tamil (India)   ta-IN   Taml    Unicode only
  311.     [Locale Tatar] = &H444  '' Windows XP and later: Tatar (Russia)    tt-RU   Cyrl    1251
  312.     [Locale Telugu] = &H44A  '' Windows XP and later: Telugu (India)    te-IN   Telu    Unicode only
  313.     [Locale Thai] = &H41E  '' Thai (Thailand)     th-TH   Thai    874
  314.     [Locale Tibetan/Bhutan] = &H851  '' Windows Vista and later: Tibetan (Bhutan)   bo-BT   Tibt    Unicode only
  315.     [Locale Tibetan/PRC] = &H451  '' Windows Vista and later: Tibetan (PRC)  bo-CN   Tibt    Unicode only
  316.     [Locale Turkish] = &H41F  '' Turkish (Turkey)    tr-TR   Latn    1254
  317.     [Locale Turkmen] = &H442  '' Windows Vista and later: Turkmen (Turkmenistan)     tk-TM   Cyrl    1251
  318.     [Locale Uighur] = &H480  '' Windows Vista and later: Uighur (PRC)   ug-CN   Arab    1256
  319.     [Locale Ukrainian] = &H422  '' Ukrainian (Ukraine)     uk-UA   Cyrl    1251
  320.     [Locale Upper Sorbian] = &H42E  '' Windows Vista and later: Upper Sorbian (Germany)    wen-DE  Latn    1252
  321.     [Locale Urdu/India] = &H820  '' Urdu (India)    tr-IN
  322.     [Locale Urdu/Pakistan] = &H420  '' Windows 98/Me, Windows 2000 and later: Urdu (Pakistan)  ur-PK   Arab    1256
  323.     [Locale Uzbek/Cyrillic] = &H843  '' Windows 2000 and later: Uzbek (Uzbekistan, Cyrillic)    uz-Cyrl-UZ  Cyrl    1251
  324.     [Locale Uzbek/Latin] = &H443  '' Windows 2000 and later: Uzbek (Uzbekistan, Latin)   uz-Latn-UZ  Latn    1254
  325.     [Locale Vietnamese] = &H42A  '' Windows 98/Me, Windows NT 4.0 and later: Vietnamese (Vietnam)   vi-VN   Latn    1258
  326.     [Locale Welsh] = &H452  '' Windows XP SP2 and later: Welsh (United Kingdom)    cy-GB   Latn    1252
  327.     [Locale Wolof] = &H488  '' Windows Vista and later: Wolof (Senegal)    wo-SN   Latn    1252
  328.     [Locale Xhosa / isiXhosa] = &H434  '' Windows XP SP2 and later: Xhosa/isiXhosa (South Africa)     xh-ZA   Latn    1252
  329.     [Locale Yakut] = &H485  '' Windows Vista and later: Yakut (Russia)     sah-RU  Cyrl    1251
  330.     [Locale Yi] = &H478  '' Windows Vista and later: Yi (PRC)   ii-CN   Yiii    Unicode only
  331.     [Locale Yoruba] = &H46A  '' Windows Vista and later: Yoruba (Nigeria)   yo-NG
  332.     [Locale Zulu / isiZulu] = &H435  '' Windows XP SP2 and later: Zulu/isiZulu (South Africa)   zu-ZA   Latn    1252
  333. End Enum
  334.  
  335. ' Mouse button constants
  336. Public Enum UniListMouseButton
  337.     [No Button] = 0
  338.     [Left Button] = vbLeftButton
  339.     [Right Button] = vbRightButton
  340.     [Left And Right Button] = vbLeftButton Or vbRightButton
  341.     [Middle Button] = vbMiddleButton
  342.     [Left And Middle Button] = vbLeftButton Or vbMiddleButton
  343.     [Right And Middle Button] = vbRightButton Or vbMiddleButton
  344.     [All Buttons] = vbLeftButton Or vbRightButton Or vbMiddleButton
  345. End Enum
  346.  
  347. Public Enum UniListMouseWheel
  348.     [Wheel Down]
  349.     [Wheel Up]
  350. End Enum
  351.  
  352. Public Enum UniListScrollBarVisibility
  353.     [Allow No ScrollBars] = False
  354.     [Disable No ScrollBars] = True
  355. End Enum
  356.  
  357. ' Scroll direction constants
  358. Public Enum UniListScrollDirection
  359.     [Scroll Horizontal] = vbHorizontal
  360.     [Scroll Vertical] = vbVertical
  361. End Enum
  362.  
  363. ' Shift constants
  364. Public Enum UniListShift
  365.     [No Mask] = 0
  366.     [Shift Mask] = vbShiftMask
  367.     [Ctrl Mask] = vbCtrlMask
  368.     [Shift And Ctrl Mask] = vbShiftMask Or vbCtrlMask
  369.     [Alt Mask] = vbAltMask
  370.     [Shift And Alt Mask] = vbShiftMask Or vbAltMask
  371.     [Ctrl And Alt Mask] = vbCtrlMask Or vbAltMask
  372.     [All Masks] = vbShiftMask Or vbCtrlMask Or vbAltMask
  373. End Enum
  374.  
  375. Private Const BDR_INNER = &HC
  376. Private Const BDR_OUTER = &H3
  377. Private Const BDR_RAISED = &H5
  378. Private Const BDR_RAISEDINNER = &H4
  379. Private Const BDR_RAISEDOUTER = &H1
  380. Private Const BDR_SUNKEN = &HA
  381. Private Const BDR_SUNKENINNER = &H8
  382. Private Const BDR_SUNKENOUTER = &H2
  383. Private Const BF_BOTTOM = &H8
  384. Private Const BF_LEFT = &H1
  385. Private Const BF_RIGHT = &H4
  386. Private Const BF_TOP = &H2
  387. Private Const BF_RECT = (BF_LEFT Or BF_TOP Or BF_RIGHT Or BF_BOTTOM)
  388. Private Const EDGE_BUMP = (BDR_RAISEDOUTER Or BDR_SUNKENINNER)
  389. Private Const EDGE_ETCHED = (BDR_SUNKENOUTER Or BDR_RAISEDINNER)
  390. Private Const EDGE_RAISED = (BDR_RAISEDOUTER Or BDR_RAISEDINNER)
  391. Private Const EDGE_SUNKEN = (BDR_SUNKENOUTER Or BDR_SUNKENINNER)
  392.  
  393. Private Const LB_ADDSTRING As Long = &H180
  394. Private Const LB_RESETCONTENT As Long = &H184&
  395. Private Const LB_DELETESTRING As Long = &H182&
  396. Private Const LB_INSERTSTRING As Long = &H181&
  397. Private Const LB_FINDSTRING As Long = &H18F&
  398. Private Const LB_FINDSTRINGEXACT As Long = &H1A2&
  399. Private Const LB_SELECTSTRING As Long = &H18C&
  400. Private Const LB_GETTEXT As Long = &H189&
  401. Private Const LB_GETTEXTLEN As Long = &H18A&
  402. Private Const LB_SETTEXT As Long = &H1AA&
  403. Private Const LB_GETITEMDATA As Long = &H199&
  404. Private Const LB_SETITEMDATA As Long = &H19A&
  405. Private Const LB_SETTABSTOPS As Long = &H192&
  406. Private Const LB_GETITEMHEIGHT As Long = &H1A1&
  407. Private Const LB_GETITEMRECT As Long = &H198&
  408. Private Const LB_GETTOPINDEX As Long = &H18E&
  409. Private Const LB_SETTOPINDEX = &H197
  410. Private Const LB_SELITEMRANGEEX As Long = &H183&
  411. Private Const LB_SELITEMRANGE As Long = &H19B&
  412. Private Const LB_GETCOUNT As Long = &H18B&
  413. Private Const LB_GETCURSEL As Long = &H188&
  414. Private Const LB_SETCURSEL As Long = &H186&
  415. Private Const LB_GETSELCOUNT As Long = &H190&
  416. Private Const LB_GETSELITEMS As Long = &H191&
  417. Private Const LB_GETCARETINDEX As Long = &H19F&
  418. Private Const LB_SETCARETINDEX As Long = &H19E&
  419. Private Const LB_GETSEL As Long = &H187&
  420. Private Const LB_SETSEL As Long = &H185&
  421. Private Const LB_GETLOCALE = &H1A6
  422. Private Const LB_SETLOCALE = &H1A5
  423. Private Const LB_SETCOLUMNWIDTH = &H195
  424. Private Const LB_INITSTORAGE = &H1A8
  425. Private Const LB_GETANCHORINDEX = &H19D
  426. Private Const LB_SETANCHORINDEX = &H19C
  427. Private Const LB_GETHORIZONTALEXTENT = &H193
  428. Private Const LB_SETHORIZONTALEXTENT = &H194
  429.  
  430. Private Const LBS_NOTIFY = &H1
  431. Private Const LBS_SORT = &H2
  432. Private Const LBS_NOREDRAW = &H4
  433. Private Const LBS_MULTIPLESEL = &H8
  434. Private Const LBS_OWNERDRAWFIXED = &H10
  435. Private Const LBS_OWNERDRAWVARIABLE = &H20
  436. Private Const LBS_HASSTRINGS = &H40
  437. Private Const LBS_USETABSTOPS = &H80
  438. Private Const LBS_NOINTEGRALHEIGHT = &H100
  439. Private Const LBS_MULTICOLUMN = &H200
  440. Private Const LBS_WANTKEYBOARDINPUT = &H400
  441. Private Const LBS_EXTENDEDSEL = &H800
  442. Private Const LBS_DISABLENOSCROLL = &H1000
  443. Private Const LBS_NODATA = &H2000
  444. Private Const LBS_NOSEL = &H4000
  445.  
  446. Private Const ES_AUTOVSCROLL = &H40&
  447. Private Const ES_AUTOHSCROLL = &H80&
  448. Private Const ES_CENTER = &H1&
  449. Private Const ES_LEFT = &H0&
  450. Private Const ES_NOHIDESEL = &H100&
  451. Private Const ES_RIGHT = &H2&
  452. Private Const ES_WANTRETURN = &H1000&
  453.  
  454. Private Const GWL_EXSTYLE As Long = -20&
  455. Private Const GWL_STYLE As Long = -16&
  456.  
  457. Private Const VK_DOWN = &H28
  458. Private Const VK_END = &H23
  459. Private Const VK_HOME = &H24
  460. Private Const VK_LEFT = &H25
  461. Private Const VK_RETURN = &HD
  462. Private Const VK_RIGHT = &H27
  463. Private Const VK_TAB = &H9
  464. Private Const VK_UP = &H26
  465.  
  466. Private Const WS_BORDER = &H800000
  467. Private Const WS_CHILD = &H40000000
  468. Private Const WS_HSCROLL = &H100000
  469. Private Const WS_VISIBLE = &H10000000
  470. Private Const WS_VSCROLL = &H200000
  471.  
  472. ' WM_MOUSEMOVE and others
  473. Private Const MK_LBUTTON = &H1&
  474. Private Const MK_RBUTTON = &H2&
  475. Private Const MK_SHIFT = &H4&
  476. Private Const MK_CONTROL = &H8&
  477. Private Const MK_MBUTTON = &H10&
  478.  
  479. ' window messages
  480. Private Const WM_CHAR = &H102&
  481. Private Const WM_COMMAND = &H111&
  482. Private Const WM_CREATE = &H1&
  483. Private Const WM_CTLCOLOREDIT = &H133&
  484. Private Const WM_CTLCOLORSTATIC = &H138&
  485. Private Const WM_DESTROY = &H2&
  486. Private Const WM_ERASEBKGND = &H14
  487. Private Const WM_GETTEXT = &HD
  488. Private Const WM_GETTEXTLENGTH = &HE
  489. Private Const WM_HSCROLL = &H114
  490. Private Const WM_KEYDOWN = &H100
  491. Private Const WM_KEYUP = &H101
  492. Private Const UP =vate Consrrrrri &H800000BDR__aaaaate GTH pS-LBUTTON = &H1&E81A  '' Serbian (SerbBaaaate GTH pS-LBUTTON = &H1&E81A  '' Sg(Data As DatFFAH1&E81A INTEGRALHttH188&
  493. Private Const LB_SETCURSEL As te Co/Paraguay]I)   es-UY   Latn    1252
  494.     [Locale Spanish/Venezuela] = &H200A '' Spanish WESTROYtem101
  495.  es-UY   tem10U= &H100ivate Const WM_Csst ES_WANTRETU5287&
  496. Private Const LB_SETSte Const WM_,vate Const LB_SETSte Const WM_,vate Const LB_SETe Const ES_FnstwDMAs   [LbPrivate Const Wuonst /Par1X"nsstOoddddddwDMAs   [LbPrn
  497.     [A6st VK_TAB = &H9
  498. Private Const VK_UP = &H26PiAB=vate MC5&
  499. Private Con0st Wuonst /Par1X"nssthtButton Or vConsR0&H25
  500. Privat BDaMa6P = &H26PiAB=vatomale Setsssssssssss_TAB = &H9
  501. Private Const VK_UP = Socale ST[LbPrivatn2cale Yi] = &H478  '' Windows Vista and laterzech RepueI)   es-UY   L:f VK_UP = Socat9
  502. PrivaoAs te Co/Paraguay]I)ue only
  503.     [Lo_r: SC/Paraguay]I)ue only
  504.     [Lo_r: SC/Parrrrrr te s LaaCE2Windows Vi WM_KEYDOWN = &H1rO/S_CHILD = &H4002
  505.  O/S_CHILD = &H4002
  506.  O/188&
  507. Private Co.1&E81A  '' Serbian (SerbBaaaate  SC/ParrrrCHILDs XPMM_,vate Const nD
  508.     [Lo_r: SC/PDT9H1r Latn   S/Par1X"nsX"nsstOoddddddwDMAs   [LbPrn
  509.     [A6st VK_Tmn)   [Lo_r: SCe); Windvate MC5&
  510. PrivS/Par1X"_KEPrn
  511.     [Ate  SC/ParrrrCHILDs h    Prn'' Ser VK_Tmn) Prn'' Ser VK_Tmniiiiimn) Prn'' l81A  '' Serbian (SerbBBBBB    [Locale Croatian] = &H41A  '' CrWM_,e'' Ser VK_TmniiiSernsX"B = &rn'' Scaale CCLocale Croatian] = -o
  512.  O/S_sela] = ;7&
  513. Ptian] = -o
  514.  O/S_sela] = ;7&UEYBOARDI_r: SC/PDT9H1r ENDEDSEL = &H8004sRSe   1252
  515.     [X = -o52
  516.    LatnQUERY = &H40000000
  517.     TME_CANCEL = &H80000000
  518. End Enum
  519.  
  520. Publierbian (SerbBaaaate  SCivaY = &HHHHHHHHHe_SETCURSEL 'OoddddddwDMAs   [LbBmSELtURSEL 'OoddddddwDMAs   [LbBmSELtURSEL 'OoddddddwDMAs   [LbBmSELtURSEL 'OoddddddwDMAs   [LbBmSELtURSEL 'OoddddddwDMAs   [LbBmSELtURSE&H14
  521. PrSCROvate ConstHe Yi] 8&
  522. PrivaHHHHHrn''tdddwDM8&
  523. Private Const WM_DESTROY = &H2&
  524. Private Const WM_ERASEBKGND = &H14
  525. Private Const WM_GETTEXT = &HD
  526. Private Const WM_GETTEXTLENGTH = &HE
  527. Private ConsDer: Yakut (Russia)     sah-RU  Cyv Wroatian] =oOsO  1252ieeSerbian (SerbBaaaate GT4olor  8K_Tmn[Locale U05 Wroatian] =oOsO  1252oM_GETTEXTLENGTH ,aY = B_SETTEXT As Long = ); WindowConst roatian] =oOsO  1252oM_GETTEXTssssssSLocale Sa WM_DESTY = l (Luxembourg)    lb-LU   LaaeAISEDOUTER = &H1
  528. Private Const BDR_SUNKEN = &HACANCEVh Arab    1256
  529.     [LocaliT Const LBSSSSSSSS(Japan)    ja-JP   Hani;Hira;Kana  9onst VK_UP = Socale ST[LbPriF] = &H47 ar-TN   [LbPriF] = &H47  Const ES_Fnstwszos   [L OLbPri [LocalLocnistan)     tk-TMng = &HK_Tmniiiiimno' SerConst Les-P Windows XP SP2 and later: Xhosa/isiXhosa (South Africa)     xh-ZA   Latn    1252
  530.     [Locale Yakut] = &H485  '' Windows Vista and later: Yakut indn] =oOxxxxxxxxxxxxxxxxne)     uk-UA 4ata AY   lbvate CoTHORIZONTALEXTENT = &H193
  531. Private Const LB_SETHORIZONTALEXTENT = &H194
  532.  
  533. Privateata AY   VPrivate Const LB_SETHORIZONTALEXTENT = &o52
  534.   t LB_te C1
  535. Private Const BDR_SUNKEN = &HACANCEVh Ara-ZA   Latn    1252
  536.     [LHHHHHHy, = .oo,(SerbBaaaate  SCCANst LB_RESETCONTENT As Long = &H184&
  537. Private Const L+    5CCANst LB_RESETCONTENT As &H+    5CCANst LB_RESETCONTENT2LtURSENT'    [Locale Mapudungun] = &H47A  '' Windows XP SP2 and later (downloadable); Windows Vista and later: Mapudungun (Chile)    arn-CL  Latn    1252
  538.     [Locale Marathi] = &H44E  '' Windows 2000 and later: Marathi (India)     mr-IN   Deva    Unicode orfian/N[-BR  
  539. PrivenchEr93oatia = &) cN   DevaenchE3&&LBS_DISABLENOSCROLL = &H100 TLBs are IZON [Locale MaTLBs are IZON&) cNCHORINDEX = &H19C
  540. Private Co cNCHORINate  SLXva    bMng =NCHchEr93oatia = &) cNrte Coldows XP SP2 Deva,LBS_DISABLENOSCROLL = &H100 T[LoBS_DIws XP SP2 and later (dooBSTLBs are 6
  541. Private Ce Co2 Deva,LBS_DISABLENOSCROLL =nada, Latin0 P SP2 and later (di1&
  542. PrivaZON&) cNCHORIhws  sr-Latn-BA  L] = &H200A ltnamese] oAs te Co/ParaguU184&
  543. Privo/ParaguU184&P.IhwsdrMapudun3
  544. Private Const BDR_RAISEBelgium] = &H80C  '' French (Belgium)    fr-BE  iUe  fr-BE  iI= &HE
  545. Prd52
  546.     [   r (doelgiu   Prn'' Ser VK4dows Xk Or v'tdddwDM8&
  547. Private Const WM_DESTROY = &H2&
  548. Private Const WM_ERASEBKGND = &H14
  549. Private ConO6P2' WTG'sS&
  550. Pri
  551. P=oOsO  1252ieeSerbia)&t LlraWM_ERA WM_ERASEBKGND = &H12' WTG'sS&
  552. Pri
  553. P=oOsO  125 WM_DESTROYDF1&
  554. P= &H4444444BCConO6P2' WTG'sS&
  555. Pri
  556. P=oOsO  1252ieeSerbia)&t LlraWM_ERA WM_ts LD125dnloC2ieeSerbip1s andS(H1&E81A  '06LlraWM_ERASerbBMala81AF/Ves  a2O6P2'b_ERASerbLD125d   [Locale QuecBLENOSSerbLD125d   [Locale QuecBLENOSSerbLD125d (ttttttttttRASerbBMala8 ur-PK Par1ie0an] =  WM_ts LDi)  gl-ES   Latn    1252
  557.     [Locale Georgian] = &H437  '' Windows 2000 and later: GeorLbian ( = &H2Private Const-WeSerbip1s and: GeorLbian ( = -WeSerbip1s and: SSSSSSS(JalIR= vbkRit supporteda   Xv  ''o
  558.  O/S_se= &H14
  559. Private ConPo
  560.  O/S_se= 6doLLocale Spa &H14
  561. Private ConPo
  562.  O/S_se= 6doLLocale Spa &H14
  563. Private ConPob
  564.     [Rite Con2y
  565.     [Lo_r WMOR'=TistMouseWheel
  566.  5
  567.  
  568. l (ate ConPCyrl    125R
  569.     [LotUCon2ynst LBy
  570.      Latin0 e5 Wroatian] =oOLL =nada, WvatsO2e)  gsw-FASerbDCrrrrrrrrrrrrrrr GermaF5pa &H4oarrrrrrrrxl: MD1A  'BLENOa(on2ynst LBy
  571.      Latin0 e5 Wroatian] =oOLL =nada, WvatsO2e)  gsriUe d Enum
  572.  
  573. Publierbiaaaaaaaaasbrbin] = -o
  574.  O/S_sela] = ;7&
  575. Ptndows XP SP2 and later (downloadable); Windows Vista and later: Frisian (Netherlands)     fy-NL   in] = -o
  576.  O Frisian (ter: Frisian (Netherlands)   nd later: Yakut indn] =oOxxxxxxxxxxxxxxxxne)     uk1111111111 ands) V/Tatia = &) cN   y&H80C A V/Tatia = &) rD0
  577. Privatet V  Windows XP and latia = &1 anddnENOa(nENOa(nENOa(FrisianBrivate Const LB_SETTEXT As Long = &H1AA&
  578. Pri+DATA As Lo etia = [LotUCon2ynst LBrist V F] = &a(nENws XP aRTTEXT As Long = &H1AA&
  579. Pri+H12ba= aRTlater: GeorLbian ( =TYLE As Long = -aaaasbrbin] =HM
  580.     [LotUCDIS(doelgiu  i+H12ba= aRTlter: GeorLbian _SETusGeorL125dxxxxxxxxxS(doelgiu  i+H12ba= aRTlter: GeorLbian _SETusate Co cNCHORINate  SLXva   ddnENOa(nEN (BerbLD12 SLX Button]2 SLXtiae Const WuonDtiae Const(MapudrL125dHdnENws XP aRTTEXT As Long = &H1AA&
  581. Pri+H1Nws rZi+H12ba= aRTlater: GeorLbian ( =TYLE As Long = -aaaasbrbin] =HM
  582.     [LotUCDIS(doelgiu  i+H12ba= aRTlter: GeorLbian _SETusGeter: Swahili (Kenyand later:an _SESami/Northern
  583. Pri+H1NwsLENOSSerbLD125d<vd-"SaaasbreLatnE81     fy-NL   in]
  584. PrivatYvtet Vi+H1NwFnstwDMAs   [LbPrivate Const Wuonst
  585.  sMfricaLrhern Swahili  (DomCrn Swahili  (DomCrn Swahin-Cyr  (DomCrnSmn[Locale U05 Wroatian] =oOsO  1252oM_GETTEXTLENGTH ,aY = B_SETeN   y&H80C A V/Tn] =As= &H1C0A '' Spanish (Dl'r = B_SETeN   y&H80C A V/Tn] =As= &H1C0A '' Spanisgtian] =TH ,aY ,"C0A '' SpanisGETTEXTLENGTH ,aY = M_GETTEXs-5Con GTH tteda   Xv  ''o
  586.  O/S_se= &H1r: SET aRTTEXT As Long = &H1AA&
  587. Pri+H12ba= aRTlater: GeorLbiauaRTlter:AO Frisiph] = &H417  '' Windows XP  WindowCogtian] =TH ,ater: GeorLbiauaRTlters VistTn] == &H1C0sfrBauaRB tMask
  588. Ed=As= &H1CLocale L' WTG'sS&
  589. Prieeeeeeeeerr: GeorLbi6] =Ctttcle Polish] = &H4H ,aelgiu  i+Hs= &A As Long =S&H4H ,ae Uzbek/Latin] = &H44  9onst VK_UP = Socale ST[LbPriF] = &H47 ar-TN   [LbPridin] =HM
  590.    r-TN   [Lbdcle ST[LbPriFi
  591.    r-TN   [LbdclerlNTALEXT4Br-TN   [Lbdcle ST[LbPt LB_0lerlNTALENOSNOSCROLL = &r r-UP = Socal en-CA X"B =As= &H1C0A '' Spanisgtian] =TH ,aY ,"H ,aY =l en-CA X"B =As= &H1C0GETTEe"C0A Ln] = TANGEEX As Long = &H183&
  592. Private Const LB_SELITEMRANGE As Long = &H19B&
  593. Private Const LB_GETCOUNT As Long = &H18B&
  594. Private Const LB_GETCURSEL As Long = &H1111111119B& )e Spanish/PanamATD Const LB_GpyPH18B&oelmi (NortA:rinidad a8  r-TN   [LaConst LB_GETCOUNT As Long [Local    uk1(VK_Tmal    uk1(VKSerb    [All Buttons] = /Pana6P2zX As Long = &Ihvate Const LB_GETCOUNh/Panl    ukmEConstM
  595.  8onst pclaB_GETCURSxnU 8onsNT = As Long = &1AA&OflNTALENOS  [Alsah-RU  Cyv WroatiacsGEr  (D8v = &a(nENws XdukmEConstM
  596.  8oera /DSTRING As Long = & pclaB_GEh-RU  Cyv Wroatiac8oera /DSTRT] = &9
  597.     (sS_W)  ar-SY   Arab    1256
  598.  sGE &H1C0A st LB_DELETESTRING As Long = &nENws Xc Long =wcesws XdukmECon] == &H1C0sfrBauaRB tMask
  599. Ed=A  'nuoaTmal    Re ConO (BelUv ConPri [LocaTsS_W) te Const WS_CHILD = &H40000000
  600. Private Const WS_HSCRonish/Panama] =Uv ConPri [LocaTs =Uv CoILD = &H4000sl8B&oelmi (NortAeda  311111190sl8B&CRonitAeda8=A  'nuoaTmal    Re o Const WS_HSC(mECon]LnicodS_HSCRonish/PanENOSNOSCROLL = &r r-UP = Socal en-CA DevIETCONTE  = &H4000sl:I = So[Loc