Pular para o conteúdo principal

Postagem em destaque

BlackTDN :: LeetCode :: Comparando Implementações Harbour e TLPP para o Desafio Longest Palindromic Substring

_Créditos das imagens: ChatGPT_ ### LeetCode :: Comparando Implementações Harbour e TLPP para o Desafio Longest Palindromic Substring Resolver o problema do [Longest Palindromic Substring](https://leetcode.com/problems/longest-palindromic-substring/description/) é um exercício clássico de programação, que desafia desenvolvedores a encontrar a maior substring palindrômica dentro de uma string. Recentemente, exploramos soluções tanto em Harbour quanto em TLPP (Total Language Protheus Programming). Neste artigo, comparamos as implementações nessas duas linguagens, destacando suas semelhanças, diferenças e funcionalidades específicas. #### Implementações em Harbour ##### Versão 5.1 Essa solução utiliza a técnica de expansão a partir do centro do palíndromo. Cada caractere ou par de caracteres consecutivos é considerado um possível "centro". O algoritmo expande em ambas as direções enquanto os caracteres forem iguais, retornando o maior palíndromo encontrado. ##### Versão 5....

Fwd: Tecla ESC (VK_ESCAPE) em Advpl

Boa tarde Naldo!
Desculpe-me por invadir seu e-mail, sou seu fã no site BlackTDN e sempre estou por lá para novo aprendizado, realmente você é um dos papas do ADVPL no Brasil.
Se possível, gostaria de uma opinião sua quanto a um pequeno problema que estou encontrando por aqui. Temos em alguns clientes sistema de chão de fábrica, desenvolvidos todos em advpl e que funcionam perfeitamente, ah não ser pela bendita tecla ESC, ou seja, como as estações são burras, funcionam apenas com pendrive com SO Ubuntu, a máquina liga, carrega o programa e desliga quando ele é abortado, o problema está quando o usuário está no main menu da rotina e tecla ESC, a rotina é abortada e a máquina desliga....
Tentei de todas as formas o  tratamento da tecla com SetKey, como faço com os F1's da vida, mas sem sucesso, o ESC não respeita a condição e é executado.
Você saberia me orientar quanto a isso ? Como posso bloquear a tecla ESC ?
Obrigado pela atenção, novamente desculpe-me pela invasão!
Parabéns pelo site, a comunidade ADVPL do Brasil agradece a expert's como você.
Abraço ! 
Solução:

Existe sim uma forma de desabilitar a tecla ESC. Mas ela só desabilita para rotina customizada ou rotinas padrões que possuam Ponto de Entrada logo após a montagem do "DIALOG". Existe, na classe "TDialog" ou "TWindow", a Propriedade lEscClose que se tiver o valor alterado de .T. para .F. desabilita o fechamento da janela ao se pressionar a tecla ESC. Exemplo

fragmento: oDlg:lEscClose := .F. //Nao permite sair ao se pressionar a tecla ESC.

[]s
иαldσ dj

Comentários

  1. Naldo, eu estou precisando de algo totalmente diferente mas que tem a ver com a tecla ESC. Eu preciso executar uma função se a tecla ESC for pressionada para fechar a janela. Existe algum tratamento para este evento?

    Valeu

    ResponderExcluir
  2. Ae Naldo! Essa dica me ajudou hein! Black TDN sempre ajudando heheh Obs: só não consegui ver nada no link "Exemplo"

    ResponderExcluir
  3. Obrigado, Naldo. 2º vez que salva minha pele com uma solução simples.

    ResponderExcluir

Postar um comentário

Postagens mais visitadas