Question

delphi adoquery控件用 insert into 语句时间类型的字段为什么报错？

程序段如下
var aa:Tdatetime;
begin
label2.Caption:=datetimetostr(date);
if memo1.Text='' then
begin
showmessage('请输入通知内容');
exit;
end
else
begin
aa:=strtodatetime(label2.Caption);
adqtongzhi.SQL.Clear ;
adqtongzhi.SQL.Add('insert into 通知管理(通知内容,发布时间,通知部门) value('''+memo1.Text+''','''+aa+''','''+form1.Labbumen.Caption+''')');
end;
end;
aa定义为时间类型，运行时报错：[错误] neibutongzhi.pas(48): Incompatible types: 'String' and 'TDateTime' 想不通是为什么
数据库里字段发布时间是时间类型！

Answer 1

首先 编译器提示错误的意思为他们俩的类型不兼容
给你分析下原因 因为你 aa为Tdatetime 类型
而 label2.Caption 为String 类型，所以才会报这样的错

所以你定义的时候需要改动了
我帮你改下
aa:String

就可以了

Answer 2

adqtongzhi.SQL.Add('insert into 通知管理(通知内容,发布时间,通知部门) value('''+memo1.Text+''','''+datetimetostr(aa)+''','''+form1.Labbumen.Caption+''')');

Answer 3

adoquery1.SQL.Add('insert into test (num,tdate,name) values ('+#39+memo1.Text+#39+','+datetimetostr(aa)+','+#39+form1.label1.Caption+#39+')');

Answer 4

时间类型可以用字串插入呀