Deletar um item do Banco de dados selecionado numa ListBox

Delphi

28/08/2003

Eu Criei uma lista de items do meu banco de dados..na Lista box..
Mias quero selecionar um deses items na lista e clickar em um botão para tira-lo da lista e respectivamente apagalo do meu Banco de dados..

Ja tentei... de tudo e não sei como fazer..

Alguem me ajuda..?


Marcos Tavares

Marcos Tavares

Curtidas 0

Respostas

Demolitor

Demolitor

28/08/2003

vc faz assim... coloca no botao!

procedure TForm1.Button1Click(Sender: TObject);
var busca: boolean;
begin
        busca := Table1.Locate(´CAMPO´,´ListBox1.Items.Strings[ListBox1.ItemIndex]´,[loPartialKey,loCaseInsensitive]);
        If busca = True Then  //verifica se encontrou o item
        Table1.Delete;
end;


Falow


GOSTEI 0
POSTAR