Evento Backspace

Discussão em 'Progress 4GL' iniciado por deproenca, Novembro 23, 2009.

  1. deproenca

    deproenca Membro Participativo

    Bem lembrado Cleilton...
    Eu estou fazendo uma lógica de incrementação...
    Código:
        IF tg-capslock:SCREEN-VALUE EQ "yes" THEN
            c-editor:SCREEN-VALUE = c-editor:SCREEN-VALUE + upper("q").
        ELSE
            c-editor:SCREEN-VALUE = c-editor:SCREEN-VALUE + "q".
    
    Nessa sua lógica do posicionamento do cursor como ficaria?
    Nessa minha lógica de incrementação eu tenho que posicionar o cursor manualmente, teria como fazer isso de uma forma automática... sendo que ele fique posicionado sempre no último caractere que foi digitado?
    Valeu.
  2. Cobra.cne

    Cobra.cne Equipe de Suporte Moderador

    Neste caso, para inserir o caracter onde o cursor estiver posicionado utilize:
    Código:
        IF tg-capslock:SCREEN-VALUE EQ "yes" THEN
            c-editor:INSERT-STRING(upper("q")).
        ELSE 
            c-editor:INSERT-STRING("q").
    
    E sempre ele ficará na posição da última inserção.

    []'s
  3. deproenca

    deproenca Membro Participativo

    Valeu Cleilton... eu atualizei o programa com a lógica que vc passou e postei no tópico do teclado virtual.

    []' s.

Compartilhe esta Página