[quote=BlueSteel;226030]puedes definir una variable paso
vPaso : String;
vPaso := ' ';
if Opcion1.Cheked= True Then vPaso := Concat(vPaso,' Opcion1 ');
if Opcion2.Cheked= True Then vPaso := Concat(vPaso,' Opcion2 ');
if Opcion3.Cheked= True Then vPaso := Concat(vPaso,' Opcion3 ');
label1.caption := vPaso;
Creo que va mejor como dice nuestro companero Blue Steel otra opcion seria usar los If anidados Ej:
vPaso : String;
vPaso := ' ';
if Opcion1.Cheked Then
vPaso :=Opcion1
Else if Opcion2.Cheked Then
vPaso := vPaso+Opcion2
Else if Opcion3.Cheked Then
vPaso+Opcion3;
label1.caption := vPaso;
|