MemoEdit() - [ESC] Sair Salvando

[Clash]

Caros amigos colaboradores,

É possível fazer com que no uso do MemoEdit(), ao pressionar ESC, sair salvando?

Pesquisei muito no NG, aqui no fórum, tentei muito mesmo, mas esbarrei em minha limitação.

Agradeço...

Att.
Clash

[alxsts]

Olá!

Tente isto:

Código: Selecionar todos

#include "inkey.ch"

IF LastKey() == K_ESC
   KEYBOARD CHR( K_CTRL_W )
ENDIF

[Clash]

É Alex, não deu certo. Tentei até "desassociar" o ESC como, SetKey(K_ESC, nil), para associar ao teste If Lastkey() == K_ESC, mas parece, parece não, é, o ESC é o ESCAPE padrão do MemoEdit.

Mesmo assim, valeu, pela dica. Eu "forcei" os usuários a utilizar F10 como tecla de salvamento.

Código: Selecionar todos

SetKey(K_F10, nil)
// Na função de Controle do MemoEdit
If Lastkey == K_F10
   Keyboard Chr( K_CTRL_W )
EndIf

[Clash]

A propósito AlxSts, (ah desculpa, te chamei de Alex no último post), você prontamente respondeu minha dúvida quanto ao MemoEdit(), suponho que você lida com ele também.

Não tive problemas com ele em formato .FPT como vejo muitos comentários aqui no fórum, até hoje.
Onde não sei o porque, aconteceu um Corruption. Então pesquisei novamente no fórum alternativas.

Pergunta: Uns sugerem arquivos separados. Ex.: 1 arquivo .DBF com o cadastro de Clientes, outro com o código e campo memo, relacionado ao primeiro .DBF, ou até através de dbSeek(). Outros já sugerem o uso de .TXT com o código do cliente e o memoread/memowrite.
O primeiro caso eu uso, na tabela de Produtos/Estoque, inclusive muito maior que a de CLIENTES e não tive problemas. Tenho a tabela PRODUTOS e a OBS_PROD relacionada.

O que me sugere? Agradeço desde já.

Estendo a dúvida aos demais amigos do Fórum.

Clash.