1、将August 等英文的月份替换成对应的数字月份,并将逗号“,”删除
2、使用正则表达式进行匹配,取匹配部分进行组合成需要的日期即可
或者
将你的电脑设置成英文区域,并将日期格式设置成英文,可以使用这种形式直接获取
procedure testDate;
var
myDateTime : TDateTime;
fmt:TFormatSettings;
begin
fmtShortDateFormat:='mmmm dd yyyy';
myDateTime := StrToDateTime('August 16 2010 15:00');
Writeln('August 16, 2010 15:00 = ',DateTimeToStr(myDateTime));
end;
datetimepicker1 是个控件名,当然不行了,那里应该是个字符串拼接。
换成这样的
ADOQuery1SQLAdd('select from xiaoshou where 日期 = '''+FormatDatetime('yyyy-mm-dd',datetimepicker1DateTime)+'''');
注意单引号是delphi中字符串的标示符,注意字符串拼接问题
这里是将datetimepicker1取得的日期转换为字符串然后拼接
以上就是关于关于在delphi中时间日期的转换问题,高手进全部的内容,包括:关于在delphi中时间日期的转换问题,高手进、Delphi 输入日期查询、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)