Fórum Comparar texto do EDIT com o banco de dados. #348692
08/11/2007
0
Já tentei fazer de duas formas, mas não deu certo.
Desde já muito obrigado.
Mano_froids
Curtir tópico
+ 0Posts
08/11/2007
Marcosrocha
if Trim(Edit1.Text) <> ´´ then begin IBQuery1.SQL.Clear; IBQuery1.SQL.Add(´Select campo from Tabela´); IBQuery1.SQL.Add(´Where campo = ´+QuotedStr(Trim(Edit1.Text))); IBQuery1.Open; if not IBQuery1.IsEmpty then begin MessageDlg(´O valor digitado já encontra-se na base de dados!´, mtInformation, [mbOK], 0); Edit1.SetFocus; end; end; // Para o Edit2 é a mesma coisa
:wink:
Gostei + 0
08/11/2007
Mano_froids
if Trim(Edit1.Text) <> ´´ then begin IBQuery1.SQL.Clear; IBQuery1.SQL.Add(´Select campo from Tabela´); IBQuery1.SQL.Add(´Where campo = ´+QuotedStr(Trim(Edit1.Text))); IBQuery1.Open; if not IBQuery1.IsEmpty then begin MessageDlg(´O valor digitado já encontra-se na base de dados!´, mtInformation, [mbOK], 0); Edit1.SetFocus; end; end; // Para o Edit2 é a mesma coisa
Colquei o código que você falou, mas está dando um erro na hora de rodar.
Token not found
Token: =
Line number: 2
Alguem sabe qual pode ser o problema?
Gostei + 0
08/11/2007
Martins
if Trim(Edit1.Text) <> ´´ then begin IBQuery1.SQL.Clear; IBQuery1.SQL.Add(´Select campo from Tabela´); IBQuery1.SQL.Add(´Where campo = ´+QuotedStr(Trim(Edit1.Text))); IBQuery1.Open; if not IBQuery1.IsEmpty then begin MessageDlg(´O valor digitado já encontra-se na base de dados!´, mtInformation, [mbOK], 0); Edit1.SetFocus; end; end; // Para o Edit2 é a mesma coisa
Colquei o código que você falou, mas está dando um erro na hora de rodar.
Token not found
Token: =
Line number: 2
Alguem sabe qual pode ser o problema?[/quote:2eb0dfc7a9]
Me parece tudo normal com o código, coloque o seu código, da forma q vc colocou em seu projeto para vermos, pq o código do colega é só um exemplo.
Gostei + 0
08/11/2007
Marcosrocha
Martins eu utilizo este exemplo de código em todas as minhas aplicações que necessitam verificar registros já existentes na base de dados. Só se o nosso amigo copiou na cara larga e não substituiu a SQL, que eu acho difícil de acontecer até mesmo com iniciantes.
Gostei + 0
08/11/2007
Mano_froids
Martins eu utilizo este exemplo de código em todas as minhas aplicações que necessitam verificar registros já existentes na base de dados. Só se o nosso amigo copiou na cara larga e não substituiu a SQL, que eu acho difícil de acontecer até mesmo com iniciantes.[/quote:d003395d99]
Olá.
Sou iniciante sim, mas consegui fazer a aplicação rodar na comparação de 1 edit ... o problema e que tenho que fazer uma comparação entre 2 edits no mesmo registro da tabela.
Meu código ficou assim na comparação de 1 edit, e assim funcionou bem.
MUITO OBRIGADO PELA AJUDA.
if Trim(DBEdit3.Text) <> ´´ then
begin
Query1.SQL.Clear;
Query1.SQL.Add(´Select Alu_rou_cod from Aluguel´);
Query1.SQL.Add(´Where Alu_rou_cod = ´+QuotedStr(Trim(DBEdit3.Text)));
Query1.Open;
if not Query1.IsEmpty then
begin
MessageDlg(´O valor digitado já encontra-se na base de dados!´, mtInformation, [mbOK], 0);
DBEdit3.SetFocus;
end;
end;
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)