Rinaldo Xavier

Members
  • Content count

    12
  • Joined

  • Last visited

  • Days Won

    7

Rinaldo Xavier last won the day on May 21

Rinaldo Xavier had the most liked content!

Community Reputation

23 Excellent

About Rinaldo Xavier

  • Rank
    Member
  1. Jânio Faço assim também, mas sem criar nenhuma variável e nenhum objeto. Coloco este código no Before Printing BODY do report: IF modulo(MyReport..NbRecRead, 2) = 0 THEN MySelf..BrushColor = RGB(230, 230, 230) ELSE MySelf..BrushColor = Transparent END
  2. Evandro, se você precisar disto em apenas alguns controles, pode usar o evento Whenever Modifying do controle, porém se for em todo o projeto, pode fazer assim: Na inicialização do projeto coloque: // Carrega os arquivos das constantes do WinDev EXTERN "KeyConst.WL" EXTERN "WinConst.WL" // Verifica o pressionamento de uma tecla Event("TeclaPressionada", "*.*", WM_KEYDOWN) Crie então uma procedure chamada "TeclaPressionada" (pode ser qualquer outro nome) e nela trate as teclas desejadas: IF KeyPressed(VK_F2) THEN Códigos... END
  3. Acho que dá para saber o foco assim: IF {_EVE.name, indControl}..Name = "EDT_xxx" THEN
  4. Exato @Cassiano, era o que eu ia sugerir. Mas acredito que tenha uma forma de saber qual controle está com o foco.
  5. Janio Você pode capturar a tecla pressionada e na janela verificar qual o objeto que está com o foco. Neste caso no INITIALIZING do projeto você coloca: // Carrega os arquivos das constantes do WinDev EXTERN "KeyConst.WL" EXTERN "WinConst.WL" // Verifica o pressionamento de uma tecla Event("TeclaPressionada", "*.*", WM_KEYDOWN) E depois cria uma procedure mais ou menos assim: PROCEDURE TeclaPressionada() // Verifica se a tecla F2 foi pressionada e se a janela está ativa IF KeyPressed(VK_F2) AND WinStatus(WIN_xxxx) = Active THEN // Verifica qual objeto está com o foco ... Seu código ... END
  6. Pode ser assim também, sem usar a função IIF(): PROCEDURE NumeroMeses(LOCAL dDataInicial, LOCAL dDataFinal) nContador is int = 0 WHILE dDataInicial <> "" AND dDataInicial < dDataFinal dDataInicial..Month++ IF dDataInicial <= dDataFinal THEN nContador++ END END RESULT nContador
  7. Acabamos conseguindo resolver excluindo a configuração do WS e criando de novo
  8. Pessoal, tenho um web service funcionando há bastante tempo, porém fiz uma alteração e não estou conseguindo publicar. Não foi alterado nada nas configurações. Se clico no botão para testar a conexão diz que está ok. Alguém sabe o que pode ser? Obrigado Rinaldo
  9. Jonilton, basta usar a função HNbRec(QRY_NomeQuery) Rinaldo Xavier
  10. Caio, basta pressionar ALT+ F5 para definir a ordem de tabulação.
  11. Cleiton Tem um erro na sua linha: nRetorno is Int = false Se nRetorno é um INTEIRO, não pode ser FALSE. Talvez o WD aceite, pois ele trata o false como ZERO, mas não testei. Mas no Help está assim o retorno de HModify(): <Result>: Boolean O ideal seria: IF not HModify(Tabela) THEN Info("Erro ...") END Rinaldo Xavier