Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   ayuda con el combobox (https://www.clubdelphi.com/foros/showthread.php?t=72451)

Nostradonuts 19-02-2011 11:47:53

ayuda con el combobox
 
hola, soy nuevo en este foro, este año estoy aprendiendo a programar con Delphi y por ahora voy un poco perdido (aun no le he pillado el truquillo), es posible que os haga muchas consultas y os agradezco vuestra ayuda.

Este es mi primer post aqui, y quisiera poner un combobox y que me de un resultado, por ejemplo si en el combobox tengo el item 0 quiero que en el panel1 me salga o, si en combobox tengo el item 1 en el panel1 quiero que salga 10, si en el combo box tengo el item 4 en el panel1 quiero que me salga un 17.

Es decir dependiendo del numero que seleccione en el combobox quiero que en panel1 me salga un numero determinado.

Supongo que muy dificil no debe ser, pero aun estoy aprendiendo. Tengo mucho interes en poder llegar a manejarme bien con el Delphi.

Gracias.

Luis M. 19-02-2011 13:30:29

Hola y Bienvenido al Club Delphi.

El el evento OnDropUp de ComboBox pon este código:

Código Delphi [-]
  case ComboBox1.ItemIndex of
     0:begin
          Pane1.caption := Lo que quieras poner;
       end;
    1:begin
          Pane1.caption := Otra cosa...;
       end;
    2:begin
          Pane1.caption := Etc, etc, etc ;
       end;
  end;

Si Panel1 no tiene la propiedad 'caption', busca la que le corresponda.

Un saludo.

Caral 19-02-2011 14:54:41

Hola
Código Delphi [-]
case ComboBox1.ItemIndex of
     0:begin
          Pane1.caption := 'Lo que quieras poner';
       end;
    1:begin
          Pane1.caption := 'Otra cosa...';
       end;
    2:begin
          Pane1.caption := 'Etc, etc, etc ';
       end;
  end;
Saludos

Nostradonuts 19-02-2011 15:50:55

gracias, es justo lo que necesitaba


La franja horaria es GMT +2. Ahora son las 21:52:39.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi