delphi 没有默认值
query3.SQL.Clear;
query3.SQL.Add('select * from user_info where 发送状态=0 and 可用天数 <>0 and 可用天数 <='+query2.fieldbyname('电量下限天数').AsString);
query3.Open;
query3.first;
while not query3.Eof do
begin
query4.Close;
query4.SQL.Clear;
query4.SQL.Add('insert into sms_send (company,type,content,desttermid) values (''7999'',''chat'','''+a+e+b+f+c+''','''+trim(query3.fieldbyname('电话号码').AsString)+''') ');
query4.ExecSQL;
query5.Close;
query5.SQL.Clear;
query5.SQL.Add('update sms_send set 发送状态='''+query2.fieldbyname('电量下限天数').AsString+''' where 用户编号='+query3.fieldbyname('用户编号').AsString);
query5.ExecSQL;
query3.next;
end;
说发送状态没默认值 我晕 什么意思啊 ?
query2.fieldbyname('电量下限天数').AsString 这个结果为空吧
你弄个临时变量,把这个值赋给临时变量,看有没有字符
看看字段名称是不是写错了
select * from 电量下限设置表 where 电量下限天数 <'+''''+strtofloat(query2.fieldbyname('电量下限天数').AsString)+''' order by 电量下限天数 desc 恩 谢谢
相关问答:
procedure RunFunction;
type
TFunc = function(A: Integer): Integer;stdcall; //这里根据DLL里面函数的声明修改
var
......
procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 个字节的长整形指针
begin
P:=PLongint(A);// 取的 A 的 ......
VC++ 中, &变量名。 是什么意思。 Delphi中 和他一样的符号 是哪个、?
大家都认为,C语言之所以强大,以及其自由性,很大部分体现在其灵活的指针运用上。因此,说指针是C语言的灵魂,一点都不为过。同时, ......
请问Delphi有树形控件吗?
怎样使用?
Ttreeview
treeview.items.addchild(nil(上级节点),'案发时发'(text));
raize 控件包里面有,csdn有下载的
查帮助TTreeView和TNode两个类
TTreeView ......