标签:函数 操作 字符 var text 行数据 art roc procedure
procedure THRForm.Button1Click(Sender: TObject); var D:TDateTime; s:string; begin D:=VarToDateTime(‘05-10-14 04:35PM‘); S:=FormatDatetime(‘YYYY-MM-DD HH:MM:SS‘,D); showmessage(s); end;
尤其是在进行数据库语句操作时,对于字符串的来源不确定因素太多,有了该函数用起来真的很方便。举例如下:
FQuery.Parameters.ParamValues[‘Brithday‘] := IfThen(edit1.Text= ‘‘, VarToStr(Null), VarToDateTime(edit1.Text));
标签:函数 操作 字符 var text 行数据 art roc procedure
原文地址:https://www.cnblogs.com/mobilecard/p/9475369.html