Ver Mensaje Individual
  #2  
Antiguo 08-07-2018
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: Dec 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.126
Reputación: 30
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Puedes obtener un comportamiento similar al que buscas con un TDBLookupListBox agregando estas líneas:
Código Delphi [-]
...
procedure TForm1.FormCreate(Sender: TObject);
begin
  ...
  DBLookupListBox1.Height := DBLookupcomboBox1.Font.Height;
  ShowScrollBar(DBLookupListBox1.Handle, SB_VERT, False);
end;

...

procedure TForm1.DBLookupListBox1Click(Sender: TObject);
begin
  ShowScrollBar(DBLookupListBox1.Handle, SB_VERT, False);
end;

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita