home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 May / Pcwk5b98.iso / Borland / Cplus45 / BC45 / STEP16.PAK / STEP16.CXX < prev    next >
C/C++ Source or Header  |  1995-08-29  |  2KB  |  120 lines
  1. #include "step16.HXX"
  2.  
  3. // TKIND_DISPATCH: TDrawDoc 1.0 {EB141FA2-8B8A-101B-A23B-CE4E85D07ED2}\409 Draw document class
  4.  
  5. short TDrawDoc::GetPenSize()     
  6. {
  7.   AUTONAMES0("PenSize")
  8.   AUTOARGS0()
  9.   AUTOCALL_PROP_GET
  10. }
  11.  
  12. void TDrawDoc::SetPenSize(short val) 
  13. {
  14.   AUTONAMES0("PenSize")
  15.   AUTOARGS0()
  16.   AUTOCALL_PROP_SET(val)
  17. }
  18.  
  19. long TDrawDoc::GetPenColor()     
  20. {
  21.   AUTONAMES0("PenColor")
  22.   AUTOARGS0()
  23.   AUTOCALL_PROP_GET
  24. }
  25.  
  26. void TDrawDoc::SetPenColor(long val) 
  27. {
  28.   AUTONAMES0("PenColor")
  29.   AUTOARGS0()
  30.   AUTOCALL_PROP_SET(val)
  31. }
  32.  
  33. void TDrawDoc::AddPoint(short X, short Y) 
  34. {
  35.   AUTONAMES0("AddPoint")
  36.   AUTOARGS2(X, Y)
  37.   AUTOCALL_METHOD_VOID
  38. }
  39.  
  40. void TDrawDoc::AddLine() 
  41. {
  42.   AUTONAMES0("AddLine")
  43.   AUTOARGS0()
  44.   AUTOCALL_METHOD_VOID
  45. }
  46.  
  47. void TDrawDoc::ClearLine() 
  48. {
  49.   AUTONAMES0("ClearLine")
  50.   AUTOARGS0()
  51.   AUTOCALL_METHOD_VOID
  52. }
  53.  
  54. void TDrawDoc::GetApplication(TDrawApp& obj) 
  55. {
  56.   AUTONAMES0("Application")
  57.   AUTOARGS0()
  58.   AUTOCALL_PROP_REF(obj)
  59. }
  60.  
  61.  
  62. // TKIND_DISPATCH: TDrawApp 1.0 {EB141FA3-8B8A-101B-A23B-CE4E85D07ED2}\409 Application class
  63.  
  64. bool TDrawApp::GetVisible()     
  65. {
  66.   AUTONAMES0("Visible")
  67.   AUTOARGS0()
  68.   AUTOCALL_PROP_CONV(TAutoBool)
  69. }
  70.  
  71. void TDrawApp::SetVisible(bool val) 
  72. {
  73.   AUTONAMES0("Visible")
  74.   AUTOARGS0()
  75.   AUTOCALL_PROP_SET(TAutoBool(val))
  76. }
  77.  
  78. void TDrawApp::NewDocument(TDrawDoc& obj) 
  79. {
  80.   AUTONAMES0("NewDocument")
  81.   AUTOARGS0()
  82.   AUTOCALL_METHOD_REF(obj)
  83. }
  84.  
  85. void TDrawApp::OpenDocument(TDrawDoc& obj, TAutoString Name) 
  86. {
  87.   AUTONAMES0("OpenDocument")
  88.   AUTOARGS1(Name)
  89.   AUTOCALL_METHOD_REF(obj)
  90. }
  91.  
  92. TAutoString TDrawApp::GetName() 
  93. {
  94.   AUTONAMES0("Name")
  95.   AUTOARGS0()
  96.   AUTOCALL_PROP_GET
  97. }
  98.  
  99. TAutoString TDrawApp::GetFullName() 
  100. {
  101.   AUTONAMES0("FullName")
  102.   AUTOARGS0()
  103.   AUTOCALL_PROP_GET
  104. }
  105.  
  106. void TDrawApp::GetApplication(TDrawApp& obj) 
  107. {
  108.   AUTONAMES0("Application")
  109.   AUTOARGS0()
  110.   AUTOCALL_PROP_REF(obj)
  111. }
  112.  
  113. void TDrawApp::Quit() 
  114. {
  115.   AUTONAMES0("Quit")
  116.   AUTOARGS0()
  117.   AUTOCALL_METHOD_VOID
  118. }
  119.  
  120.