delphi 10 lite,radiogroup

[juaarias]

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 Notevi]

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]

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

  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 Notevi]

Puedes hacerlo así:

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

[[Delphius]]

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]

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