[Delphi]日付に変換 VarToDateTime

※全てのDelphiで動作する保証はありません。また、内容に関し管理人は全ての責任を負いかねます

サンプル ※説明に必要な部分しか記述していません

フォーム上に MonthCalendar1: TMonthCalendar; があると仮定すると、Button1のクリック時にMonthCalendar1 の日付が2016/3/4 を指します。ちなみにSysUtils.StrToDateも同じ結果となります。 

procedure TForm1.Button1Click(Sender: TObject);

//uses句に Variants が必須です

begin
    MonthCalendar1.Date := Variants.VarToDateTime('2016/3/4');

//同じ結果です
//    MonthCalendar1.Date := SysUtils.StrToDate('2016/3/4');

//★別途参考
//VarFromDateTime関数は TDateTime型→バリアント型 に変換します
//    MonthCalendar1.Date := Variants.VarFromDateTime(Date);

end;

下記はヘルプからの引用です

VarToDateTime 関数は,指定されたバリアントを TDateTime 値に変換します。変換が失敗すると,VarToDateTime は例外を生成します。

 

Delphi関連 – amazon