Prezados,
Segue exemplo de como Personalizar Teclado Padrão do Android no Windev Mobile
CONSTANTES DA PROCEDURE GLOBAL
CONSTANTE
IME_ACTION_AUCUNE = 1
IME_ACTION_GO = 2
IME_ACTION_RECHERCHE = 3
IME_ACTION_ENVOYER = 4
IME_ACTION_SUIVANT = 5
IME_ACTION_OK = 6
FIN
Código JAVA
import android.widget.EditText;
import android.widget.Button;
import android.widget.TextView;
import android.view.KeyEvent;
import android.view.inputmethod.InputMethodManager;
import android.content.Context;
import android.view.inputmethod.EditorInfo;
PUBLIC static void PersonalizeTeclado(string sNomDuChampDeSaisie, string sNomDuBouton, int nTypeDeBouton){
final int btn = nTypeDeBouton;
final string sNom = sNomDuBouton;
EditText SAI = (EditText) getView(sNomDuChampDeSaisie);
SAI.setImeOptions(nTypeDeBouton);
SAI.setOnEditorActionListener(new EditText.OnEditorActionListener() {
PUBLIC boolean onEditorAction(TextView v, int actionId, KeyEvent Event) {
IF (actionId == btn) {
InputMethodManager inputMethodManager = (InputMethodManager) getContexteApplication().getSystemService(Context.INPUT_METHOD_SERVICE);
inputMethodManager.hideSoftInputFromWindow(v.getWindowToken(), 0);
Button b = (Button) getView(sNom);
IF(b!=null){
b.performClick();
}
RETURN True;
}
RETURN False;
}
} );
}
Open da janela:
PersonalizeTeclado("SAI_GO", "WIN_Personalizar_Teclado.BTN_GO", IME_ACTION_GO)
PersonalizeTeclado("SAI_RECHERCHE", "WIN_Personalizar_Teclado.BTN_RECHERCHE", IME_ACTION_RECHERCHE)
PersonalizeTeclado("SAI_ENVOYER", "WIN_Personalizar_Teclado.BTN_ENVOYER", IME_ACTION_ENVOYER)
PersonalizeTeclado("SAI_SUIVANT", "WIN_Personalizar_Teclado.BTN_SUIVANT" ,IME_ACTION_SUIVANT)
PersonalizeTeclado("SAI_OK", "WIN_Personalizar_Teclado.BTN_OK", IME_ACTION_OK)
Botão Novo
PersonalizeTeclado("SAI_GO", "WIN_Personalizar_Teclado.BTN_GO", IME_ACTION_GO)
PersonalizeTeclado("SAI_RECHERCHE", "WIN_Personalizar_Teclado.BTN_RECHERCHE", IME_ACTION_RECHERCHE)
PersonalizeTeclado("SAI_ENVOYER", "WIN_Personalizar_Teclado.BTN_ENVOYER", IME_ACTION_ENVOYER)
PersonalizeTeclado("SAI_SUIVANT", "WIN_Personalizar_Teclado.BTN_SUIVANT" ,IME_ACTION_SUIVANT)
PersonalizeTeclado("SAI_OK", "WIN_Personalizar_Teclado.BTN_OK", IME_ACTION_OK)
Botão Antigo
PersonalizeTeclado("WIN_Personalizar_Teclado.BTN_GO", "SAI_GO", IME_ACTION_GO)
PersonalizeTeclado("WIN_Personalizar_Teclado.BTN_RECHERCHE", "SAI_RECHERCHE", IME_ACTION_RECHERCHE)
PersonalizeTeclado("WIN_Personalizar_Teclado.BTN_ENVOYER", "SAI_ENVOYER", IME_ACTION_ENVOYER)
PersonalizeTeclado("WIN_Personalizar_Teclado.BTN_SUIVANT", "SAI_SUIVANT" ,IME_ACTION_SUIVANT)
PersonalizeTeclado("WIN_Personalizar_Teclado.BTN_OK", "SAI_OK", IME_ACTION_OK)
Info("GO")
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 9949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/Mensagem modificada, agosto, 06 2016 - 2:51 PM