home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 March / Chip_1998-03_cd.bin / zkuste / matemat / Vyssi / MATH1.ZIP / cppbuild / Dcommon.hpp next >
Encoding:
C/C++ Source or Header  |  1997-05-31  |  3.1 KB  |  74 lines
  1. //----------------------------------------------------------------------------
  2. // DCommon.hpp - bcbdcc32 generated hdr (DO NOT EDIT) rev: 0
  3. // From: DCommon.pas
  4. //----------------------------------------------------------------------------
  5. #ifndef DCommonHPP
  6. #define DCommonHPP
  7. //----------------------------------------------------------------------------
  8. #include <SysUtils.hpp>
  9. #include <System.hpp>
  10. namespace Dcommon
  11. {
  12. //-- type declarations -------------------------------------------------------
  13. typedef void __fastcall (*FeedBackProcType)(long StateCnt);
  14.  
  15. class __declspec(delphiclass) ELoCompError;
  16. class __declspec(pascalimplementation) ELoCompError : public Sysutils::Exception
  17. {
  18.     typedef Sysutils::Exception inherited;
  19.     
  20. public:
  21.     /* Exception.Create */ __fastcall ELoCompError(const System::AnsiString Msg) : Sysutils::Exception(
  22.         Msg) { }
  23.     /* Exception.CreateFmt */ __fastcall ELoCompError(const System::AnsiString Msg, const System::TVarRec 
  24.         * Args, const int Args_Size) : Sysutils::Exception(Msg, Args, Args_Size) { }
  25.     /* Exception.CreateRes */ __fastcall ELoCompError(int Ident) : Sysutils::Exception(Ident) { }
  26.     /* Exception.CreateResFmt */ __fastcall ELoCompError(int Ident, const System::TVarRec * Args, const 
  27.         int Args_Size) : Sysutils::Exception(Ident, Args, Args_Size) { }
  28.     /* Exception.CreateHelp */ __fastcall ELoCompError(const System::AnsiString Msg, int AHelpContext) : 
  29.         Sysutils::Exception(Msg, AHelpContext) { }
  30.     /* Exception.CreateFmtHelp */ __fastcall ELoCompError(const System::AnsiString Msg, const System::TVarRec 
  31.         * Args, const int Args_Size, int AHelpContext) : Sysutils::Exception(Msg, Args, Args_Size, AHelpContext
  32.         ) { }
  33.     /* Exception.CreateResHelp */ __fastcall ELoCompError(int Ident, int AHelpContext) : Sysutils::Exception(
  34.         Ident, AHelpContext) { }
  35.     /* Exception.CreateResFmtHelp */ __fastcall ELoCompError(int Ident, const System::TVarRec * Args, const 
  36.         int Args_Size, int AHelpContext) : Sysutils::Exception(Ident, Args, Args_Size, AHelpContext) { }
  37.     
  38. public:
  39.     /* TObject.Destroy */ __fastcall virtual ~ELoCompError(void) { }
  40.     
  41. };
  42.  
  43. //-- var, const, procedure ---------------------------------------------------
  44. extern Extended e;
  45. extern Extended etom1;
  46. extern Extended lg2;
  47. extern Extended lg5;
  48. extern Extended lge;
  49. extern Extended lgPi;
  50. extern Extended ln10;
  51. extern Extended ln2;
  52. extern Extended lnPi;
  53. extern Extended PiH;
  54. extern Extended PiSqr;
  55. extern Extended Pitom1;
  56. extern Extended sqrt2;
  57. extern Extended GoldenR;
  58. extern Extended MaxReal;
  59. extern Extended MaxSingle;
  60. extern Extended MaxDouble;
  61. extern Extended MaxExtended;
  62. extern void __fastcall ExChange(void *p0, void *p1, Word p2);
  63. extern System::AnsiString __fastcall MakeTimeStr(Word p0, Word p1, Word p2, Word p3, Byte p4);
  64. extern System::AnsiString __fastcall SpecStrf(double p0, int p1, int p2);
  65. extern void __fastcall CalcScalePars(int p0, double p1, double p2, double &p3, double &p4, Word &p5)
  66.     ;
  67.  
  68. }    /* namespace Dcommon */
  69. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  70. using namespace Dcommon;
  71. #endif
  72. //-- end unit ----------------------------------------------------------------
  73. #endif    // DCommon
  74.