home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 September / Chip_2001-09_cd1.bin / zkuste / delphi / kolekce / d12345 / MISC.ZIP / Misc.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  2001-05-09  |  4.7 KB  |  147 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'Misc.pas' rev: 3.00
  6.  
  7. #ifndef MiscHPP
  8. #define MiscHPP
  9. #include <ShellAPI.hpp>
  10. #include <Graphics.hpp>
  11. #include <Forms.hpp>
  12. #include <Dialogs.hpp>
  13. #include <Controls.hpp>
  14. #include <Clipbrd.hpp>
  15. #include <Windows.hpp>
  16. #include <NoMath.hpp>
  17. #include <TypInfo.hpp>
  18. #include <SysUtils.hpp>
  19. #include <Classes.hpp>
  20. #include <SysInit.hpp>
  21. #include <System.hpp>
  22.  
  23. //-- user supplied -----------------------------------------------------------
  24.  
  25. namespace Misc
  26. {
  27. //-- type declarations -------------------------------------------------------
  28. typedef float *pSingle;
  29.  
  30. typedef double *pDouble;
  31.  
  32. typedef int TIntegerArray[536870911];
  33.  
  34. typedef float TSingleArray[536870911];
  35.  
  36. typedef double TDoubleArray[268435455];
  37.  
  38. typedef TIntegerArray *pIntegerArray;
  39.  
  40. typedef TSingleArray *pSingleArray;
  41.  
  42. typedef TDoubleArray *pDoubleArray;
  43.  
  44. typedef Shortint TPercent;
  45.  
  46. struct TXYPoint
  47. {
  48.     float X;
  49.     float Y;
  50. } ;
  51.  
  52. typedef TXYPoint *pXYPoint;
  53.  
  54. typedef TXYPoint TXYArray[268435455];
  55.  
  56. typedef TXYArray *pXYArray;
  57.  
  58. struct TIdentMapEntry
  59. {
  60.     Graphics::TColor Value;
  61.     System::AnsiString Name;
  62. } ;
  63.  
  64. typedef tagRGBTRIPLE TRGBArray[20001];
  65.  
  66. typedef TRGBArray *pRGBArray;
  67.  
  68. struct TRainbowColor
  69. {
  70.     int R;
  71.     int G;
  72.     int B;
  73. } ;
  74.  
  75. class DELPHICLASS TFileList;
  76. class PASCALIMPLEMENTATION TFileList : public Classes::TStringList 
  77. {
  78.     typedef Classes::TStringList inherited;
  79.     
  80. public:
  81.     virtual void __fastcall AppendToFile(const System::AnsiString FileName);
  82. public:
  83.     /* TStringList.Destroy */ __fastcall virtual ~TFileList(void) { }
  84.     
  85. public:
  86.     /* TObject.Create */ __fastcall TFileList(void) : Classes::TStringList() { }
  87.     
  88. };
  89.  
  90. class DELPHICLASS TMemoryStreamEx;
  91. class PASCALIMPLEMENTATION TMemoryStreamEx : public Classes::TMemoryStream 
  92. {
  93.     typedef Classes::TMemoryStream inherited;
  94.     
  95. public:
  96.     virtual void __fastcall AppendToFile(const System::AnsiString FileName);
  97. public:
  98.     /* TMemoryStream.Destroy */ __fastcall virtual ~TMemoryStreamEx(void) { }
  99.     
  100. public:
  101.     /* TObject.Create */ __fastcall TMemoryStreamEx(void) : Classes::TMemoryStream() { }
  102.     
  103. };
  104.  
  105. //-- var, const, procedure ---------------------------------------------------
  106. #define TWO_PI  (6.283185E+00)
  107. #define CRLF "\x02\r\n\x03\x06E╛"
  108. #define MY_COLORS_MAX (Byte)(15)
  109. extern PACKAGE Graphics::TColor MyColorValues[16];
  110. #define MAX_RAINBOW_COLORS (Byte)(5)
  111. extern PACKAGE int RainbowColors[6][3];
  112. extern PACKAGE int __fastcall GetLineLengthFromStream(Classes::TMemoryStream* AStream);
  113. extern PACKAGE System::AnsiString __fastcall ReadLine(Classes::TMemoryStream* AStream);
  114. extern PACKAGE bool __fastcall FindStringInStream(System::AnsiString TheString, Classes::TMemoryStream* 
  115.     AStream);
  116. extern PACKAGE System::AnsiString __fastcall CleanString(System::AnsiString AString, char TheChar);
  117. extern PACKAGE System::AnsiString __fastcall StrRev(System::AnsiString TheStr);
  118. extern PACKAGE void __fastcall DeSci(Extended ExtNumber, Extended &Mantissa, int &Exponent);
  119. extern PACKAGE System::AnsiString __fastcall GetWord(System::AnsiString &This_Line, System::AnsiString 
  120.     Delimiter);
  121. extern PACKAGE int __fastcall IndexOfColorValue(Graphics::TColor Value);
  122. extern PACKAGE int __fastcall IndexOfColorName(System::AnsiString Name);
  123. extern PACKAGE Graphics::TColor __fastcall GetPalerColor(Graphics::TColor Value, int Brightness);
  124. extern PACKAGE Graphics::TColor __fastcall GetDarkerColor(Graphics::TColor Value, int Brightness);
  125. extern PACKAGE Graphics::TColor __fastcall GetInverseColor(Graphics::TColor Value);
  126. extern PACKAGE Graphics::TColor __fastcall Rainbow(float Fraction);
  127. extern PACKAGE bool __fastcall InputColor(Graphics::TColor &AColor);
  128. extern PACKAGE void __fastcall SetDialogGeometry(Forms::TForm* AForm, Controls::TControl* AButton, int 
  129.     BorderWidth);
  130. extern PACKAGE int __fastcall BinToInt(System::AnsiString Value);
  131. extern PACKAGE System::AnsiString __fastcall IntToBin(int Value);
  132. extern PACKAGE bool __fastcall IsInteger(System::AnsiString Value);
  133. extern PACKAGE bool __fastcall IsFixed(System::AnsiString Value);
  134. extern PACKAGE bool __fastcall IsReal(System::AnsiString Value);
  135. extern PACKAGE void __fastcall TextOutAnglePersist(Graphics::TCanvas* ACanvas, int Angle, int Left, 
  136.     int Top, System::AnsiString TheText);
  137. extern PACKAGE void __fastcall TextOutAngle(Graphics::TCanvas* ACanvas, int Angle, int Left, int Top
  138.     , System::AnsiString TheText);
  139. extern PACKAGE void __fastcall ShellExec(System::AnsiString Cmd);
  140.  
  141. }    /* namespace Misc */
  142. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  143. using namespace Misc;
  144. #endif
  145. //-- end unit ----------------------------------------------------------------
  146. #endif    // Misc
  147.