www.pudn.com > otsms > Timers.hpp

// Borland C++ Builder 
// Copyright (c) 1995, 1999 by Borland International 
// All rights reserved 
 
// (DO NOT EDIT: machine generated header) 'Timers.pas' rev: 5.00 
 
#ifndef TimersHPP 
#define TimersHPP 
 
#pragma delphiheader begin 
#pragma option push -w- 
#pragma option push -Vx 
#include 	// Pascal unit 
#include 	// Pascal unit 
 
//-- user supplied ----------------------------------------------------------- 
 
namespace Timers 
{ 
//-- type declarations ------------------------------------------------------- 
struct TmmTimer 
{ 
	int StartTicks; 
	int ExpireTicks; 
} ; 
 
//-- var, const, procedure --------------------------------------------------- 
static const int MaxTicks = 0x253c825; 
static const Word TicksFreq = 0x68b; 
static const Shortint SecsFreq = 0x5c; 
extern PACKAGE int __fastcall Secs2Ticks(int Secs); 
extern PACKAGE int __fastcall MSecs2Ticks(int MSecs); 
extern PACKAGE void __fastcall NewTimer(TmmTimer &Tm, int Ticks); 
extern PACKAGE void __fastcall NewTimerSecs(TmmTimer &Tm, int Secs); 
extern PACKAGE bool __fastcall TimerExpired(const TmmTimer &Tm); 
extern PACKAGE void __fastcall Pause(int mSec); 
extern PACKAGE void __fastcall Pause2(int mSec); 
 
}	/* namespace Timers */ 
#if !defined(NO_IMPLICIT_NAMESPACE_USE) 
using namespace Timers; 
#endif 
#pragma option pop	// -w- 
#pragma option pop	// -Vx 
 
#pragma delphiheader end. 
//-- end unit ---------------------------------------------------------------- 
#endif	// Timers