Query... Tem como fazer isso???

Question

Galera, � o seguinte:como fa�o pra excluir os registros na tabela, mas informando quantos registros eu quero deletar...tipo assim:[code:1:b989e9b803]dm.qryExemplares.SQL.Clear;dm.qryExemplares.Sql.Add...

Khundalini · Answer

A �nica maneira de fazer isso � limitando o valor das chaves, pois assim vc saber� determinar a quantidade de registros que vc quer excluir. E desse jeito, fica bem gen�rico e v�lido pra qualquer banco de dados.

[]s
Rubem Rocha
Manaus, AM

Sma · Answer

Existe no MySQL a fun�ao LIMIT onde eu posso determinar a quantidada de registro que quero trazer para a query, eu n�o tentei executar mas vc poderia tentar executar...

Ex..
dm.qryDeletar.SQL.Clear;
dm.qryDeletar.Sql.Add(�DELETE * FROM Tabela1�);
dm.qryDeletar.Sql.Add(�WHERE controle = :0�);
dm.qryDeletar.Sql.Add(�LIMIT 3�);
dm.qryDeletar.Parameters[0].Value:=dm.tbTabela2id.Value;
dm.qryDeletar.ExecSQL;

desta forma ele apenas deleta os 3 primeiros registros...

Khundalini · Answer

Mas o banco que est� sendo usado � o MySQL? Por isso que eu prefiro a minha sugest�o, por ser mais gen�rica.[]sRubem RochaManaus, AM...

Raphael.sx · Answer

por favor Khundalini, me da um exemplo de como fazer da maneira que vc disse....

Khundalini · Answer

Cara, � pq eu t� meio sem tempo agora, sen�o eu codificaria alguma coisa sobre isso. Mas a id�ia � essa. A dica pra pescar o peixe foi passada![]sRubem RochaManaus, AM...

Cabelo · Answer

[quote:57a47bc628=�raphael.sx�]Galera, � o seguinte:como fa�o pra excluir os registros na tabela, mas informando quantos registros eu quero deletar...tipo assim:[code:1:57a47bc628]dm.qryExemplares.SQL.Clear;dm.qryExemplares.Sql.Add(�SELECT * FROM Tabela1�);dm.qryExemplares.Sql.Add(�WHERE controle=:0�);dm.qryExemplares.Parameters&#91;0&93;.Value:=cod;dm.qryExemplares.Open;[/code:1:57a47bc628]digamos que essa query retorne 5 resultados...e na query abaixo eu vou deletar todos esses resultados...[code:1:57a47bc628]dm.qryDeletar.SQL.Clear;dm.qryDeletar.Sql.Add(�DELETE * FROM Tabela1�);dm.qryDeletar.Sql.Add(�WHERE controle = :0�);dm.qryDeletar.Parameters&91;0&93;.Value:=dm.tbTabela2id.Value;dm.qryDeletar.ExecSQL;[/code:1:57a47bc628]como eu fa�o pra ao inv�s de deletar todos os resultados dessa tabela eu deletar 3, por exemplo... ou uma quantidade qualquer, informada...obrigado desde ja a ajuda![/quote:57a47bc628]Esta exclus�o � aleat�ria, ou voc� deseja excluir registros selecionados..Outra coisa.. Voc� quer que seja um SQL, para executar direto no banco ou pode ser via delphi???...

Raphael.sx · Answer

caro Cabelo, o c�digo seria executado via delphi mesmo... e exluiria registros selecionados...obrigado pela aten��o!...

Tremonti · Answer

Existe no SQL o Conhecido Select Top 1 FRom Tabela

onde 1 � quantidade de registro que vc quer trazer...

Bom, o que vc pode fazer � se caso o resultado da query seja exibido em um DBGrid, criar um campo (calculado, pode ser), onde no onDblClick do DBGrid voc� coloque o valor para �X�

E colocar um botao, excluir selecionados por exemplo
onde ele dar� um loop na tabela e apagar somente os que o campo tal seja = �X�

Seria mais ou menos assim
tabela.first
While not Tabela.first do
Begin
if TabelaCAmpo.value = �X� Then
TAbela.Delete;
Tabela.next;
End;
Tabela.First

e no onDBLCLick
Tabela.Edit;
If TabelaCAmpo.VAlue = �X� Then
TabelaCampo.value = ��
Else
TabelaCampo.value = �X�

Existem algumas considera��es referentes a cada tipo de componente para conex�o que vc usar....

POr exemplo, se usar BDE precisaria de um Update e dar um Apply depois, e assim vai...

Raphael.sx · Answer

n�o funcionou!! ajuda!!...

Ivanh · Answer

No firebird pode fazer esta procedure:SET TERM ^ ;CREATE PROCEDURE NEW_PROCEDURE (    QTDEEXCLUIR INTEGER)ASDECLARE VARIABLE CODIGO INTEGER;BEGIN  FOR    SELECT FIRST :QTDEEXCLUIR CODIGO FROM TABELA    INTO :CODIGO;  DO  BEGIN    DELETE FROM TABELA    WHERE CODIGO = :CODIGO;  ENDEND^SET TERM ; ^...

Tremonti · Answer

N�o funcionou pq?!O que vc fez?!...

F�rum Query... Tem como fazer isso??? #287107