Hola.
Cita:
Empezado por Esquivel
Y si yo quisiera borrar un elemento seleccionado de la listbox.
Como sería el codigo. ![Confused](http://www.clubdelphi.com/foros/images/smilies/confused.gif)
|
Delphi usando VCL:
Código Delphi
[-]
...
begin
if ListBox1.ItemIndex <> -1 then
ListBox1.Items.Delete(ListBox1.ItemIndex);
end;
Delphi usando API de Windows:
Código Delphi
[-]
...
begin
if SendMessage(ListBox1.Handle,LB_GETCURSEL,0,0) <> -1 then
SendMessage(ListBox1.Handle, LB_DELETESTRING,
SendMessage(ListBox1.Handle,LB_GETCURSEL,0,0), 0);
end;
Saludos
![Smilie](http://www.clubdelphi.com/foros/images/smilies/smile.gif)