Falta de memória ram, meu caro. Aproveitando o comentario, estou com um problema ao pesquisar alguns dados, nao estou conseguindo resolver, será que poderia dar uma mãozinha? O código é este:
dm.qryClientes.Close; dm.qryClientes.SQL.Text := 'SELECT * FROM Clientes WHERE ' + 'NomeCliente Like %' + QuotedStr(edtNomeCli.Text) + '%' ; dm.qryClientes.ExecSQL; edtNomeCli.Text:=dm.qryClientes.FieldByName('NomeCliente').AsString;
3 comentários:
uhasaaaa, mas q ba..
Falta de memória ram, meu caro.
Aproveitando o comentario, estou com um problema ao pesquisar alguns dados, nao estou conseguindo resolver, será que poderia dar uma mãozinha?
O código é este:
dm.qryClientes.Close;
dm.qryClientes.SQL.Text := 'SELECT * FROM Clientes WHERE ' +
'NomeCliente Like %' + QuotedStr(edtNomeCli.Text) +
'%' ;
dm.qryClientes.ExecSQL; edtNomeCli.Text:=dm.qryClientes.FieldByName('NomeCliente').AsString;
Obrigado
Opa.. blz?? cara respondendo...
primeiro a SQL esta com um pequeno erro... o fato é que as porcentagem também precisam estar entre as aspas
então tenta fazer assim
SQL.Text := 'SELECT * FROM Clientes WHERE ' +
'NomeCliente Like ''%' + edtNomeCli.Text + '%''' ;
onde para cada aspa que se quer deixar no delphi, se coloca duas aspas....
Acho que esta entendível...
Outra é que antes de mandar exibir um dado é necessário "abrir" o componente... blz ???
dm.qryClientes.;
dm.qryClientes.SQL.Text := 'SELECT * FROM Clientes WHERE ' +
'NomeCliente Like ''%' + edtNomeCli.Text + '%''' ;
dm.qryClientes.ExecSQL();
dm.qryClientes.Open;
ShowMessage(FieldByName('NomeCliente').Text);
até...
Postar um comentário