Código Delphi [-] Case ValueIndex of 1 : FormaValor1.Show; 2 : FormaValor2.Show; 3 : FormaValor3.Show; end;
Case ValueIndex of 1 : FormaValor1.Show; 2 : FormaValor2.Show; 3 : FormaValor3.Show; end;