Foros Club Delphi - Ejecutar onchange de combobox por codigo

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Ejecutar onchange de combobox por codigo (https://www.clubdelphi.com/foros/showthread.php?t=70161)

darkone2k4

04-10-2010 04:07:05

Ejecutar onchange de combobox por codigo

Salu2 amigos.

Tengo varios combobox en mi formulario:
El primero de ellos muestra un listado con empresas.
El segundo, dependiendo de la empresa seleccionada, me carga las sucursales asociadas a dicha empresa.
El tercero me muestra los años con los que ha trabajado la empresa.
El cuarto me muestra los meses.

Los combos 2 a 4 se llenan dependiendo de la empresa que se seleccione en el primer combo, por lo que en el evento onchange de dicho combo, tengo el procedimiento de llenado de datos obtenidos de las tablas.
Hasta ahí todo bien, el problema que tengo, es que he llegado a un punto en que necesito ejecutar el evento onchange del primer combo por código y no sé como hacerlo.
Es posible hacerlo???

Desde ya, muchas gracias.

salu2.

ecfisa

04-10-2010 04:37:17

Hola Darkone2k4.

La respuesta es: Si es posible.

Ejemplo:

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
begin
  ComboBox1Change(self);  // Nombre_del_combo+Change
end;

Saludos. :)

darkone2k4

04-10-2010 04:47:29

Cita:

Empezado por ecfisa (Mensaje 378290)

Hola Darkone2k4.

La respuesta es: Si.

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
begin
  ComboBox1.ItemIndex := 1;
  ComboBox1Change(self);
end;

Saludos. :)

muchas gracias ecfisa, era lo que necesitaba.

salu2.

ecfisa

04-10-2010 05:30:03

De nada Darkone, fijate que edité el primer post por que no había probado el código aún ( no tenía el delphi en ese equipo) pero no llegué a corregirlo antes de tu lectura.

Me quedó la duda y luego lo probé, no es necesario el cambiar el ItemIndex del combo.

Otra cosa, funciona igual para un Edit, ListBox, etc, anteponiendo el nombre del componente.

Saludos. :)

darkone2k4

04-10-2010 06:24:08

Cita:

Empezado por ecfisa (Mensaje 378294)

Solo necesitaba el
Código Delphi [-]
combobox1change(self);

gracias nuevamente.

La franja horaria es GMT +2. Ahora son las 11:03:31.