home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'AHMTSystemDetails.pas' rev: 3.00
-
- #ifndef AHMTSystemDetailsHPP
- #define AHMTSystemDetailsHPP
- #include <AHMSystem.hpp>
- #include <Classes.hpp>
- #include <Windows.hpp>
- #include <SysUtils.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Ahmtsystemdetails
- {
- //-- type declarations -------------------------------------------------------
- class DELPHICLASS TAHMSystemDetails;
- class PASCALIMPLEMENTATION TAHMSystemDetails : public Ahmsystem::TAHMSystemsComponent
- {
- typedef Ahmsystem::TAHMSystemsComponent inherited;
-
- private:
- System::AnsiString FOrganisation;
- System::AnsiString FOwner;
- System::AnsiString FPrgDir;
- System::AnsiString FSystemRoot;
- System::AnsiString FCPU;
- System::AnsiString FSH;
- System::AnsiString FSW;
- System::AnsiString FOperatingSystem;
- System::AnsiString FWinVersion;
- System::AnsiString FBuild;
- System::AnsiString FTotalMemory;
- System::AnsiString FDriveC;
- System::AnsiString funame;
- System::AnsiString fcname;
- void __fastcall SetSelfString(System::AnsiString Value);
- System::AnsiString __fastcall GetUName(void);
- System::AnsiString __fastcall GetCName(void);
-
- public:
- __fastcall virtual TAHMSystemDetails(Classes::TComponent* AOwner);
-
- __published:
- __property System::AnsiString Organisation = {read=FOrganisation, write=SetSelfString, stored=false
- };
- __property System::AnsiString Owner = {read=FOwner, write=SetSelfString, stored=false};
- __property System::AnsiString CPU = {read=FCPU, write=SetSelfString, stored=false};
- __property System::AnsiString OS = {read=FOperatingSystem, write=SetSelfString, stored=false};
- __property System::AnsiString WinVersion = {read=FWinVersion, write=SetSelfString, stored=false};
- __property System::AnsiString Build = {read=FBuild, write=SetSelfString, stored=false};
- __property System::AnsiString TotalMemory = {read=FTotalMemory, write=SetSelfString, stored=false};
-
- __property System::AnsiString DriveC = {read=FDriveC, write=SetSelfString, stored=false};
- __property System::AnsiString ProgramFilesDir = {read=FPrgDir, write=SetSelfString, stored=false};
- __property System::AnsiString SystemRoot = {read=FSystemRoot, write=SetSelfString, stored=false};
- __property System::AnsiString Username = {read=GetUName, write=SetSelfString, stored=false};
- __property System::AnsiString ComputerName = {read=GetCName, write=SetSelfString, stored=false};
- __property System::AnsiString ScreenWidth = {read=FSW, write=SetSelfString, stored=false};
- __property System::AnsiString ScreenHeight = {read=FSH, write=SetSelfString, stored=false};
- public:
- /* TComponent.Destroy */ __fastcall virtual ~TAHMSystemDetails(void) { }
-
- };
-
- //-- var, const, procedure ---------------------------------------------------
-
- } /* namespace Ahmtsystemdetails */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Ahmtsystemdetails;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // AHMTSystemDetails
-