//--------------------------------------------------------------------------- void __fastcall TMForm::SimulateAExecute(TObject *Sender) { if(!mRR) { return; } try { //Setup selection list StringList list = GetCheckedSpecies(); string selected = list.AsString(); mRR->setTimeCourseSelectionList(selected); Log(rr::lInfo)<<"Currently selected species: "<<mRR->getTimeCourseSelectionList().AsString(); mRR->simulateEx(mStartTimeE->GetValue(), *mEndTimeE, mNrOfSimulationPointsE->GetValue()); RoadRunnerData data = mRR->getSimulationResult(); string resultFileName(rr::joinPath(mRR->getTempFolder(), mRR->getModelName())); resultFileName = rr::changeFileExtensionTo(resultFileName, ".csv"); Log(rr::lInfo)<<"Saving result to file: "<<resultFileName; ofstream fs(resultFileName.c_str()); fs << data; fs.close(); Plot(data); } catch(const rr::Exception& e) { Log(rr::lInfo)<<"RoadRunner exception: "<<e.what(); } }
char* rrp_cc getNamesFromParameterList(RRParametersHandle handle) { start_try Parameters* paras = castToParameters(handle); StringList aList; for(int i = 0; i < paras->count(); i++) { aList.add((*paras)[i]->getName()); } return createText(aList.AsString().c_str()); catch_ptr_macro }