Propriedade Handle!!!!!!!(ME AJUDEM!!!)

Delphi

15/03/2003

Senhores quando tento atualizar uma tabela com o comando update me surge um erro ´Error creating cursor handle´ não consigo resolver o problema com essa propriedade...Abaixo as linhas de código:

procedure TFrm2.R1Click(Sender: TObject);
begin
r1.Checked:=true;
r2.Checked:=false;
r3.Checked:=false;
dtm1.q1.active:=false;
dtm1.q1.sql.clear;
dtm1.Q1.sql.Add(´Update Mensalidade set Rateio=´30´´);
dtm1.q1.active:=true;
end;

POR FAVOR ME AJUDEM!!!! :?:


Marciojse

Marciojse

Curtidas 0

Respostas

Thematrix:reloaded

Thematrix:reloaded

15/03/2003

Quando vc usar a comandos SQL que alteram a tabela (Insert, Update, Delete, etc), use o evento EXECUTE no componente Query e nao o Active:

dtm1.q1.sql.clear;
dtm1.Q1.sql.Add(´Update Mensalidade set Rateio=´30´´);
dtm1.q1.EXECUTE;


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

15/03/2003

Senhores quando tento atualizar uma tabela com o comando update me surge um erro ´Error creating cursor handle´ não consigo resolver o problema com essa propriedade...Abaixo as linhas de código: procedure TFrm2.R1Click(Sender: TObject); begin r1.Checked:=true; r2.Checked:=false; r3.Checked:=false; dtm1.q1.active:=false; dtm1.q1.sql.clear; dtm1.Q1.sql.Add(´Update Mensalidade set Rateio=´30´´); dtm1.q1.active:=true; end; POR FAVOR ME AJUDEM!!!! :?:


procedure TFrm2.R1Click(Sender: TObject);
begin
r1.Checked:=true;
r2.Checked:=false;
r3.Checked:=false;
dtm1.q1.active:=false;
dtm1.q1.sql.clear;
dtm1.Q1.sql.Add(´Update Mensalidade set Rateio="30"´);
dtm1.q1.ExecSQL; // Para update, delete e insert
end;



GOSTEI 0
POSTAR