deletar registro do access atraves do delphi

13/02/2017

0

Boa tarde.
tenho uma interface de cadastro de funcionários no delphi, que se comunica com um banco de dados no access. Gostaria de saber como posso excluir um funcionário previamente cadastrado, e todas as informações associadas a ele (com um botão excluir) com algum comando pelo delphi.
Obrigada
Roberta

Roberta

Responder

Posts

14/02/2017

Raimundo Pereira

Uma vez selecionado o registro basta realizar o delete;
O que você tem pronto?
Responder

14/02/2017

Roberta

preciso de um botão que consiga editar os dados existente, e um que exclua determinado cadastro. A seleção do cadastro a ser ''alterado'' é por meio da lista box, a qual conterá o cpf e nome do funcionário.
Até agora consigo apenas trazer os dados do funcionário selecionado para o campo das edits, mas n consigo alterar o registro existente.
segue o código do botão editar

procedure TfrmCadastro.btneditarClick(Sender: TObject);
var
CPF: string;

begin
CPF := copy(lstbxempregados.Items.Strings[lstbxempregados.Itemindex], 1, 14);
with udm.DM.tblfuncionario do
begin
close;
open;
first;

if Locate(''CPF'', CPF,[]) = true then //compara o cpf da list box com o banco de dados
begin
edtempregado.text := (FieldByName(''Nome_do_Empregado'').AsString); { se a comparação for verdadeira, traz o dados atrelados a
este cpf para as edits }
mskedtCPF.text := (FieldByName(''CPF'').AsString);
edtsalario.text := (FieldByName(''Salario'').AsString);
cmbbxSexo.ItemIndex:= (FieldByName(''Sexo'').AsInteger);
cmbbxSupervisor.ItemIndex:=(FieldByName(''Nome_do_Supervisor'').AsInteger);
end;
Responder

14/02/2017

Roberta

pensei em criar um botão salvar edição, mas n sei como faria o código
Responder

14/02/2017

Ricardo Araujo

Não consegui entender, poderia adicionar algumas tela do sistema e explicar o que esta querendo ?
Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

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

Aceitar