-
Total de itens
543 -
Registro em
-
Última visita
-
Dias vencidos
3
Eisenheim venceu o dia em Julho 22 2013
Teve o conteúdo mais curtido
Reputação
67 BomSobre Eisenheim
- Data de Nascimento 08/28/1986
Informações Pessoais
-
Sexo
Masculino
-
Interesses
Computação - Música e Matemática
Contato
-
Site Pessoal
http://www.jrs.eti.br
Últimos Visitantes
O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.
-
Eisenheim começou a seguir Select não traz os dados, Erro infinito !, Problemas para gravar data no sql server e e 5 outros
-
Olá! Quando você compila seu projeto, junto vai tudo que é componente de terceiros que você tenha utilizado. Como você disse que formatou seu computador, entendo que refez a instalação, entretanto pode ser que alguma "sujeira" tenha ficado vinculado a sua IDE. Precisaria analisar mais a fundo pra poder lhe ajudar, mas o que eu tentaria: 1) Verificar dentre os componentes que utilizo, como estão as definições da minha librarypath. 2) Fazer uma instalação de cada um novamente.
-
Olá! Altere o tipo da coluna para datetime e faça um teste.
-
Olá! Refatorando seu código: procedure Tfrm_login.SpeedButton1Click(Sender: TObject); var Qry : TZQuery; begin try Qry := TZQuery.Create(nil); Qry.Connection := dm_dados.ZConnection1; //componente de conexão Qry.Close; Qry.SQL.Clear; Qry.Params.Clear; Qry.SQL.Add('select codigo, nome, acessar, user, pass from clientes where Lower( user ) = :user'); Qry.Params[0].AsString := LowerCase( Edit1.Text ) Qry.Open; // if Qry.RecordCount > 0 then begin ShowMessage('usuário cadastrado'); end else begin ShowMessage('usuário inexistente'); Edit1.SetFocus; end; finally FreeAndNil(Qry); end; end; O método locate não seria o mais recomendado para essa finalidade.
-
Olá! Pelo que compreendi, o seu link poderia ser tratado dentro do seu client com o próprio javascript.
-
Olá! Entendo que você queira pesquisar de acordo com o que estiver preenchido nos campos: - EditBanco.Text - EditAgencia.Text Existem várias maneiras. Imaginando que exista um botão e que ao clicar nele você realize a sua pesquisa: Qry.Close; Qry.SQL.Clear; Qry.Params.Clear; Qry.SQL.Text := ' SELECT BANCOD, AGENUN FROM BANCOAGE '; sWhere := ' WHERE 1=1 '; if ( EditBanco.Text <> EmptyStr ) then sWhere := Concat( sWhere, ' AND BANCOD =', QuotedStr( EditBanco.Text ) ); if ( EditAgencia.Text <> EmptyStr ) then sWhere := Concat( sWhere, ' AND AGENUN =', QuotedStr( EditAgencia.Text ) ); Qry.SQL.Add( sWhere ); Qry.Open;
- 5 respostas
-
- dois campos
- filtro
-
(e mais 2 )
Tags:
-
Olá! Não conheço a API em si, mas tirando como base outras que já tive a oportunidade de mexer, basicamente você terá acesso a uma documentação que irá descrever exatamente o modo de como as coisas devem ser feitas. O próximo passo, seria pensar como realizar o acesso a essa API. Hoje existe algumas maneiras que facilitam a vida do desenvolvedor, uma delas que posso citar é a suite de componentes chamada rest-dataware.
-
Olá! Se o que você deseja é ter um log monitorando sua conexão/transações, você poderia optar por um componente que já faça isso para você. Dependendo do provider que você utilize, pode ser que já tenha algo que pertença ao próprio pacote. Exemplo: Se você utiliza o Zeosdbo, existe o TZSQLMonitor.
- 1 resposta
-
- componente
- runtime
-
(e mais 1 )
Tags:
-
Olá! Amigo, pelo que pude compreender, o seu método getResultado() só vai obter algum retorno após a execução do método ExecutarInstrucao(). Dentro da sua classe Read, após você chamar o método ExeRead, em que momento é chamado o método ExecutarInstrucao()? Não consegui identificar.