Class TSkCompDate (unit SkCompDate)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);



Functions

destructor Destroy;


Function GetDateStr : String;


Function GetTimeStr : String;

OldDir := GetCurrentDir; {$I SkCompDate.

Procedure WriteFile;


Properties

property About : TAbout


property CompDate : String


property CompTime : String


Events

Variables

DayW : Word;


FAbout : TAbout;


FCompDate : TDateTime;


FCompTime : TDateTime;


FCurDir : String;


FTheDate : String;


FTheTime : String;


HourW : Word;


MinuteW : Word;


MonthW : Word;


SecondW : Word;


YearW : Word;



Constructors


constructor Create(AOwner: TComponent);


Functions


destructor Destroy;


Function GetDateStr : String;


Function GetTimeStr : String;

OldDir := GetCurrentDir; {$I SkCompDate.inc


Procedure WriteFile;


Properties


property About : TAbout


property CompDate : String


property CompTime : String


Events


Variables


DayW : Word;


FAbout : TAbout;


FCompDate : TDateTime;


FCompTime : TDateTime;


FCurDir : String;


FTheDate : String;


FTheTime : String;


HourW : Word;


MinuteW : Word;


MonthW : Word;


SecondW : Word;


YearW : Word;