秋·风

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::
  277 随笔 :: 0 文章 :: 308 评论 :: 19万 阅读
< 2025年3月 >
23 24 25 26 27 28 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 1 2 3 4 5
lazarus 生成的程序在linux arm64(银河麒麟和raspberry)使用unidac控件(数据库postgresql),采用以下代码保存日期字段时,提示“无效UTF8的编码字节顺序 ”,百思不解这奇怪的问题,后来发现DateTimeToStr转换出现的日期格式和windows的不一样。
procedure TForm1.Button2Click(Sender: TObject);
begin
  UniQuery1.Edit;
  UniQuery1.FieldByName('prdate').AsDateTime:=now;
  UniQuery1.Post;
end;

post时提示出错:

  Linux下默认的日期格式:

 尝试将lazarus的日期格式改为与windows的一样:

复制代码
var fs:TFormatSettings;
begin
  fs.DateSeparator:='-';
  fs.TimeSeparator:=':';
  fs.ShortDateFormat:='yyyy-mm-dd';
  fs.LongDateFormat:='yyyy-mm-dd';
  fs.LongTimeFormat:='hh:NN:ss';
  fs.ShortTimeFormat:='hh:NN:ss';
  DefaultFormatSettings:=fs;
end; 
//2022-04-28发现使用以上方法在windows下float字段会只显示整数的Bug
复制代码
  //使用以下方法设置后日期、float在windows、linux都正常 2022.04.28
DefaultFormatSettings.ShortTimeFormat:='yyyy-mm-dd'; DefaultFormatSettings.ShortTimeFormat:='hh:NN:ss'; DefaultFormatSettings.LongDateFormat:='yyyy-mm-dd'; DefaultFormatSettings.LongTimeFormat:='hh:NN:ss'; DefaultFormatSettings.DateSeparator:='-'; DefaultFormatSettings.TimeSeparator:=':';

 

改变日期格式后,unidac 日期字段保存也正常了,说明我遇到的问题是日期格式引起的,如你使用过程也遇到同样问题可偿试使用这个方法说不定能解决。 
还有另一种解决方法就是采用SQL Update,也能正常更新日期字段:

  UniQuery1.SQL.Text:='update power set prdate='+chr(39)+lrdatetimetostr(now)+chr(39)+' where username=''1''';
  UniQuery1.ExecSQL;

 

posted on   秋·风  阅读(318)  评论(0编辑  收藏  举报
相关博文:
阅读排行:
· 被坑几百块钱后,我竟然真的恢复了删除的微信聊天记录!
· 【自荐】一款简洁、开源的在线白板工具 Drawnix
· 没有Manus邀请码?试试免邀请码的MGX或者开源的OpenManus吧
· 园子的第一款AI主题卫衣上架——"HELLO! HOW CAN I ASSIST YOU TODAY
· 无需6万激活码!GitHub神秘组织3小时极速复刻Manus,手把手教你使用OpenManus搭建本
点击右上角即可分享
微信分享提示