看不懂耶~
有更具体的描述吗~

你要做哪些事~

你是要将结果全显示出来吗?
若是,
请把
str = Edit2->Text + " " ; 改为 str += Edit2->Text + " " ;
switch( RadioGroup1->ItemIndex ){
.
.中间略
.
Label1->Caption = str ; 这行可以拿掉

AnsiString   str ;
str = Edit1->Text + " " ;

str(<~~~问题在这) = Edit2->Text + " " ;  

请str 改成别的str1 或..,因为重复了