[Overview][Types][Classes][Procedures and functions][Index] | Reference for unit 'TimePopup' (#lcl)

# TTimePopupForm

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Implements a form displayed to capture a time value.

## Declaration

Source position: timepopup.pas line 31

`type TTimePopupForm = class(TForm)`
`Bevel1: TBevel;`
`ButtonPanel1: TButtonPanel;`
`MainPanel: TPanel;`
`HoursGrid: TStringGrid;`
`MinutesGrid: TStringGrid;`
`MoreLessBtn: TBitBtn;`
`procedure CancelButtonClick();` |  | Implements the OnClick handler for the Cancel button.
`procedure GridsDblClick();` |  | Implements the OnDblClick event handler for grids controls on the form.
`procedure GridsKeyDown();` |  | Implements the OnKeyDown event handler for grid controls on the form.
`procedure GridPrepareCanvas();` |  | Sets the canvas text style for a grid on the form.
`procedure HoursGridSelectCell();` |  | Implements the OnSelectCell event handler for the hours grid on the form.
`procedure MoreLessBtnClick();` |  | Implements the OnClick event handler for the MoreLessBtn button on the form.
`procedure OKButtonClick();` |  | Implements the OnClick event handler for the OK button.
`published`
`procedure FormClose();` |  | Performs actions needed when the form is closed.
`procedure FormCreate();` |  | Performs actions needed when the form instance is created.
`procedure FormDeactivate();` |  | Performs action needed when the form is deactivated.
`end;`

## Inheritance

`TTimePopupForm` |  | Implements a form displayed to capture a time value.
`TForm` |  | Implements a form used in an LCL application.
`TCustomForm` |  | The base type for TForm classes.
`TCustomDesignControl` |  | Provides a designer surface for scaling and layout of its child controls.
`TScrollingWinControl` |  | Implements a windowed control with scroll bars.
`TCustomControl` |  | The base class for windowed controls which paint themselves.
`TWinControl` |  | Implements a windowed control which can contain other child controls.
`TControl` |  | The base class for visible controls.
`TLCLComponent` |  | The base class for LCL components which have an associated widget.
`TComponent`
?
`TObject`

## Description

TTimePopupForm implements a form displayed to capture and return a time value.

The form contains grids with Hour and Minute values which can be selected to form the time value. The Minutes displayed in the grid are in either 5 minute or 30 minute intervals, depending on the layout selected using the SetLayout method; Simple layout uses a 5 minute interval and is the default layout for the form.

It uses an internal TReturnTimeEvent handler to validate or update the time value. There are also internal members used to track the control associated with the form, and the coordinates where the form is displayed. These internals are assigned using values passed as arguments to the ShowTimePopup routine.

## See also

ShowTimePopup |  | Creates, initializes, and displays a TTimePopupForm instance.
TReturnTimeEvent |  | Specifies an event handler signalled to get a time return value.
TTimeEdit |  | Implements a control used to edit time values.