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:
#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