Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   delphi 10 lite,radiogroup (https://www.clubdelphi.com/foros/showthread.php?t=73241)

juaarias 10-04-2011 15:21:18

delphi 10 lite,radiogroup
 
gente queria consultar si hay alguna forma de asignarle a un label el contenido de un items seleccionado de un radiogroup ??????????'sin hacelo con if then como lo vengo haciendo,saludos

Casimiro Noteví 10-04-2011 15:55:40

Sí, se puede, pero estaría bien que pusieras el código que estás usando para que lo veamos y aconsejarte mejor.

Por cierto, recuerda nuestra guía de estilo, gracias.

Y si tienes un delphi "pirateado" no hace falta que lo publiques en el título para que todo el mundo se entere ;)

juaarias 10-04-2011 16:44:18

no sabia que era pirateado, es el que me dan en al facu.
ya resolvi el ejercicio de esta manera:
Código:

  if rdgTipoPago.ItemIndex=0 then
        begin
        frmRecibo.lblTipo.Caption:='Efectivo';
        end
        else begin
          if rdgTipoPago.ItemIndex=1 then
          begin
          frmRecibo.lblTipo.Caption:='Tarjeta';
          end
          else begin
            if rdgTipoPago.itemIndex=2 then
            begin
              frmRecibo.lblTipo.Caption:='Cheque';
            end;

en este caso eran 3 items pero si llegara a precisar utilizar mas seria engorrozo

Casimiro Noteví 10-04-2011 19:11:52

Puedes hacerlo así:

Código Delphi [-]
frmRecibo.lblTipo.Caption := rdgTipoPago.Items[rdgTipoPago.ItemIndex]

Delphius 10-04-2011 19:14:44

Hola juaarias,
¿Conoces la estructura de selección CASE? Tu código puede simplificarse con ésta.

Código Delphi [-]
case rdgTipoPago.ItemIndex of
0: frmRecibo.lblTipo.Caption := 'Efectivo';
1: frmRecibo.lblTipo.Caption := ...
...
N: ...
end; // El case finaliza con un end.

Te recomiendo una lectura sobre la gramática y sintaxis de Pascal/Object Pascal. En la ayuda hay todo un apartado sobre ésto.

Saludos,

juaarias 10-04-2011 20:17:45

si la conozco, se me habia ocurrido algo asi, pense que habia alguna propiedad que señale el item seleccionado,como para asignar directamente.
MUCHISIMAS GRACIAS GENTE GRACIAS POR SU COLABORACION


La franja horaria es GMT +2. Ahora son las 05:37:08.

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