home *** CD-ROM | disk | FTP | other *** search
/ Chip: Shareware for Win 95 / Chip-Shareware-Win95.bin / grafika / cad / _setup.1 / GCADP.CXX < prev    next >
Text File  |  1996-11-18  |  26KB  |  1,274 lines
  1. #include "GCADP.HXX"
  2.  
  3. // TKIND_DISPATCH: ArcElem 1.0 {735AAEE6-92C1-11CF-A8F8-444553540000}\409 Arc Element Class
  4.  
  5. void ArcElem::GetCenterPoint(double far* X, double far* Y) 
  6. {
  7.   AUTONAMES0("GetCenterPoint")
  8.   AUTOARGS2(X, Y)
  9.   AUTOCALL_METHOD_VOID
  10. }
  11.  
  12. long ArcElem::GetColor() 
  13. {
  14.   AUTONAMES0("GetColor")
  15.   AUTOARGS0()
  16.   AUTOCALL_METHOD_RET
  17. }
  18.  
  19. long ArcElem::GetType() 
  20. {
  21.   AUTONAMES0("GetType")
  22.   AUTOARGS0()
  23.   AUTOCALL_METHOD_RET
  24. }
  25.  
  26. double ArcElem::GetWidth() 
  27. {
  28.   AUTONAMES0("GetWidth")
  29.   AUTOARGS0()
  30.   AUTOCALL_METHOD_RET
  31. }
  32.  
  33. double ArcElem::GetStartAngle() 
  34. {
  35.   AUTONAMES0("GetStartAngle")
  36.   AUTOARGS0()
  37.   AUTOCALL_METHOD_RET
  38. }
  39.  
  40. double ArcElem::GetEndAngle() 
  41. {
  42.   AUTONAMES0("GetEndAngle")
  43.   AUTOARGS0()
  44.   AUTOCALL_METHOD_RET
  45. }
  46.  
  47. double ArcElem::GetRadius() 
  48. {
  49.   AUTONAMES0("GetRadius")
  50.   AUTOARGS0()
  51.   AUTOCALL_METHOD_RET
  52. }
  53.  
  54.  
  55. // TKIND_DISPATCH: BmpElem 1.0 {735AAEE7-92C1-11CF-A8F8-444553540000}\409 Bmp Element Class
  56.  
  57. void BmpElem::GetFirstPoint(double far* X, double far* Y) 
  58. {
  59.   AUTONAMES0("GetFirstPoint")
  60.   AUTOARGS2(X, Y)
  61.   AUTOCALL_METHOD_VOID
  62. }
  63.  
  64. void BmpElem::GetSecondPoint(double far* X, double far* Y) 
  65. {
  66.   AUTONAMES0("GetSecondPoint")
  67.   AUTOARGS2(X, Y)
  68.   AUTOCALL_METHOD_VOID
  69. }
  70.  
  71. bool BmpElem::GetScale() 
  72. {
  73.   AUTONAMES0("GetScale")
  74.   AUTOARGS0()
  75.   AUTOCALL_METHOD_CONV(TBool)
  76. }
  77.  
  78.  
  79. // TKIND_DISPATCH: CircleElem 1.0 {735AAEE8-92C1-11CF-A8F8-444553540000}\409 Circle Element Class
  80.  
  81. void CircleElem::GetCenterPoint(double far* X, double far* Y) 
  82. {
  83.   AUTONAMES0("GetCenterPoint")
  84.   AUTOARGS2(X, Y)
  85.   AUTOCALL_METHOD_VOID
  86. }
  87.  
  88. long CircleElem::GetColor() 
  89. {
  90.   AUTONAMES0("GetColor")
  91.   AUTOARGS0()
  92.   AUTOCALL_METHOD_RET
  93. }
  94.  
  95. long CircleElem::GetType() 
  96. {
  97.   AUTONAMES0("GetType")
  98.   AUTOARGS0()
  99.   AUTOCALL_METHOD_RET
  100. }
  101.  
  102. double CircleElem::GetWidth() 
  103. {
  104.   AUTONAMES0("GetWidth")
  105.   AUTOARGS0()
  106.   AUTOCALL_METHOD_RET
  107. }
  108.  
  109. double CircleElem::GetRadius() 
  110. {
  111.   AUTONAMES0("GetRadius")
  112.   AUTOARGS0()
  113.   AUTOCALL_METHOD_RET
  114. }
  115.  
  116.  
  117. // TKIND_DISPATCH: FillElem 1.0 {735AAEE9-92C1-11CF-A8F8-444553540000}\409 Fill Element Class
  118.  
  119. void FillElem::GetFirstVertex(double far* X, double far* Y) 
  120. {
  121.   AUTONAMES0("GetFirstVertex")
  122.   AUTOARGS2(X, Y)
  123.   AUTOCALL_METHOD_VOID
  124. }
  125.  
  126. bool FillElem::GetNextVertex(double far* X, double far* Y) 
  127. {
  128.   AUTONAMES0("GetNextVertex")
  129.   AUTOARGS2(X, Y)
  130.   AUTOCALL_METHOD_CONV(TBool)
  131. }
  132.  
  133. long FillElem::GetColor() 
  134. {
  135.   AUTONAMES0("GetColor")
  136.   AUTOARGS0()
  137.   AUTOCALL_METHOD_RET
  138. }
  139.  
  140. long FillElem::GetType() 
  141. {
  142.   AUTONAMES0("GetType")
  143.   AUTOARGS0()
  144.   AUTOCALL_METHOD_RET
  145. }
  146.  
  147.  
  148. // TKIND_DISPATCH: TGcadApp 1.0 {735AAEEA-92C1-11CF-A8F8-444553540000}\409 Application class
  149.  
  150. bool TGcadApp::GetVisible()     
  151. {
  152.   AUTONAMES0("Visible")
  153.   AUTOARGS0()
  154.   AUTOCALL_PROP_CONV(TBool)
  155. }
  156.  
  157. void TGcadApp::SetVisible(bool val) 
  158. {
  159.   AUTONAMES0("Visible")
  160.   AUTOARGS0()
  161.   AUTOCALL_PROP_SET(TBool(val))
  162. }
  163.  
  164. bool TGcadApp::NewDocument() 
  165. {
  166.   AUTONAMES0("NewDocument")
  167.   AUTOARGS0()
  168.   AUTOCALL_METHOD_CONV(TBool)
  169. }
  170.  
  171. bool TGcadApp::OpenDocument(TAutoString Name) 
  172. {
  173.   AUTONAMES0("OpenDocument")
  174.   AUTOARGS1(Name)
  175.   AUTOCALL_METHOD_CONV(TBool)
  176. }
  177.  
  178. bool TGcadApp::SaveDocument() 
  179. {
  180.   AUTONAMES0("SaveDocument")
  181.   AUTOARGS0()
  182.   AUTOCALL_METHOD_CONV(TBool)
  183. }
  184.  
  185. bool TGcadApp::SaveDocumentAs(TAutoString Name) 
  186. {
  187.   AUTONAMES0("SaveDocumentAs")
  188.   AUTOARGS1(Name)
  189.   AUTOCALL_METHOD_CONV(TBool)
  190. }
  191.  
  192. bool TGcadApp::LoadSymbolLib(TAutoString symFname) 
  193. {
  194.   AUTONAMES0("LoadSymbolLib")
  195.   AUTOARGS1(symFname)
  196.   AUTOCALL_METHOD_CONV(TBool)
  197. }
  198.  
  199. void TGcadApp::GetView(GcadOleView& obj) 
  200. {
  201.   AUTONAMES0("GetView")
  202.   AUTOARGS0()
  203.   AUTOCALL_METHOD_REF(obj)
  204. }
  205.  
  206. TAutoString TGcadApp::GetName() 
  207. {
  208.   AUTONAMES0("Name")
  209.   AUTOARGS0()
  210.   AUTOCALL_PROP_GET
  211. }
  212.  
  213. TAutoString TGcadApp::GetFullName() 
  214. {
  215.   AUTONAMES0("FullName")
  216.   AUTOARGS0()
  217.   AUTOCALL_PROP_GET
  218. }
  219.  
  220. void TGcadApp::GetApplication(TGcadApp& obj) 
  221. {
  222.   AUTONAMES0("Application")
  223.   AUTOARGS0()
  224.   AUTOCALL_PROP_REF(obj)
  225. }
  226.  
  227. void TGcadApp::Quit() 
  228. {
  229.   AUTONAMES0("Quit")
  230.   AUTOARGS0()
  231.   AUTOCALL_METHOD_VOID
  232. }
  233.  
  234.  
  235. // TKIND_DISPATCH: InsertElem 1.0 {735AAEEB-92C1-11CF-A8F8-444553540000}\409 Insert Element Class
  236.  
  237. void InsertElem::GetInsertPoint(double far* X, double far* Y) 
  238. {
  239.   AUTONAMES0("GetInsertPoint")
  240.   AUTOARGS2(X, Y)
  241.   AUTOCALL_METHOD_VOID
  242. }
  243.  
  244. TAutoString InsertElem::GetName() 
  245. {
  246.   AUTONAMES0("GetName")
  247.   AUTOARGS0()
  248.   AUTOCALL_METHOD_RET
  249. }
  250.  
  251. double InsertElem::GetRotation() 
  252. {
  253.   AUTONAMES0("GetRotation")
  254.   AUTOARGS0()
  255.   AUTOCALL_METHOD_RET
  256. }
  257.  
  258. void InsertElem::GetScale(double far* xfact, double far* yfact) 
  259. {
  260.   AUTONAMES0("GetScale")
  261.   AUTOARGS2(xfact, yfact)
  262.   AUTOCALL_METHOD_VOID
  263. }
  264.  
  265.  
  266. // TKIND_DISPATCH: LineElem 1.0 {735AAEEC-92C1-11CF-A8F8-444553540000}\409 Line Element Class
  267.  
  268. void LineElem::GetFirstPoint(double far* X, double far* Y) 
  269. {
  270.   AUTONAMES0("GetFirstPoint")
  271.   AUTOARGS2(X, Y)
  272.   AUTOCALL_METHOD_VOID
  273. }
  274.  
  275. void LineElem::GetSecondPoint(double far* X, double far* Y) 
  276. {
  277.   AUTONAMES0("GetSecondPoint")
  278.   AUTOARGS2(X, Y)
  279.   AUTOCALL_METHOD_VOID
  280. }
  281.  
  282. long LineElem::GetColor() 
  283. {
  284.   AUTONAMES0("GetColor")
  285.   AUTOARGS0()
  286.   AUTOCALL_METHOD_RET
  287. }
  288.  
  289. long LineElem::GetType() 
  290. {
  291.   AUTONAMES0("GetType")
  292.   AUTOARGS0()
  293.   AUTOCALL_METHOD_RET
  294. }
  295.  
  296. double LineElem::GetWidth() 
  297. {
  298.   AUTONAMES0("GetWidth")
  299.   AUTOARGS0()
  300.   AUTOCALL_METHOD_RET
  301. }
  302.  
  303.  
  304. // TKIND_DISPATCH: PlineElem 1.0 {735AAEED-92C1-11CF-A8F8-444553540000}\409 Pline Element Class
  305.  
  306. void PlineElem::GetFirstVertex(double far* X, double far* Y) 
  307. {
  308.   AUTONAMES0("GetFirstVertex")
  309.   AUTOARGS2(X, Y)
  310.   AUTOCALL_METHOD_VOID
  311. }
  312.  
  313. bool PlineElem::GetNextVertex(double far* X, double far* Y) 
  314. {
  315.   AUTONAMES0("GetNextVertex")
  316.   AUTOARGS2(X, Y)
  317.   AUTOCALL_METHOD_CONV(TBool)
  318. }
  319.  
  320. long PlineElem::GetColor() 
  321. {
  322.   AUTONAMES0("GetColor")
  323.   AUTOARGS0()
  324.   AUTOCALL_METHOD_RET
  325. }
  326.  
  327. long PlineElem::GetType() 
  328. {
  329.   AUTONAMES0("GetType")
  330.   AUTOARGS0()
  331.   AUTOCALL_METHOD_RET
  332. }
  333.  
  334. double PlineElem::GetWidth() 
  335. {
  336.   AUTONAMES0("GetWidth")
  337.   AUTOARGS0()
  338.   AUTOCALL_METHOD_RET
  339. }
  340.  
  341. long PlineElem::GetClosed() 
  342. {
  343.   AUTONAMES0("GetClosed")
  344.   AUTOARGS0()
  345.   AUTOCALL_METHOD_RET
  346. }
  347.  
  348.  
  349. // TKIND_DISPATCH: PointElem 1.0 {735AAEEE-92C1-11CF-A8F8-444553540000}\409 Point Element Class
  350.  
  351. void PointElem::GetPoint(double far* X, double far* Y) 
  352. {
  353.   AUTONAMES0("GetPoint")
  354.   AUTOARGS2(X, Y)
  355.   AUTOCALL_METHOD_VOID
  356. }
  357.  
  358. long PointElem::GetColor() 
  359. {
  360.   AUTONAMES0("GetColor")
  361.   AUTOARGS0()
  362.   AUTOCALL_METHOD_RET
  363. }
  364.  
  365. long PointElem::GetType() 
  366. {
  367.   AUTONAMES0("GetType")
  368.   AUTOARGS0()
  369.   AUTOCALL_METHOD_RET
  370. }
  371.  
  372. double PointElem::GetSize() 
  373. {
  374.   AUTONAMES0("GetSize")
  375.   AUTOARGS0()
  376.   AUTOCALL_METHOD_RET
  377. }
  378.  
  379.  
  380. // TKIND_DISPATCH: TextElem 1.0 {735AAEEF-92C1-11CF-A8F8-444553540000}\409 Text Element Class
  381.  
  382. void TextElem::GetAlignPoint(double far* X, double far* Y) 
  383. {
  384.   AUTONAMES0("GetAlignPoint")
  385.   AUTOARGS2(X, Y)
  386.   AUTOCALL_METHOD_VOID
  387. }
  388.  
  389. long TextElem::GetColor() 
  390. {
  391.   AUTONAMES0("GetColor")
  392.   AUTOARGS0()
  393.   AUTOCALL_METHOD_RET
  394. }
  395.  
  396. double TextElem::GetHeight() 
  397. {
  398.   AUTONAMES0("GetHeight")
  399.   AUTOARGS0()
  400.   AUTOCALL_METHOD_RET
  401. }
  402.  
  403. double TextElem::GetAngle() 
  404. {
  405.   AUTONAMES0("GetAngle")
  406.   AUTOARGS0()
  407.   AUTOCALL_METHOD_RET
  408. }
  409.  
  410. double TextElem::GetOrient() 
  411. {
  412.   AUTONAMES0("GetOrient")
  413.   AUTOARGS0()
  414.   AUTOCALL_METHOD_RET
  415. }
  416.  
  417. double TextElem::GetWidth() 
  418. {
  419.   AUTONAMES0("GetWidth")
  420.   AUTOARGS0()
  421.   AUTOCALL_METHOD_RET
  422. }
  423.  
  424. long TextElem::GetJust() 
  425. {
  426.   AUTONAMES0("GetJust")
  427.   AUTOARGS0()
  428.   AUTOCALL_METHOD_RET
  429. }
  430.  
  431. TAutoString TextElem::GetString() 
  432. {
  433.   AUTONAMES0("GetString")
  434.   AUTOARGS0()
  435.   AUTOCALL_METHOD_RET
  436. }
  437.  
  438.  
  439. // TKIND_DISPATCH: GcadOleView 1.0 {735AAEF0-92C1-11CF-A8F8-444553540000}\409 GammaCAD View Class
  440.  
  441. TAutoString GcadOleView::GetFirstLayer() 
  442. {
  443.   AUTONAMES0("FirstLayer")
  444.   AUTOARGS0()
  445.   AUTOCALL_PROP_GET
  446. }
  447.  
  448. TAutoString GcadOleView::GetNextLayer() 
  449. {
  450.   AUTONAMES0("NextLayer")
  451.   AUTOARGS0()
  452.   AUTOCALL_PROP_GET
  453. }
  454.  
  455. bool GcadOleView::GetDeviceWindow(long far* x1, long far* y1, long far* x2, long far* y2) 
  456. {
  457.   AUTONAMES0("GetDeviceWindow")
  458.   AUTOARGS4(x1, y1, x2, y2)
  459.   AUTOCALL_METHOD_CONV(TBool)
  460. }
  461.  
  462. bool GcadOleView::GetWorldWindow(double far* x1, double far* y1, double far* x2, double far* y2) 
  463. {
  464.   AUTONAMES0("GetWorldWindow")
  465.   AUTOARGS4(x1, y1, x2, y2)
  466.   AUTOCALL_METHOD_CONV(TBool)
  467. }
  468.  
  469. bool GcadOleView::SetPlotScale(double scale, long metric) 
  470. {
  471.   AUTONAMES0("SetPlotScale")
  472.   AUTOARGS2(scale, metric)
  473.   AUTOCALL_METHOD_CONV(TBool)
  474. }
  475.  
  476. bool GcadOleView::SetPlotOrigin(double X, double Y) 
  477. {
  478.   AUTONAMES0("SetPlotOrigin")
  479.   AUTOARGS2(X, Y)
  480.   AUTOCALL_METHOD_CONV(TBool)
  481. }
  482.  
  483. bool GcadOleView::DxfIn(TAutoString filename) 
  484. {
  485.   AUTONAMES0("DxfIn")
  486.   AUTOARGS1(filename)
  487.   AUTOCALL_METHOD_CONV(TBool)
  488. }
  489.  
  490. bool GcadOleView::DxfOut(TAutoString filename) 
  491. {
  492.   AUTONAMES0("DxfOut")
  493.   AUTOARGS1(filename)
  494.   AUTOCALL_METHOD_CONV(TBool)
  495. }
  496.  
  497. bool GcadOleView::CreateLine(double x1, double y1, double x2, double y2) 
  498. {
  499.   AUTONAMES0("CreateLine")
  500.   AUTOARGS4(x1, y1, x2, y2)
  501.   AUTOCALL_METHOD_CONV(TBool)
  502. }
  503.  
  504. bool GcadOleView::CreateArc(double xc, double yc, double x1, double y1, double x2, double y2) 
  505. {
  506.   AUTONAMES0("CreateArc")
  507.   AUTOARGS6(xc, yc, x1, y1, x2, y2)
  508.   AUTOCALL_METHOD_CONV(TBool)
  509. }
  510.  
  511. bool GcadOleView::CreateCircle(double xc, double yc, double dist) 
  512. {
  513.   AUTONAMES0("CreateCircle")
  514.   AUTOARGS3(xc, yc, dist)
  515.   AUTOCALL_METHOD_CONV(TBool)
  516. }
  517.  
  518. bool GcadOleView::CreateEllipse(double xc, double yc, double x1, double y1, double x2, double y2) 
  519. {
  520.   AUTONAMES0("CreateEllipse")
  521.   AUTOARGS6(xc, yc, x1, y1, x2, y2)
  522.   AUTOCALL_METHOD_CONV(TBool)
  523. }
  524.  
  525. bool GcadOleView::CreatePoint(double x1, double y1) 
  526. {
  527.   AUTONAMES0("CreatePoint")
  528.   AUTOARGS2(x1, y1)
  529.   AUTOCALL_METHOD_CONV(TBool)
  530. }
  531.  
  532. bool GcadOleView::CreateText(double x1, double y1, TAutoString text) 
  533. {
  534.   AUTONAMES0("CreateText")
  535.   AUTOARGS3(x1, y1, text)
  536.   AUTOCALL_METHOD_CONV(TBool)
  537. }
  538.  
  539. bool GcadOleView::CreateSymbol(double x1, double y1, TAutoString symName, double rot, double xsc, double ysc) 
  540. {
  541.   AUTONAMES0("CreateSymbol")
  542.   AUTOARGS6(x1, y1, symName, rot, xsc, ysc)
  543.   AUTOCALL_METHOD_CONV(TBool)
  544. }
  545.  
  546. bool GcadOleView::CreateLeader(double x1, double y1, double x2, double y2, TAutoString text) 
  547. {
  548.   AUTONAMES0("CreateLeader")
  549.   AUTOARGS5(x1, y1, x2, y2, text)
  550.   AUTOCALL_METHOD_CONV(TBool)
  551. }
  552.  
  553. bool GcadOleView::CreateLinearDim(double x1, double y1, double x2, double y2, double x3, double y3, double dist, double ang, TAutoString text) 
  554. {
  555.   AUTONAMES0("CreateLinearDim")
  556.   AUTOARGS9(x1, y1, x2, y2, x3, y3, dist, ang, text)
  557.   AUTOCALL_METHOD_CONV(TBool)
  558. }
  559.  
  560. bool GcadOleView::StartPline(double x1, double y1, bool closed) 
  561. {
  562.   AUTONAMES0("StartPline")
  563.   AUTOARGS3(x1, y1, TBool(closed))
  564.   AUTOCALL_METHOD_CONV(TBool)
  565. }
  566.  
  567. bool GcadOleView::AddPlineVertex(double x1, double y1) 
  568. {
  569.   AUTONAMES0("AddPlineVertex")
  570.   AUTOARGS2(x1, y1)
  571.   AUTOCALL_METHOD_CONV(TBool)
  572. }
  573.  
  574. bool GcadOleView::EndPline() 
  575. {
  576.   AUTONAMES0("EndPline")
  577.   AUTOARGS0()
  578.   AUTOCALL_METHOD_CONV(TBool)
  579. }
  580.  
  581. bool GcadOleView::CreateRect(double x1, double y1, double x2, double y2) 
  582. {
  583.   AUTONAMES0("CreateRect")
  584.   AUTOARGS4(x1, y1, x2, y2)
  585.   AUTOCALL_METHOD_CONV(TBool)
  586. }
  587.  
  588. bool GcadOleView::CreateFill(long elemId) 
  589. {
  590.   AUTONAMES0("CreateFill")
  591.   AUTOARGS1(elemId)
  592.   AUTOCALL_METHOD_CONV(TBool)
  593. }
  594.  
  595. bool GcadOleView::CreateBmp(TAutoString dibPath, double x1, double y1, double x2, double y2, bool scale) 
  596. {
  597.   AUTONAMES0("CreateBmp")
  598.   AUTOARGS6(dibPath, x1, y1, x2, y2, TBool(scale))
  599.   AUTOCALL_METHOD_CONV(TBool)
  600. }
  601.  
  602. void GcadOleView::Undo() 
  603. {
  604.   AUTONAMES0("Undo")
  605.   AUTOARGS0()
  606.   AUTOCALL_METHOD_VOID
  607. }
  608.  
  609. long GcadOleView::CurrSelGetFirst() 
  610. {
  611.   AUTONAMES0("CurrSelGetFirst")
  612.   AUTOARGS0()
  613.   AUTOCALL_METHOD_RET
  614. }
  615.  
  616. long GcadOleView::CurrSelGetNext() 
  617. {
  618.   AUTONAMES0("CurrSelGetNext")
  619.   AUTOARGS0()
  620.   AUTOCALL_METHOD_RET
  621. }
  622.  
  623. long GcadOleView::DwgGetFirst() 
  624. {
  625.   AUTONAMES0("DwgGetFirst")
  626.   AUTOARGS0()
  627.   AUTOCALL_METHOD_RET
  628. }
  629.  
  630. long GcadOleView::DwgGetNext() 
  631. {
  632.   AUTONAMES0("DwgGetNext")
  633.   AUTOARGS0()
  634.   AUTOCALL_METHOD_RET
  635. }
  636.  
  637. void GcadOleView::SelectOne() 
  638. {
  639.   AUTONAMES0("SelectOne")
  640.   AUTOARGS0()
  641.   AUTOCALL_METHOD_VOID
  642. }
  643.  
  644. long GcadOleView::IsPgmSelDone() 
  645. {
  646.   AUTONAMES0("IsPgmSelDone")
  647.   AUTOARGS0()
  648.   AUTOCALL_METHOD_RET
  649. }
  650.  
  651. long GcadOleView::GetLastElem() 
  652. {
  653.   AUTONAMES0("GetLastElem")
  654.   AUTOARGS0()
  655.   AUTOCALL_METHOD_RET
  656. }
  657.  
  658. void GcadOleView::ClearPgmSel() 
  659. {
  660.   AUTONAMES0("ClearPgmSel")
  661.   AUTOARGS0()
  662.   AUTOCALL_METHOD_VOID
  663. }
  664.  
  665. void GcadOleView::ClearSel() 
  666. {
  667.   AUTONAMES0("ClearSel")
  668.   AUTOARGS0()
  669.   AUTOCALL_METHOD_VOID
  670. }
  671.  
  672. bool GcadOleView::AddToSel(long elemId) 
  673. {
  674.   AUTONAMES0("AddToSel")
  675.   AUTOARGS1(elemId)
  676.   AUTOCALL_METHOD_CONV(TBool)
  677. }
  678.  
  679. bool GcadOleView::RemoveFromSel(long elemId) 
  680. {
  681.   AUTONAMES0("RemoveFromSel")
  682.   AUTOARGS1(elemId)
  683.   AUTOCALL_METHOD_CONV(TBool)
  684. }
  685.  
  686. bool GcadOleView::DelSel() 
  687. {
  688.   AUTONAMES0("DelSel")
  689.   AUTOARGS0()
  690.   AUTOCALL_METHOD_CONV(TBool)
  691. }
  692.  
  693. bool GcadOleView::MoveSel(double x1, double y1, double x2, double y2) 
  694. {
  695.   AUTONAMES0("MoveSel")
  696.   AUTOARGS4(x1, y1, x2, y2)
  697.   AUTOCALL_METHOD_CONV(TBool)
  698. }
  699.  
  700. bool GcadOleView::CopySel(double x1, double y1, double x2, double y2) 
  701. {
  702.   AUTONAMES0("CopySel")
  703.   AUTOARGS4(x1, y1, x2, y2)
  704.   AUTOCALL_METHOD_CONV(TBool)
  705. }
  706.  
  707. bool GcadOleView::RotateSel(double x1, double y1, double ang) 
  708. {
  709.   AUTONAMES0("RotateSel")
  710.   AUTOARGS3(x1, y1, ang)
  711.   AUTOCALL_METHOD_CONV(TBool)
  712. }
  713.  
  714. bool GcadOleView::ScaleSel(double x1, double y1, double xscale, double yscale) 
  715. {
  716.   AUTONAMES0("ScaleSel")
  717.   AUTOARGS4(x1, y1, xscale, yscale)
  718.   AUTOCALL_METHOD_CONV(TBool)
  719. }
  720.  
  721. bool GcadOleView::MirrorSel(double x1, double y1, double x2, double y2, bool del) 
  722. {
  723.   AUTONAMES0("MirrorSel")
  724.   AUTOARGS5(x1, y1, x2, y2, TBool(del))
  725.   AUTOCALL_METHOD_CONV(TBool)
  726. }
  727.  
  728. bool GcadOleView::AdjustSel(double x1, double y1, double x2, double y2, double x3, double y3, double x4, double y4) 
  729. {
  730.   AUTONAMES0("AdjustSel")
  731.   AUTOARGS8(x1, y1, x2, y2, x3, y3, x4, y4)
  732.   AUTOCALL_METHOD_CONV(TBool)
  733. }
  734.  
  735. bool GcadOleView::ChangeLineColor(long color) 
  736. {
  737.   AUTONAMES0("ChangeLineColor")
  738.   AUTOARGS1(color)
  739.   AUTOCALL_METHOD_CONV(TBool)
  740. }
  741.  
  742. bool GcadOleView::ChangeLineType(long type) 
  743. {
  744.   AUTONAMES0("ChangeLineType")
  745.   AUTOARGS1(type)
  746.   AUTOCALL_METHOD_CONV(TBool)
  747. }
  748.  
  749. bool GcadOleView::ChangeLineWidth(double Width) 
  750. {
  751.   AUTONAMES0("ChangeLineWidth")
  752.   AUTOARGS1(Width)
  753.   AUTOCALL_METHOD_CONV(TBool)
  754. }
  755.  
  756. bool GcadOleView::ChangePointColor(long color) 
  757. {
  758.   AUTONAMES0("ChangePointColor")
  759.   AUTOARGS1(color)
  760.   AUTOCALL_METHOD_CONV(TBool)
  761. }
  762.  
  763. bool GcadOleView::ChangePointType(long type) 
  764. {
  765.   AUTONAMES0("ChangePointType")
  766.   AUTOARGS1(type)
  767.   AUTOCALL_METHOD_CONV(TBool)
  768. }
  769.  
  770. bool GcadOleView::ChangePointSize(double size) 
  771. {
  772.   AUTONAMES0("ChangePointSize")
  773.   AUTOARGS1(size)
  774.   AUTOCALL_METHOD_CONV(TBool)
  775. }
  776.  
  777. bool GcadOleView::ChangeTextFont(TAutoString FaceName, long weight, long color, long italic, long underline, long strikeOut) 
  778. {
  779.   AUTONAMES0("ChangeTextFont")
  780.   AUTOARGS6(FaceName, weight, color, italic, underline, strikeOut)
  781.   AUTOCALL_METHOD_CONV(TBool)
  782. }
  783.  
  784. bool GcadOleView::ChangeTextHgt(double hgt) 
  785. {
  786.   AUTONAMES0("ChangeTextHgt")
  787.   AUTOARGS1(hgt)
  788.   AUTOCALL_METHOD_CONV(TBool)
  789. }
  790.  
  791. bool GcadOleView::ChangeTextWidth(double Width) 
  792. {
  793.   AUTONAMES0("ChangeTextWidth")
  794.   AUTOARGS1(Width)
  795.   AUTOCALL_METHOD_CONV(TBool)
  796. }
  797.  
  798. bool GcadOleView::ChangeTextAngle(double angle) 
  799. {
  800.   AUTONAMES0("ChangeTextAngle")
  801.   AUTOARGS1(angle)
  802.   AUTOCALL_METHOD_CONV(TBool)
  803. }
  804.  
  805. bool GcadOleView::ChangeTextOrient(double orient) 
  806. {
  807.   AUTONAMES0("ChangeTextOrient")
  808.   AUTOARGS1(orient)
  809.   AUTOCALL_METHOD_CONV(TBool)
  810. }
  811.  
  812. bool GcadOleView::ChangeTextJust(long just) 
  813. {
  814.   AUTONAMES0("ChangeTextJust")
  815.   AUTOARGS1(just)
  816.   AUTOCALL_METHOD_CONV(TBool)
  817. }
  818.  
  819. bool GcadOleView::ChangeFillColor(long color) 
  820. {
  821.   AUTONAMES0("ChangeFillColor")
  822.   AUTOARGS1(color)
  823.   AUTOCALL_METHOD_CONV(TBool)
  824. }
  825.  
  826. bool GcadOleView::ChangeFillType(long type) 
  827. {
  828.   AUTONAMES0("ChangeFillType")
  829.   AUTOARGS1(type)
  830.   AUTOCALL_METHOD_CONV(TBool)
  831. }
  832.  
  833. bool GcadOleView::ChangeLayer(TAutoString layer) 
  834. {
  835.   AUTONAMES0("ChangeLayer")
  836.   AUTOARGS1(layer)
  837.   AUTOCALL_METHOD_CONV(TBool)
  838. }
  839.  
  840. bool GcadOleView::SetFilletParms(long type, double dist) 
  841. {
  842.   AUTONAMES0("SetFilletParms")
  843.   AUTOARGS2(type, dist)
  844.   AUTOCALL_METHOD_CONV(TBool)
  845. }
  846.  
  847. bool GcadOleView::Fillet(long elemId1, long elemId2, double x1, double y1, double x2, double y2) 
  848. {
  849.   AUTONAMES0("Fillet")
  850.   AUTOARGS6(elemId1, elemId2, x1, y1, x2, y2)
  851.   AUTOCALL_METHOD_CONV(TBool)
  852. }
  853.  
  854. bool GcadOleView::BreakEnd(long elemId, double x1, double y1, double x2, double y2) 
  855. {
  856.   AUTONAMES0("BreakEnd")
  857.   AUTOARGS5(elemId, x1, y1, x2, y2)
  858.   AUTOCALL_METHOD_CONV(TBool)
  859. }
  860.  
  861. bool GcadOleView::BreakMiddle(long elemId, double x1, double y1, double x2, double y2) 
  862. {
  863.   AUTONAMES0("BreakMiddle")
  864.   AUTOARGS5(elemId, x1, y1, x2, y2)
  865.   AUTOCALL_METHOD_CONV(TBool)
  866. }
  867.  
  868. bool GcadOleView::Extend(long elemBnd, long elemExt, double x1, double y1) 
  869. {
  870.   AUTONAMES0("Extend")
  871.   AUTOARGS4(elemBnd, elemExt, x1, y1)
  872.   AUTOCALL_METHOD_CONV(TBool)
  873. }
  874.  
  875. bool GcadOleView::Offset(long elem, double dist) 
  876. {
  877.   AUTONAMES0("Offset")
  878.   AUTOARGS2(elem, dist)
  879.   AUTOCALL_METHOD_CONV(TBool)
  880. }
  881.  
  882. bool GcadOleView::Explode(long elem) 
  883. {
  884.   AUTONAMES0("Explode")
  885.   AUTOARGS1(elem)
  886.   AUTOCALL_METHOD_CONV(TBool)
  887. }
  888.  
  889. bool GcadOleView::ChangeText(long elem, TAutoString text) 
  890. {
  891.   AUTONAMES0("ChangeText")
  892.   AUTOARGS2(elem, text)
  893.   AUTOCALL_METHOD_CONV(TBool)
  894. }
  895.  
  896. bool GcadOleView::OpenClosePline(long elem) 
  897. {
  898.   AUTONAMES0("OpenClosePline")
  899.   AUTOARGS1(elem)
  900.   AUTOCALL_METHOD_CONV(TBool)
  901. }
  902.  
  903. bool GcadOleView::RedefSym(TAutoString path) 
  904. {
  905.   AUTONAMES0("RedefSym")
  906.   AUTOARGS1(path)
  907.   AUTOCALL_METHOD_CONV(TBool)
  908. }
  909.  
  910. bool GcadOleView::CopyBmp(double x1, double y1, double x2, double y2) 
  911. {
  912.   AUTONAMES0("CopyBmp")
  913.   AUTOARGS4(x1, y1, x2, y2)
  914.   AUTOCALL_METHOD_CONV(TBool)
  915. }
  916.  
  917. bool GcadOleView::ZoomWin(double x1, double y1, double x2, double y2) 
  918. {
  919.   AUTONAMES0("ZoomWin")
  920.   AUTOARGS4(x1, y1, x2, y2)
  921.   AUTOCALL_METHOD_CONV(TBool)
  922. }
  923.  
  924. bool GcadOleView::ZoomExt() 
  925. {
  926.   AUTONAMES0("ZoomExt")
  927.   AUTOARGS0()
  928.   AUTOCALL_METHOD_CONV(TBool)
  929. }
  930.  
  931. bool GcadOleView::ZoomPrev() 
  932. {
  933.   AUTONAMES0("ZoomPrev")
  934.   AUTOARGS0()
  935.   AUTOCALL_METHOD_CONV(TBool)
  936. }
  937.  
  938. bool GcadOleView::ZoomFactor(double fact) 
  939. {
  940.   AUTONAMES0("ZoomFactor")
  941.   AUTOARGS1(fact)
  942.   AUTOCALL_METHOD_CONV(TBool)
  943. }
  944.  
  945. bool GcadOleView::ZoomPage() 
  946. {
  947.   AUTONAMES0("ZoomPage")
  948.   AUTOARGS0()
  949.   AUTOCALL_METHOD_CONV(TBool)
  950. }
  951.  
  952. bool GcadOleView::ZoomPageExt() 
  953. {
  954.   AUTONAMES0("ZoomPageExt")
  955.   AUTOARGS0()
  956.   AUTOCALL_METHOD_CONV(TBool)
  957. }
  958.  
  959. bool GcadOleView::Pan(double dx, double dy) 
  960. {
  961.   AUTONAMES0("Pan")
  962.   AUTOARGS2(dx, dy)
  963.   AUTOCALL_METHOD_CONV(TBool)
  964. }
  965.  
  966. bool GcadOleView::Redraw() 
  967. {
  968.   AUTONAMES0("Redraw")
  969.   AUTOARGS0()
  970.   AUTOCALL_METHOD_CONV(TBool)
  971. }
  972.  
  973. bool GcadOleView::SetLineColor(long color) 
  974. {
  975.   AUTONAMES0("SetLineColor")
  976.   AUTOARGS1(color)
  977.   AUTOCALL_METHOD_CONV(TBool)
  978. }
  979.  
  980. bool GcadOleView::SetLineType(long type) 
  981. {
  982.   AUTONAMES0("SetLineType")
  983.   AUTOARGS1(type)
  984.   AUTOCALL_METHOD_CONV(TBool)
  985. }
  986.  
  987. bool GcadOleView::SetLineWidth(double Width) 
  988. {
  989.   AUTONAMES0("SetLineWidth")
  990.   AUTOARGS1(Width)
  991.   AUTOCALL_METHOD_CONV(TBool)
  992. }
  993.  
  994. bool GcadOleView::SetTextFont(TAutoString FaceName, double Height, long weight, long color, long italic, long underline, long strikeOut) 
  995. {
  996.   AUTONAMES0("SetTextFont")
  997.   AUTOARGS7(FaceName, Height, weight, color, italic, underline, strikeOut)
  998.   AUTOCALL_METHOD_CONV(TBool)
  999. }
  1000.  
  1001. bool GcadOleView::SetTextHgt(double hgt) 
  1002. {
  1003.   AUTONAMES0("SetTextHgt")
  1004.   AUTOARGS1(hgt)
  1005.   AUTOCALL_METHOD_CONV(TBool)
  1006. }
  1007.  
  1008. bool GcadOleView::SetTextWidth(double Width) 
  1009. {
  1010.   AUTONAMES0("SetTextWidth")
  1011.   AUTOARGS1(Width)
  1012.   AUTOCALL_METHOD_CONV(TBool)
  1013. }
  1014.  
  1015. bool GcadOleView::SetTextAngle(double angle) 
  1016. {
  1017.   AUTONAMES0("SetTextAngle")
  1018.   AUTOARGS1(angle)
  1019.   AUTOCALL_METHOD_CONV(TBool)
  1020. }
  1021.  
  1022. bool GcadOleView::SetTextOrient(double orient) 
  1023. {
  1024.   AUTONAMES0("SetTextOrient")
  1025.   AUTOARGS1(orient)
  1026.   AUTOCALL_METHOD_CONV(TBool)
  1027. }
  1028.  
  1029. bool GcadOleView::SetTextJust(long just) 
  1030. {
  1031.   AUTONAMES0("SetTextJust")
  1032.   AUTOARGS1(just)
  1033.   AUTOCALL_METHOD_CONV(TBool)
  1034. }
  1035.  
  1036. bool GcadOleView::SetPointColor(long color) 
  1037. {
  1038.   AUTONAMES0("SetPointColor")
  1039.   AUTOARGS1(color)
  1040.   AUTOCALL_METHOD_CONV(TBool)
  1041. }
  1042.  
  1043. bool GcadOleView::SetPointType(long type) 
  1044. {
  1045.   AUTONAMES0("SetPointType")
  1046.   AUTOARGS1(type)
  1047.   AUTOCALL_METHOD_CONV(TBool)
  1048. }
  1049.  
  1050. bool GcadOleView::SetPointSize(double Width) 
  1051. {
  1052.   AUTONAMES0("SetPointSize")
  1053.   AUTOARGS1(Width)
  1054.   AUTOCALL_METHOD_CONV(TBool)
  1055. }
  1056.  
  1057. bool GcadOleView::SetFillColor(long color) 
  1058. {
  1059.   AUTONAMES0("SetFillColor")
  1060.   AUTOARGS1(color)
  1061.   AUTOCALL_METHOD_CONV(TBool)
  1062. }
  1063.  
  1064. bool GcadOleView::SetFillType(long type) 
  1065. {
  1066.   AUTONAMES0("SetFillType")
  1067.   AUTOARGS1(type)
  1068.   AUTOCALL_METHOD_CONV(TBool)
  1069. }
  1070.  
  1071. bool GcadOleView::SetDimArrowScale(double scale) 
  1072. {
  1073.   AUTONAMES0("SetDimArrowScale")
  1074.   AUTOARGS1(scale)
  1075.   AUTOCALL_METHOD_CONV(TBool)
  1076. }
  1077.  
  1078. bool GcadOleView::SetDimOffset(double Offset) 
  1079. {
  1080.   AUTONAMES0("SetDimOffset")
  1081.   AUTOARGS1(Offset)
  1082.   AUTOCALL_METHOD_CONV(TBool)
  1083. }
  1084.  
  1085. bool GcadOleView::AddLayer(TAutoString layer) 
  1086. {
  1087.   AUTONAMES0("AddLayer")
  1088.   AUTOARGS1(layer)
  1089.   AUTOCALL_METHOD_CONV(TBool)
  1090. }
  1091.  
  1092. bool GcadOleView::SetLayerLock(TAutoString layer, bool lock) 
  1093. {
  1094.   AUTONAMES0("SetLayerLock")
  1095.   AUTOARGS2(layer, TBool(lock))
  1096.   AUTOCALL_METHOD_CONV(TBool)
  1097. }
  1098.  
  1099. bool GcadOleView::SetLayerPrint(TAutoString layer, bool print) 
  1100. {
  1101.   AUTONAMES0("SetLayerPrint")
  1102.   AUTOARGS2(layer, TBool(print))
  1103.   AUTOCALL_METHOD_CONV(TBool)
  1104. }
  1105.  
  1106. bool GcadOleView::SetLayerOn(TAutoString layer, bool on) 
  1107. {
  1108.   AUTONAMES0("SetLayerOn")
  1109.   AUTOARGS2(layer, TBool(on))
  1110.   AUTOCALL_METHOD_CONV(TBool)
  1111. }
  1112.  
  1113. bool GcadOleView::RenameLayer(TAutoString oldName, TAutoString newName) 
  1114. {
  1115.   AUTONAMES0("RenameLayer")
  1116.   AUTOARGS2(oldName, newName)
  1117.   AUTOCALL_METHOD_CONV(TBool)
  1118. }
  1119.  
  1120. bool GcadOleView::SetCurrentLayer(TAutoString layer) 
  1121. {
  1122.   AUTONAMES0("SetCurrentLayer")
  1123.   AUTOARGS1(layer)
  1124.   AUTOCALL_METHOD_CONV(TBool)
  1125. }
  1126.  
  1127. bool GcadOleView::SetBasePt(double X, double Y) 
  1128. {
  1129.   AUTONAMES0("SetBasePt")
  1130.   AUTOARGS2(X, Y)
  1131.   AUTOCALL_METHOD_CONV(TBool)
  1132. }
  1133.  
  1134. bool GcadOleView::SetGridParms(double dx, double dy, double xo, double yo, long disp) 
  1135. {
  1136.   AUTONAMES0("SetGridParms")
  1137.   AUTOARGS5(dx, dy, xo, yo, disp)
  1138.   AUTOCALL_METHOD_CONV(TBool)
  1139. }
  1140.  
  1141. bool GcadOleView::SetNumFmt(long type, long ndec, long denom, long cdec) 
  1142. {
  1143.   AUTONAMES0("SetNumFmt")
  1144.   AUTOARGS4(type, ndec, denom, cdec)
  1145.   AUTOCALL_METHOD_CONV(TBool)
  1146. }
  1147.  
  1148. bool GcadOleView::SetDispPage(bool disp) 
  1149. {
  1150.   AUTONAMES0("SetDispPage")
  1151.   AUTOARGS1(TBool(disp))
  1152.   AUTOCALL_METHOD_CONV(TBool)
  1153. }
  1154.  
  1155. bool GcadOleView::SetDispDxf(bool disp) 
  1156. {
  1157.   AUTONAMES0("SetDispDxf")
  1158.   AUTOARGS1(TBool(disp))
  1159.   AUTOCALL_METHOD_CONV(TBool)
  1160. }
  1161.  
  1162. bool GcadOleView::SetSnapMode(long mode) 
  1163. {
  1164.   AUTONAMES0("SetSnapMode")
  1165.   AUTOARGS1(mode)
  1166.   AUTOCALL_METHOD_CONV(TBool)
  1167. }
  1168.  
  1169. void GcadOleView::GetExtents(double far* xmin, double far* ymin, double far* xmax, double far* ymax) 
  1170. {
  1171.   AUTONAMES0("GetExtents")
  1172.   AUTOARGS4(xmin, ymin, xmax, ymax)
  1173.   AUTOCALL_METHOD_VOID
  1174. }
  1175.  
  1176. void GcadOleView::GetPoint() 
  1177. {
  1178.   AUTONAMES0("GetPoint")
  1179.   AUTOARGS0()
  1180.   AUTOCALL_METHOD_VOID
  1181. }
  1182.  
  1183. long GcadOleView::IsPointSelDone(double far* X, double far* Y) 
  1184. {
  1185.   AUTONAMES0("IsPointSelDone")
  1186.   AUTOARGS2(X, Y)
  1187.   AUTOCALL_METHOD_RET
  1188. }
  1189.  
  1190. void GcadOleView::SetPrompt(TAutoString text) 
  1191. {
  1192.   AUTONAMES0("SetPrompt")
  1193.   AUTOARGS1(text)
  1194.   AUTOCALL_METHOD_VOID
  1195. }
  1196.  
  1197. long GcadOleView::GetElemType(long elemId) 
  1198. {
  1199.   AUTONAMES0("GetElemType")
  1200.   AUTOARGS1(elemId)
  1201.   AUTOCALL_METHOD_RET
  1202. }
  1203.  
  1204. void GcadOleView::GetLineElem(LineElem& obj, long elemId) 
  1205. {
  1206.   AUTONAMES0("GetLineElem")
  1207.   AUTOARGS1(elemId)
  1208.   AUTOCALL_METHOD_REF(obj)
  1209. }
  1210.  
  1211. void GcadOleView::GetArcElem(ArcElem& obj, long elemId) 
  1212. {
  1213.   AUTONAMES0("GetArcElem")
  1214.   AUTOARGS1(elemId)
  1215.   AUTOCALL_METHOD_REF(obj)
  1216. }
  1217.  
  1218. void GcadOleView::GetCircleElem(CircleElem& obj, long elemId) 
  1219. {
  1220.   AUTONAMES0("GetCircleElem")
  1221.   AUTOARGS1(elemId)
  1222.   AUTOCALL_METHOD_REF(obj)
  1223. }
  1224.  
  1225. void GcadOleView::GetPointElem(PointElem& obj, long elemId) 
  1226. {
  1227.   AUTONAMES0("GetPointElem")
  1228.   AUTOARGS1(elemId)
  1229.   AUTOCALL_METHOD_REF(obj)
  1230. }
  1231.  
  1232. void GcadOleView::GetTextElem(TextElem& obj, long elemId) 
  1233. {
  1234.   AUTONAMES0("GetTextElem")
  1235.   AUTOARGS1(elemId)
  1236.   AUTOCALL_METHOD_REF(obj)
  1237. }
  1238.  
  1239. void GcadOleView::GetPlineElem(PlineElem& obj, long elemId) 
  1240. {
  1241.   AUTONAMES0("GetPlineElem")
  1242.   AUTOARGS1(elemId)
  1243.   AUTOCALL_METHOD_REF(obj)
  1244. }
  1245.  
  1246. void GcadOleView::GetInsertElem(InsertElem& obj, long elemId) 
  1247. {
  1248.   AUTONAMES0("GetInsertElem")
  1249.   AUTOARGS1(elemId)
  1250.   AUTOCALL_METHOD_REF(obj)
  1251. }
  1252.  
  1253. void GcadOleView::GetFillElem(FillElem& obj, long elemId) 
  1254. {
  1255.   AUTONAMES0("GetFillElem")
  1256.   AUTOARGS1(elemId)
  1257.   AUTOCALL_METHOD_REF(obj)
  1258. }
  1259.  
  1260. void GcadOleView::GetBmpElem(BmpElem& obj, long elemId) 
  1261. {
  1262.   AUTONAMES0("GetBmpElem")
  1263.   AUTOARGS1(elemId)
  1264.   AUTOCALL_METHOD_REF(obj)
  1265. }
  1266.  
  1267. void GcadOleView::GetApplication(TGcadApp& obj) 
  1268. {
  1269.   AUTONAMES0("Application")
  1270.   AUTOARGS0()
  1271.   AUTOCALL_PROP_REF(obj)
  1272. }
  1273.  
  1274.