mysql数据库,有unsigned int字段,用做存储32位ip地址对应的整数值问题是delphi的TIntegerField是有符号32位整数,表中255.255.255.255对应的整数值应为2的32次方减1,结果读过来就是-1,请问大家有什么高招,
解决方案 »
- 请教Fastreport如何打印TEECHART图表,非数据库
- 老菜鸟求助
- 在DELPHI中如何运行一个SQL文件中的内容
- quickreport预览没有内容
- 请问缺少TdxEdit, TdxDBGrid控件,应该怎么办?在线等待!
- 请问哪有delphi开发组件的电子书?或是书店有这样的书?
- 在程序中无何派断本地机是否装了OFFICE中的word,并且如何获得它的路径(.exe的完全路径,我要调用这个程序)
- 你知不知道如何把ole 里的内容保存到剪贴板中
- 各位大侠,请进来讨论关于B/S模式的套打(标准格式打印)问题。
- 在memo中如何取得当前光标的行和列
- 线程执行完后如何再次执行?在线等待,急
- 请教一个多线程编程问题
StrToInt;
然后计算就行了
Longword()
Cardinal()
数据库中有一个UNSIGEND 32 位整数
ADOQuery中生成的对应的字段为TIntegerField类型,是有符号整数下行程序想将字段更新为4294967295ADOQuery.Fieldbyname('a').asInteger:=4294967295;其实写进数据库时是-1,继续求助
procedure TForm1.Button2Click(Sender: TObject);
begin
Edit1.Text := ADODataSet1.FieldByName('test').Value;
end;procedure TForm1.Button3Click(Sender: TObject);
var
i64: int64;
p:^int64;
begin
i64 := strtoint64(edit1.Text);
new(p);
try
p^ := i64;
with ADODataSet1 do
begin
Edit;
FieldByName('test').SetData(p);
UpdateRecord;
Post;
end;
finally
dispose(p);
end;
end;