Ver Mensaje Individual
  #3  
Antiguo 15-07-2008
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
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?
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita