Hola,
Cita:
Empezado por egostar
Hola, te sugiero que titules los hilos de acuerdo a tu pregunta, este que has puesto no nos dice nada y no sirve para futuras consultas de otros compañeros que tuviesen la misma duda.
|
Está bien que lo menciones. Ya he editado el título.
Respecto del código que has puesto como ejemplo, igual podría añadirse la comprobación de que, efectivamente, hay algún elemento seleccionado en la lista:
Código Delphi
[-]
procedure TForm1.ListBox1KeyUp(Sender: TObject;
var Key: Word; Shift: TShiftState);
begin
if ListBox1.ItemIndex <> -1 then begin
Edit1.Text := ListBox1.Items[ListBox1.ItemIndex];
end;
end;
¿Eh?