3D Modeling

[tcxhb]

FACE *f1;
 ::api_curve_ellipse(p(0,0,0),p(0,1,0),2,0,0,e,NULL);
 WIRE *w=new WIRE((COEDGE *)e,w);

 outcome outp = api_cover_wire (w,*(surface*)NULL,f1,NULL);
 savelist->add(e);

 if(!outp.ok())
 {
  CString str = ::find_err_mess(outp.error_number());
  ::AfxMessageBox(str);
  return ;
 }