[ 元号選択式日付時刻入力コンポーネント ] [ 元号，年月日のセット ]

Delphi Programming / Object Pascal

[掲載 2003年07月20日] [更新 2005年09月20日]　元号選択式日付時刻入力コンポーネント

元号選択式日付時刻入力コンポーネント元号年月日等の個別セット
動作確認等	-

入力コントロールに個別に値をセットする方法

入力コントロールに個別に値をセットする方法

元号や年，月，日に，値を外部からセットするには，リストの様に，各コントロールへのアクセス用のプロパティを使用します．日付としてのセットは Date プロパティが使用できます．

リスト1
元号の文字列や年，月，日の値を個別セットする方法

     plDateEdit1.GengoCombo.ItemIndex : =-1;   //元号を空白にする
     plDateEdit1.GengoCombo.ItemIndex := 0;    //西暦をセット
     plDateEdit1.GengoCombo.ItemIndex := 1;    //平成をセット
     plDateEdit1.GengoCombo.ItemIndex := 2;    //昭和をセット

     plDateEdit1.YearEdit.Text  := '2000'; //2000年
     plDateEdit1.MonthEdit.Text := '10';   //10月
     plDateEdit1.DayEdit.Text   := '20';   //20日

リスト2
今日の日付をセットして，日部分だけ空白にする

     plDateEdit1.DateTime      := Now; //今日の日付
     plDateEdit1.DayEdit.Text  := '';  //日部分を空白に