| Class TTCEdit (unit TCEdit) |
TEdit
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure BadTime;
procedure BuildHMSF;
procedure DblClick;
procedure DoEnter;
procedure DoExit;
procedure GetFrames(NewValue : byte);
procedure GetHours(NewValue : byte);
procedure GetMilisecs(NewValue : integer);
procedure GetMins(NewValue : byte);
procedure GetSecs(NewValue : byte);
procedure KeyPress(var Key: Char);
function MiliToTC(TCTime: integer) : string;
function TCToMili(TimeString: string) : Integer;| Properties |
property DblClickClr : boolean
property DoFrames : boolean
property FrameRate : byte
property Frames : byte
property Hours : byte
property MaxHours : byte
property MaxMins : byte
property MaxSecs : byte
property Milisecs : integer
property Mins : byte
property Offset : boolean
property Secs : byte
property Text : | Events |
| Variables |
FDblClickClr : boolean;
FDoFrames : boolean;
FFrameRate : byte;
FFrames : byte;
FHours : byte;
FMaxHours : byte;
FMaxMins : byte;
FMaxSecs : byte;
FMilisecs : integer;
FMins : byte;
FOffset : boolean;
FSecs : byte;| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure BadTime;Return miliseconds of timecode string
procedure BuildHMSF;
procedure DblClick;This will optionally auto clear the timecode if the user double clicks it
procedure DoEnter;When user enters TCEdit, make sure we're in H,M,S fields
procedure DoExit;Validates TC box and updates Milisecs
procedure GetFrames(NewValue : byte);
procedure GetHours(NewValue : byte);Coverts it to a formatted string
procedure GetMilisecs(NewValue : integer);
procedure GetMins(NewValue : byte);
procedure GetSecs(NewValue : byte);
procedure KeyPress(var Key: Char);Validate each keypress, and format text in edit box...
function MiliToTC(TCTime: integer) : string;Converts a time in miliseconds into a formatted timecode string This is messy, yet somehow I can't work out any simpler way!
function TCToMili(TimeString: string) : Integer;Converts a formatted timecode string into milisecs integer
| Properties |
property DblClickClr : boolean
property DoFrames : boolean
property FrameRate : byte
property Frames : byte
property Hours : byte
property MaxHours : byte
property MaxMins : byte
property MaxSecs : byte
property Milisecs : integer
property Mins : byte
property Offset : boolean
property Secs : byte
property Text : | Events |
| Variables |
FDblClickClr : boolean;
FDoFrames : boolean;
FFrameRate : byte;
FFrames : byte;
FHours : byte;
FMaxHours : byte;
FMaxMins : byte;
FMaxSecs : byte;
FMilisecs : integer;
FMins : byte;
FOffset : boolean;
FSecs : byte;