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"

Não deu certo. Olha como está: REDEFINE RADIO oRadios VAR Radios ID 4011,4012,4013,4014 OF oFld:aDialogs[1] Coloquei como você falou: redefine say oText1:enable() id 4029 OF oFld:aDialogs[1] Erro: Class:NIL has no proprerty:Enable Obs: Na dialog eu coloquei a propriedade "Visible" como "NO" Acho que teria que colocar esta propriedade como "YES" só não sei como, você tem ideia de como fazer? Sócrates.

Pessoal, gostaria de uma ajuda. Crio uma Dialog, e no fonte Redefino para ser mostrar no sistema. Beleza. Se eu modificar uma propriedade no Dialog, como faço para modificar esta propriedade quando Redefino. Exemplo na Dialog coloquei um objeto edit como invisível e no fonte, quero modificar esta propriedade para mostrar. Sds. Sócrates

Pessoal, gostaria de uma ajuda. Crio uma Dialog, e no fonte Redefino para ser mostrar no sistema. Beleza. Se eu modificar uma propriedade no Dialog, como faço para modificar esta propriedade quando Redefino. Exemplo na Dialog coloquei um objeto edit como invisível e no fonte, quero modificar esta propriedade para mostrar. Sds. Sócrates

Valeu. Sócrates.

Erciley Junior E para o cabeçalho você faz como? Sócrates

Erciley Junior, deu certo. oLbxNFent:aCols[7]:nDataStrAlign:=2 Centralizou a coluna 7 Valeu. Obrigado a todos. Sócrates Gambarra

Vitor, Meus sinceros pêsames. Que Deus ilumine você e sua família neste momento difícil. Sócrates Gambarra

Luiz, boa tarde. Você poderia colocar o exemplo todo do xBrowse com o oCol:nDataStrAlign := AL_RIGHT Estou aprendendo ainda e não sei onde se encaixa no xBrowse O meu está assim: REDEFINE xBrowse oLbxNFent ; FIELDS " " ,; RMO->NUNFENT ,; RMO->NOMEFOR ,; DTOC(RMO->DATAENT) ,; RMO->CDFIENT ,; TRANSFORM(RMO->valrent,"@E 9,999,999.99") ,; RMO->FORNENT ; ALIAS "RMO" ; ID 361 OF odlgNFent ; HEADERS "ST" ,; "Nº Nf" ,; "Fornecedor" ,; "Data" ,; "CFO" ,; "Valor" ,; "Cod.For.Entrada" ; FIELDSIZES 23,70,390,105,42,105,140 ; COLORS CLR_GREEN , CLR_SKY ; FONT oGetFnt ; ON DBLCLICK NFE_Mostra_Itens(RMO->NUNFENT, RMO->FORNENT) ; ON RIGHT CLICK (.f.)

Caros colega, como faço para centralizar uma coluna no xBrowse dentro do FiveWin? Sócrates Gambarra

Caros colega, como faço para centralizar uma coluna no xBrowse dentro do FiveWin? Sócrates Gambarra