var
PickerService: IFMXPickerService;
begin
if PlatformServices.Current.SupportsPlatformService(
IFMXPickerService, Interface(PickerService))
then
FDateTimePicker := PickerService.CreateDateTimePicker;
... // or
FListPicker := PickerService.CreateListPicker;
2条答案
按热度按时间ovfsdjhp1#
要访问日历,您可以使用
Calendar
类,它在 Delphi 中由JCalendar
类表示。您可以找到一组样本here
这是一个 Delphi 的例子
velaa5lx2#
在XE5中,他们从PlatformServices开始,并将Pickers Service放入其中:http://docwiki.embarcadero.com/Libraries/XE5/en/FMX.Pickers.IFMXPickerService
这段代码可能对你有用: