Difference between revisions of "TCalendarDialog/zh CN"

From Free Pascal wiki
Jump to navigationJump to search
(Created page with "{{TCalendarDialog}} '''TCalendarDialog''' Image:tcalendardialog.png 就是能帮你选择日期的一个控件而已. 在 Dialogs tabComponent Palette. im...")
 
Line 10: Line 10:
 
== 样例 ==
 
== 样例 ==
  
# From the menu choose Project/New Project…
+
# 菜单中选择 工程/新建工程…
# Place a TCalendarDialog widget [[image:tcalendardialog.png]] on your [[TForm|form]]. <br /> It can be placed anywhere as it is not visible during program [[runtime|run time]] but only during design time. <br \> [[Image:Component_Palette_Dialogs.png]] <br \> It is located on the [[Dialogs tab]] of the [[Component Palette|component palette]] <br />
+
# 添加 TCalendarDialog 控件 [[image:tcalendardialog.png]] [[TForm|窗体]]. <br /> 位置随意,因为此控件为不显示控件 [[runtime|run time]] 仅编辑状态可见. <br \> [[Image:Component_Palette_Dialogs.png]] <br \> [[Dialogs tab]] [[Component Palette|component palette]] <br />
 
# Add a [[TButton|button]] [[Image:tbutton.png]] in the form.
 
# Add a [[TButton|button]] [[Image:tbutton.png]] in the form.
 
# The [[IDE_Window:_Object_Inspector|Object Inspector]] will display the properties of the object Button1. Click on the Events tab on the Object Inspector. Select the box to the right of OnClick: a smaller box with three dots (... ellipsis) appears. Click on this, you are taken automatically into the Source Editor and your cursor will be placed in a piece of code starting.
 
# The [[IDE_Window:_Object_Inspector|Object Inspector]] will display the properties of the object Button1. Click on the Events tab on the Object Inspector. Select the box to the right of OnClick: a smaller box with three dots (... ellipsis) appears. Click on this, you are taken automatically into the Source Editor and your cursor will be placed in a piece of code starting.
Line 37: Line 37:
 
end;
 
end;
 
</syntaxhighlight>
 
</syntaxhighlight>
 
  
 
== See also ==
 
== See also ==

Revision as of 11:53, 3 May 2020

English (en) suomi (fi) français (fr) русский (ru) 中文(中国大陆)‎ (zh_CN)

TCalendarDialog tcalendardialog.png 就是能帮你选择日期的一个控件而已. 在 Dialogs tabComponent Palette.

component-TCalendarDialog.png

Execute 方法 来显示对话框. 选择日期后返回 true , 未选择就返回false .


样例

  1. 菜单中选择 工程/新建工程…
  2. 添加 TCalendarDialog 控件 tcalendardialog.png窗体.
    位置随意,因为此控件为不显示控件 run time 仅编辑状态可见.
    Component Palette Dialogs.png
    Dialogs tabcomponent palette
  3. Add a button tbutton.png in the form.
  4. The Object Inspector will display the properties of the object Button1. Click on the Events tab on the Object Inspector. Select the box to the right of OnClick: a smaller box with three dots (... ellipsis) appears. Click on this, you are taken automatically into the Source Editor and your cursor will be placed in a piece of code starting.
  5. Completion code:


procedure TForm1.Button1Click(Sender: TObject);
var
    dt:tdatetime;
    calendarSettings:TDisplaySettings;
begin
  dt:= now;
  CalendarDialog1.Date := dt;
  calendarSettings:= [dsShowWeekNumbers,dsStartMonday];
  CalendarDialog1.Title:='Select a date';
  CalendarDialog1.DisplaySettings:= calendarSettings;
  if CalendarDialog1.Execute then
    begin
      dt:= CalendarDialog1.Date;
      ShowMessage( 'The selected date is '+FormatDateTime( 'yyyy-mm-dd',dt ));
    end
  else
    ShowMessage( 'Today is '+FormatDateTime( 'yyyy-mm-dd',dt ));
end;

See also


