Jump to content

Search the Community

Showing results for tags 'com'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Q&A Desenvolvimento
    • Perguntas e respostas rápidas
  • Web Development
    • HTML e CSS
    • Javascript
    • PHP
    • Ruby
    • Python
    • Java
    • .NET
    • Docker, Kubernets and other environments
    • WordPress
    • Mobile
    • Agile
    • Desenvolvimento de Games
    • Banco de Dados
    • Design and UX
    • Algoritmos & Outras Tecnologias
  • Entretenimento e uso pessoal
    • Segurança & Malwares
    • Geral
    • iMasters's pub

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Google+


Hangouts


Skype


Twitter


deviantART


Github


Flickr


LinkedIn


Pinterest


Facebook


Site Pessoal


Localização


Interesses

Found 2 results

  1. Dinho Nunes LC

    Inserir mais uma variavel em "else" "php"

    Como posso adicionar uma terceira opção a essa td? Funciona assim. <td align="center"> <?php if ($usuario['dia'] - $usuario['uso'] <= -1) {echo "Expirado";} else {echo "Em ", $usuario['dia'] - $usuario['uso'], " Dias";} ?> </td> Resultado atual. if ($usuario['dia'] - $usuario['uso'] <= -1) {echo "Expirado";} ~ Exibe Expirado / Está Ok = 0 Exibindo "Em 0 Dias" else {echo "Em ", $usuario['dia'] - $usuario['uso'], " Dias";} ~ Exibe a subtração dos dias. / Está Ok Resultado pretendido if ($usuario['dia'] - $usuario['uso'] <= -1) {echo "Expirado";} Exibe Expirado / Está Ok = 0 Exibir a palavra "Hoje" else {echo "Em ", $usuario['dia'] - $usuario['uso'], " Dias";} Exibe a subtração dos dias. / Está Ok
  2. Olá, não sou desenvolvedor Delphi e na empresa que trabalho temos componente em Visual Basic para realizar autenticação do usuário. Temos um sistema em Delphi feito por um cliente que precisa consumir nossa dll e o analista está com dificuldades. Alguém poderia me ajudar a converter esse código para Delphi? Desde já agradeço. Dim obj as Object Dim codigoRetornoLogin As Integer Dim mensagemLogin As String 'Instanciar objeto COM Set obj = CreateObject("DB_Seguranca.GER_SEG") 'Preencher Módulo, login e senha obj.modulo = "CONTRAT" obj.usuario.User_ID = txtLogin.Text obj.usuario.Senha = txtSenha.Text 'Validar login codigoRetornoLogin = obj.Valida_acesso() 'Se retorno for <> 0, significa login é inválido If (codigoRetornoLogin <> 0) Then 'Obtém a mensagem de erro para exibição ao usuário mensagemLogin = obj.ObterMensagemLogin(codigoRetornoLogin) 'Mata objeto COM da memória Set obj = Nothing 'Exibe mensagem de negócio ao usuário MsgBox mensagemLogin Exit Sub End If Set obj = Nothing 'Usuario autenticado com sucesso 'Segue a vida...
×

Important Information

Ao usar o fórum, você concorda com nossos Terms of Use.