Class TWinUtil (unit WinUtil)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);



Functions

procedure CopyFile( source, dest : string);


destructor Destroy;


function GetCompanyName: string;

GetUserName

function GetEnvironvar(const VariableName: string): string;


function GetUserName : string;

now, we are ready to copy the file

function GetWindir: string;

GetEnviron} { get the windows dir

procedure Reboot;


procedure Restart;

GetWindir

procedure ShutDown;


procedure SleepFor(AInterval: LongInt);


procedure Expire(Sender: TObject);


function GetInterval: LongInt;


procedure SetInterval(AInterval: LongInt);


procedure Sleep;


Properties

property Interval : LongInt


Events

Variables

Expired : Boolean;


FTimer : TTimer;



Constructors


constructor Create(AOwner: TComponent);


Functions


procedure CopyFile( source, dest : string);


destructor Destroy;


function GetCompanyName: string;

GetUserName


function GetEnvironvar(const VariableName: string): string;


function GetUserName : string;

now, we are ready to copy the file


function GetWindir: string;

GetEnviron} { get the windows dir


procedure Reboot;


procedure Restart;

GetWindir


procedure ShutDown;


procedure SleepFor(AInterval: LongInt);


procedure Expire(Sender: TObject);


function GetInterval: LongInt;


procedure SetInterval(AInterval: LongInt);


procedure Sleep;


Properties


property Interval : LongInt


Events


Variables


Expired : Boolean;


FTimer : TTimer;