LCL Components
Component Tab Components
Standard TMainMenu • TPopupMenu • TButton • TLabel • TEdit • TMemo • TToggleBox • TCheckBox • TRadioButton • TListBox • TComboBox • TScrollBar • TGroupBox • TRadioGroup • TCheckGroup • TPanel • TFrame • TActionList
Additional TBitBtn • TSpeedButton • TStaticText • TImage • TShape • TBevel • TPaintBox • TNotebook • TLabeledEdit • TSplitter • TTrayIcon • TControlBar • TFlowPanel • TMaskEdit • TCheckListBox • TScrollBox • TApplicationProperties • TStringGrid • TDrawGrid • TPairSplitter • TColorBox • TColorListBox • TValueListEditor
Common Controls TTrackBar • TProgressBar • TTreeView • TListView • TStatusBar • TToolBar • TCoolBar • TUpDown • TPageControl • TTabControl • THeaderControl • TImageList • TPopupNotifier • TDateTimePicker
Dialogs TOpenDialog • TSaveDialog • TSelectDirectoryDialog • TColorDialog • TFontDialog • TFindDialog • TReplaceDialog • TTaskDialog • TOpenPictureDialog • TSavePictureDialog • TCalendarDialog • TCalculatorDialog • TPrinterSetupDialog • TPrintDialog • TPageSetupDialog
Data Controls TDBNavigator • TDBText • TDBEdit • TDBMemo • TDBImage • TDBListBox • TDBLookupListBox • TDBComboBox • TDBLookupComboBox • TDBCheckBox • TDBRadioGroup • TDBCalendar • TDBGroupBox • TDBGrid • TDBDateTimePicker
Data Access TDataSource • TCSVDataSet • TSdfDataSet • TBufDataset • TFixedFormatDataSet • TDbf • TMemDataset
System TTimer • TIdleTimer • TLazComponentQueue • THTMLHelpDatabase • THTMLBrowserHelpViewer • TAsyncProcess • TProcessUTF8 • TProcess • TSimpleIPCClient • TSimpleIPCServer • TXMLConfig • TEventLog • TServiceManager • TCHMHelpDatabase • TLHelpConnector
Misc TColorButton • TSpinEdit • TFloatSpinEdit • TArrow • TCalendar • TEditButton • TFileNameEdit • TDirectoryEdit • TDateEdit • TTimeEdit • TCalcEdit • TFileListBox • TFilterComboBox • TComboBoxEx • TCheckComboBox • TButtonPanel • TShellTreeView • TShellListView • TXMLPropStorage • TINIPropStorage • TJSONPropStorage • TIDEDialogLayoutStorage • TMRUManager • TStrHolder
LazControls TCheckBoxThemed • TDividerBevel • TExtendedNotebook • TListFilterEdit • TListViewFilterEdit • TLvlGraphControl • TShortPathEdit • TSpinEditEx • TFloatSpinEditEx • TTreeFilterEdit • TExtendedTabControl •
RTTI TTIEdit • TTIComboBox • TTIButton • TTICheckBox • TTILabel • TTIGroupBox • TTIRadioGroup • TTICheckGroup • TTICheckListBox • TTIListBox • TTIMemo • TTICalendar • TTIImage • TTIFloatSpinEdit • TTISpinEdit • TTITrackBar • TTIProgressBar • TTIMaskEdit • TTIColorButton • TMultiPropertyLink • TTIPropertyGrid • TTIGrid
SQLdb TSQLQuery • TSQLTransaction • TSQLScript • TSQLConnector • TMSSQLConnection • TSybaseConnection • TPQConnection • TPQTEventMonitor • TOracleConnection • TODBCConnection • TMySQL40Connection • TMySQL41Connection • TMySQL50Connection • TMySQL51Connection • TMySQL55Connection • TMySQL56Connection • TMySQL57Connection • TSQLite3Connection • TIBConnection • TFBAdmin • TFBEventMonitor • TSQLDBLibraryLoader
Pascal Script TPSScript • TPSScriptDebugger • TPSDllPlugin • TPSImport_Classes • TPSImport_DateUtils • TPSImport_ComObj • TPSImport_DB • TPSImport_Forms • TPSImport_Controls • TPSImport_StdCtrls • TPSCustomPlugin
SynEdit TSynEdit • TSynCompletion • TSynAutoComplete • TSynMacroRecorder • TSynExporterHTML • TSynPluginSyncroEdit • TSynPasSyn • TSynFreePascalSyn • TSynCppSyn • TSynJavaSyn • TSynPerlSyn • TSynHTMLSyn • TSynXMLSyn • TSynLFMSyn • TSynDiffSyn • TSynUNIXShellScriptSyn • TSynCssSyn • TSynPHPSyn • TSynTeXSyn • TSynSQLSyn • TSynPythonSyn • TSynVBSyn • TSynAnySyn • TSynMultiSyn • TSynBatSyn • TSynIniSyn • TSynPoSyn
Chart TChart • TListChartSource • TRandomChartSource • TUserDefinedChartSource • TCalculatedChartSource • TDbChartSource • TChartToolset • TChartAxisTransformations • TChartStyles • TChartLegendPanel • TChartNavScrollBar • TChartNavPanel • TIntervalChartSource • TDateTimeIntervalChartSource • TChartListBox • TChartExtentLink • TChartImageList
IPro TIpFileDataProvider • TIpHtmlDataProvider • TIpHttpDataProvider • TIpHtmlPanel
Virtual Controls TVirtualDrawTree • TVirtualStringTree • TVTHeaderPopupMenu