if(StringList==NULL)
StringList = new TStringList();
if(RadioGroup_FOGType==NULL)
RadioGroup_FOGType=new TRadioGroup();
RadioGroup_FOGType->Items=StringList;
RadioGroup_FOGType->ItemIndex=0;
StringList = new TStringList();
StringList->Add("RD01");
StringList->Add("RD02");
if(RadioGroup_FOGType==NULL)
RadioGroup_FOGType=new TRadioGroup();
RadioGroup_FOGType->Items=StringList;
RadioGroup_FOGType->ItemIndex=0;