vartodatetime(vardatefromstr)使用哪种日期格式?

肯 VarToDateTime 函数内部调用 VarDateFromStr 函数wich使用 VAR_LOCALE_USER_DEFAULT 设置日期格式的常量。

要确定wich格式,请包含 变量区域设置用户默认值 您可以使用此代码

var
 FormatSettings      : TFormatSettings;
begin
      GetLocaleFormatSettings(VAR_LOCALE_USER_DEFAULT, formatSettings);
      ShowMessage('VarToDateTime is using this format to convert dates  '+formatSettings.ShortDateFormat);
end;

现在,为了避免出现问题,可以使用strTodateTime函数将变量值转换为字符串,然后转换为datetime。

var
v                   : variant;
FormatSettings      : TFormatSettings;
Begin
      v:='05-11-2010';//this is your variant.
      FormatSettings.ShortDateFormat:='dd-mm-yyyy';//use this format in the conversion
      ShowMessage(FormatDateTime('dd-MM-yyyy', StrToDateTime(V,FormatSettings)));
end;