Consulta simples para verificar a existencia de registro.

Delphi

15/02/2008

Estou tentando fazer uma consulta para verificar se existe registro na tabela antes de excluir.

if Modulo.ibdatasetTabela.Params[0].AsInteger <> Null
modulo.ibdatasettabela.delete;

desta forma da um erro, alguem ja fez algo parecido?


Ullrich

Ullrich

Curtidas 0

Respostas

Host

Host

15/02/2008

Delete from <tabela>
where campo= <valor de pesquisa>

Vc pode colocar uma trigger para averiguar o campo ... mas nao vejo necessidade por uma transacao tao simples.


GOSTEI 0
Ffabiop

Ffabiop

15/02/2008

if not Modulo.ibdatasetTabela.isEmpty then
modulo.ibdatasettabela.delete;

ou

if not Modulo.ibdatasetTabela.eof then
modulo.ibdatasettabela.delete;


GOSTEI 0
Dor_poa

Dor_poa

15/02/2008

cara..
Sua tabela esta aberta????

Outra forma seria;;
If Modulo.ibdatasetTabela.fieldbyName(´CAMPO´).asstring = ´´ Then
modulo.ibdatasettabela.delete;

Qual a descrição do erro?


GOSTEI 0
Ullrich

Ullrich

15/02/2008

if sets.isEmpty then
nao apaga
else
apaga

onde
sets = TIBdataset

sets := sets

usei esse metodo, gostei pois posso usar em todas as tabelas e nao presciso especificar o campo.

Empty = vaziu ou deserto, muito massa mesmo. Valeu galera.


GOSTEI 0
POSTAR