Duvida com starttrasaction, commit e rollback e findkey
04/02/2006
0
Estou criando ele em sql server 7.0 e delphi 7.0..
no paradox fica assim database.rollback , startransaction ou commit que saber qual e a função de cada um e como posso usar em adoconection...
e sobre o findkey eu faço assim table.findkey([glbcodigo]);
agora como posso fazer em query..
obrigado a todos e se nao entenderem e so dizer que explico melhor..
Firekiller_am
Posts
05/02/2006
Edilcimar
06/02/2006
Thomaz_prg
06/02/2006
Firekiller_am
obrigado a todos.....
sergio-project@hotmail.com
06/02/2006
Firekiller_am
agradeço
procedure TfrmClientes.BtAlterarClick(Sender: TObject);
begin
glbCodigo := 0;
try
Application.CreateForm(tfrmConsClientes,frmConsClientes);
frmConsClientes.showmodal;
finally
frmConsClientes.free;
end;
if glbCodigo<>0 then
begin
Restaura;
Escolha:= ´E´;
frmdm.adoVendas.BeginTrans;
[b:866d068cb0]frmdm.qrClientes.findkey([glbcodigo);[/b:866d068cb0]
end
end;
06/02/2006
Edilcimar
Select nomecampodesejado from tabelaclientes where campocodigo =:codigocliente
06/02/2006
Firekiller_am
06/02/2006
Edilcimar
06/02/2006
Firekiller_am
procedure TfrmClientes.BtAlterarClick(Sender: TObject);
begin
glbCodigo := 0;
try
Application.CreateForm(tfrmConsClientes,frmConsClientes);
frmConsClientes.showmodal;
finally
frmConsClientes.free;
end;
if glbCodigo<>0 then
begin
Restaura;
Escolha:= ´E´;
frmdm.adoVendas.BeginTrans;
qrPesquisa.close;
qrPesquisa.sql.clear;
qrPesquisa.sql.add(Select nomecampodesejado from tabelaclientes);
qrPesquisa.sql.add(´where campocodigo =:codigocliente´);
qrPesquisa.open;
end
end;
como que fica a rotina obrigado pela parciencia....
06/02/2006
Edilcimar
Clique aqui para fazer login e interagir na Comunidade :)