Fórum Duvida sobre DELETE #218367

04/03/2004

0

Olá pessoal, esto querendo exluir registro de uma tabela usando SQL, no OnClick do botão eu coloquei a seguinte rotina:

procedure TFormPesConsultor.BitBtn1(Sender: TObject);
begin
With Query1 Do
Begin
Close;
SQL.Add(´DELETE FROM Table1);
SQL.Add(´WHERE Codigo=´10´´);
open;
ShowMessage(´OK´);
End;
end;

end.
O registro é exluido mais aparece um erro:

Project BackOffice.exe raised exception class Enopesultset with message´Error Creating cursor handle.´ Process stopped.Use step or Run to continue.

Error Creating Cursor Handle.

Obs.: Lenbrando que o ´BackOffice´ que aparece na messagem de erro é o nome do meu sistema.

Obrigado


Leandrosl

Leandrosl

Responder

Posts

04/03/2004

Weber

Use OPEN somente quanto estiver fazendo um Select.
Quanto a Query conter INSERT, UPDATE ou DELETE utilize EXECSQL.

então vai ficar assim:

procedure TFormPesConsultor.BitBtn1(Sender: TObject);
begin
With Query1 Do
Begin
Close;
SQL.Add(´DELETE FROM Table1);
SQL.Add(´WHERE Codigo=´10´´);
ExecSQL;
ShowMessage(´OK´);


Responder

Gostei + 0

05/03/2004

Leandrosl

Obrigado, funciono perfeita, mais aproveitando a oportunidade gostaria de saber como posso excluir o registro em duas tabelas usando o clausa DELETE.

Obrigado


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar