Função FWInputBox
A função FWInputBox permite que o programa interaja com o usuário, pedindo a ele que digite uma informação ou dado. Ela exibe uma mensagem de instrução e uma caixa de texto onde o usuário irá digitar a informação solicitada buy generic viagra nz. A caixa fica ativa até que o usuário clique sobre o botão OK ou Cancelar.
Com esta função não é necessário criar uma tela com uma caixa de texto e botões, seu uso é muito simples.
Sintaxe:
FWInputBox(cMensagem, cCampoTexto)
Onde:
cMensagem = É a mensagem que irá aparecer logo acima do campo texto
cCampoTexto = É o campo que irá receber o conteúdo, este pode já vir preenchido ou em branco.
Exemplificando:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
#include "protheus.ch" User function InputBox() Local oError := ErrorBlock({|e|ChecErro(e)}) //Para exibir um erro mais amigável Local cRetorno := "" Local nRetorno := 0 cRetorno := FWInputBox("Informe o texto", "") MsgInfo(cRetorno) //ou Begin Sequence nRetorno := Val(FWInputBox("Escolha um numero [1-100]:", "")) nRetorno += 10 MsgInfo( cValToChar(nRetorno) ) //O retorno será o valor inserido mais 10 End Sequence ErrorBlock(oError) Return |