Eliminar de bd seleccionado de listview

[jonydread]

amigos estoy tratando de eliminar de mi base de datos el item seleccionado de listview
estoy tratando asi y me salen errores, en san google no he encontrado nada
mi codigo

Código Delphi [-]
procedure TForm1.BitBtn2Click(Sender: TObject);
begin

Zquery1.sql.text := 'delete from datos values (:fecha, :area,:tipo, :detalle,:id)';
ZQuery1.Locate('fecha' , 'listview1.Selected.Caption', [loCaseInsensitive, loPartialKey] );
ZQuery1.Locate('area' , 'listview1.Selected.SubItems[1]', [loCaseInsensitive, loPartialKey] );
ZQuery1.Locate('tipo' , 'listview1.Selected.SubItems[1]', [loCaseInsensitive, loPartialKey] );
ZQuery1.Locate('detalle' , 'listview1.Selected.SubItems[1]', [loCaseInsensitive, loPartialKey] );
ZQuery1.ExecSQL;
zQuery1.SQL.Clear;
  end;

saludos!