botão salvar

[deyvidfera 0]

ai galera tenho uma duvida...

o que devo fazer no botão salvar de um formulario...

 

tipo meu amigo me passou um codigo mas nem sei se esta certo, estou usando delphi 5 + firebird

 

esse é o escript

 

procedure TfCadPassagens.bSalvarClick(Sender: TObject);

var

qInsert : TQuery;

begin

 

with qInsert do begin

close;

sql.clear;

DatabaseName := 'conectaSQL';

sql.Add('insert into agenda(NOME,ENDERECO,TELEFONE,EMAIL,');

sql.Add('values("camp_nome", "camp_end","camp_fone","camp_email",');

ExecSQL;

MessageBox(WindowHandle, 'Registro cadastrado com exito', 'Informação', MB_OK+MB_ICONINFORMATION);

bCancelarClick(bCancelar);

eNumero.SetFocus;

end;

end;

 

isto esta certo tem uma forma mais simples de fazer... delphi não é muito minha praia mas quero aprender um poko tbm...

 

valeu galera, um abraço

[Hugo Slepicka 0]

1° - Qual a forma que você está trabalhando???(Usando Table? Query? ClientDataSet???)

Como está organizado seu acesso ao banco de dados???

 

2° - Como você acessa os dados no componente???Pelos componentes da paleta DataControls??

 

Dê mais informações a respeito do seu sistema para que agente veja como te ajudar...

[deyvidfera 0]

cara para te falar a verdade nem fiz nada ainda...

tem como você me mostrar um exemplo... ow me passar uns links de onde achar isso para dar uma lida...

 

valeu cara

[Hugo Slepicka 0]

Da uma olhada na Busca do fórum... beleza????

[deyvidfera 0]

valeu cara... vou dar uma olhada qualquer duvida eu posto...

 

um abraço