Cisco Cisco Computer Telephony Integration OS 8.5 Developer's Guide

CTI OS Internationalization Toolkit 

 

22 of 35 

3.  Set the language code for the language library to load: 

 

 

 

Private Sub Form_Load() 
 
'Sets the code for Mexican Spanish and Loads the Library  
m_Intl.LanguageID = &H80A 
 

4.  Retrieve translated text strings and display them: 

 

 

 

 

 

 

 

 

Private Sub Form_Load() 
 
Dim strTextStr As String 
 
'Sets the tit

t

le of  he form 

strTextStr = m_Intl.TextStringDefault(CTIOS_AGENTPHONE_APPNAME, _ 
                                      "CISCO CTI OS Agent Phone") 
 
Me.Caption = strTextStr 
 
'Sets the title of the form 
strTextStr = m_Intl.TextStringDefault(CTIOS_AGENTPHONE_PHONELOADING, _ 
                                      "Phone is Loading…”) 
 
lblMessage = strTextStr 
 
End Sub 

5.  Changing language: 

 

 

 

 

 

 

 

 

Private Sub btnEnglish_Click() 
 
Dim strTextStr As String 
 
'Sets the code for English
m_Intl.LanguageID = &H409 

 USA and Loads the Library  

 
 
'Sets the tit

t

le of  he form 

strTextStr = m_Intl.TextString(CTIOS_AGENTPHONE_APPNAME) 
 
Me.Caption = strTextStr 
 
'Sets the title of the form 
strTextStr = m_Intl.TextString(CTIOS_AGENTPHONE_PHONELOADING) 
 
lblMessage = strTextStr 

Cisco Systems, Inc.