sgbm

Bom dia amigos, o arquivo inkey.ch vem com todas as funções das teclas, vem mais explicado do que no arquivo.\FWH\include\vkey.ch. Para ter uma ideia, veja a diferença entre os valores de cada um. Abram o arquivo e verão a diferença. ----------------------------- No vkey.ch ----------------------------- #define VK_LBUTTON 1 #define VK_RBUTTON 2 #define VK_CANCEL 3 #define VK_MBUTTON 4 #define VK_BACK 8 #define VK_TAB 9 ----------------------------- No inkey.ch ----------------------------- #define K_CTRL_A 1 // Ctrl-A, Home #define K_CTRL_B 2 // Ctrl-B, Ctrl-Right arrow #define K_CTRL_C 3 // Ctrl-C, PgDn, Ctrl-ScrollLock #define K_CTRL_D 4 // Ctrl-D, Right arrow #define K_CTRL_E 5 // Ctrl-E, Up arrow #define K_CTRL_F 6 // Ctrl-F, End #define K_CTRL_G 7 // Ctrl-G, Del #define K_CTRL_H 8 // Ctrl-H, Backspace #define K_CTRL_I 9 // Ctrl-I, Tab

Valeu.

Alguém tem um material onde tem os valores das teclas correspondentes. Exemplo Lastkey()=-6 é a tecla F7, Lastkey()27 = "ESC", Só que estou querendo de outras e não estou lembrado. Exemplo: Lastkey() = 32, -28, -2, -23, -5, 28...... etc.

Alguém tem um material onde tem os valores das teclas correspondentes. Exemplo Lastkey()=-6 é a tecla F7, Lastkey()27 = "ESC", Só que estou querendo de outras e não estou lembrado. Exemplo: Lastkey() = 32, -28, -2, -23, -5, 28...... etc.

Pessoal eu tenho um xBrowse que tem alguns campos calculados exemplo: REDEFINE xBrowse oLbxPla ; fields transf(calcpla(vtotalbrPro),"@E 99,999,999.99"), transf(calcpla2(vtotalbrPro),"@E 99,999,999.99"); Como faço para que uma variável leia o conteúdo deste campo calculado, tipo Vcalculo1 := xbrowse.campoCalculado

Pessoal eu tenho um xBrowse que tem alguns campos calculados exemplo: REDEFINE xBrowse oLbxPla ; fields transf(calcpla(vtotalbrPro),"@E 99,999,999.99"), transf(calcpla2(vtotalbrPro),"@E 99,999,999.99"); Como faço para que uma variável leia o conteúdo deste campo calculado, tipo Vcalculo1 := xbrowse.campoCalculado

Kapiaba, bom dia. A função "AT" seria a melhor para você utilizar. AT() é uma funçao de tratamento de dados tipo caractere utilizada para determinar a posiçao da primeira ocorrência de um substring dentro de outra cadeia de caracteres. ? AT("a", "abcde") // Resulta: 1 ? AT("bcd", "abcde") // Resulta: 2 ? AT("a", "bcde") // Resulta: 0 Então você pode usar um FOR de zero a nove com a "AT" dentro dele para localizar dentro da sua variável. Att. Sócrates Gambarra. citação:Buenos dias señores, Preciso saber como posso fazer para checar um campo do BD. Exmplo: Se o usuário digitar: SS14SILVA, ou SSSILVA14, ou 2444SILV, Não pode existir numeros misturados com o texto, ou seja só pode ser tudo ALFA ou tudo NÚMERICO. Preciso parar o programa e avisar o uçuário que esta operação é proibida. Como checar se tem números misturados com alfa?? Desde já, agradeço qualquer susgestão. Obg, abraços. João Santos - São Paulo. joao@pleno.com.br Fone: (11) 3106-2832 http://pt-br.facebook.com/people/Jo%C3%A3o-Santos/100001195894196 FWH 2.7 - xHARBOUR WorkShop.Exe id=quote>id=quote>

Luis, bom dia. Eu iniciei a variável como zero, mas não deu certo. Utilizei como faço no Delphi colocando a variável como "-1", e deu certo. Obrigado pela ajuda. Sócrates.

Segue como esta: REDEFINE RADIO oRad01 VAR Radios ID 4011,4012,4013,4014 OF oFld:aDialogs[1]

Bom dia, colegas. Gostaria de saber como deixar o radio desmarcado, "todos em branco" para forçar o usuário a marcar um deles, pois o default é 1 "um". Sócrates

Bom dia, colegas. Gostaria de saber como deixar o radio desmarcado, "todos em branco" para forçar o usuário a marcar um deles, pois o default é 1 "um". Sócrates

João Santo, boa tarde. Deu certo. Fiz assim: OFLD:bChange:={|| IF(OFLD:nOption==2,oLbxIten:refresh(),.t.) } Quando clico na ABA 2, o Refresh é ativado. Valeu pela ajuda.

Obrigado pela ajuda, mas o que estou querendo é, no evento "onClic" da ABA dar um refresh. Ou seja quando eu mudar de ABA o evento é disparado, é nesse momento que quero dar o Refresh. Obrigado. Sócrates.

Como saber se cliquei em uma das abas e fazer o Refresh quando clicar nela. DEFINE DIALOG oDlgPREPARA RESOURCE "DLG_NF_ENTRADA_PRINCIPAL" BRUSH oBrushVista REDEFINE INFOBAR oHeaderDlg ID 4003 COLOR nRGB( 89, 149, 212 ) GLASS PROMPT if(lAppend,"INCLUSÃO","ALTERAÇÃO") + if(!EMPTY(vnunfent)," DA ENTRADA : " + vnunfent , "") OF oDlgPREPARA UPDATE REDEFINE FOLDER oFld ID 101 OF oDlgPREPARA ; PROMPTS " Inclusão "," Produtos "; DIALOGS "DLG_NF_ENTRADA_PREPARA","DLG_NF_ENTRADA_PRODUTOS"

Como saber se cliquei em uma das abas e fazer o Refresh quando clicar nela. DEFINE DIALOG oDlgPREPARA RESOURCE "DLG_NF_ENTRADA_PRINCIPAL" BRUSH oBrushVista REDEFINE INFOBAR oHeaderDlg ID 4003 COLOR nRGB( 89, 149, 212 ) GLASS PROMPT if(lAppend,"INCLUSÃO","ALTERAÇÃO") + if(!EMPTY(vnunfent)," DA ENTRADA : " + vnunfent , "") OF oDlgPREPARA UPDATE REDEFINE FOLDER oFld ID 101 OF oDlgPREPARA ; PROMPTS " Inclusão "," Produtos "; DIALOGS "DLG_NF_ENTRADA_PREPARA","DLG_NF_ENTRADA_PRODUTOS"