Utilizamos cookies propias y de terceros. Al navegar entendemos que aceptas el uso de cookies. +Info.
Política de cookies
Proyecto AjpdSoft

· Inicio
· Buscar
· Contactar
· Cookies
· Descargas
· Foros
· Historia
· Nosotros
· Temas
· Top 10
· Trucos
· Tutoriales
· Usuario
· Wiki

Seleccionar un elemento de un ComboBox de tipo csDropDownList - Delphi
Lenguaje de programación Borland Delphi



Este ejemplo muestra cómo seleccionar un elemento de un ComboBox con las propiedades 'Style' = 'csDropDownList' y 'Sorted' = 'True'. En este caso no se puede seleccionar un elemento utilizando la propiedad 'Text' hay que hacerlo utilizando la propiedad 'IndexOf'. A continuación os mostramos un ejemplo en Delphi:

  ...
  tc.Close;
  txtUsuario.Clear;
  txtUsuario.Items.Add('[Todos]');
  tc.SQL.Clear;
  tc.SQL.Add('SELECT DISTINCT(USUARIO) FROM HISTORICO WHERE USUARIO IS NOT NULL');
  tc.Open;
  while not tc.eof do
  begin
    txtUsuario.Items.Add(tc.fieldbyname ('USUARIO').AsString);
    tc.Next;
  end;
  txtUsuario.ItemIndex := txtUsuario.Items.IndexOf ('[Todos]');
  ... 
Donde:
* 'txtUsuario' es un componente de tipo TComboBox con la propiedad 'Style' = 'csDropDownList'.
* 'tc' es un componente de tipo TQuery.


Lo que hace el ejemplo es insertar en el componente txtUsuario tantas líneas como usuarios haya en la tabla 'HISTORICO' y, añade también una línea (item) con el texto '[Todos]', por último selecciona el item '[Todos]' con:

txtUsuario.ItemIndex := txtUsuario.Items.IndexOf ('[Todos]');




Publicado el: 2006-06-16

Este sitio web NO CONTIENE malware, todos los programas con código fuente aquí. Autor: Alonso Javier Pérez Díaz Google+ Síguenos en Google+