秋·风

  博客园 :: 首页 :: 新随笔 :: 联系 :: 订阅 :: 管理 ::
上一页 1 ··· 13 14 15 16 17 18 19 20 21 ··· 35 下一页

2024年7月12日

摘要: 近日使用时发现lazreport自带调用fr3的功能,按下面的方法调用就可以:1、uses 添加fr3tolrf2、form添加frreport3、使用LoadFastReport3调用fr3文件 LoadFastReport3(frReport控件名称,fr3格式的文件,返回相应信息); 注意:不 阅读全文
posted @ 2024-07-12 09:22 秋·风 阅读(292) 评论(0) 推荐(0)

2024年6月5日

摘要: 直接上代码: procedure TForm1.Button1Click(Sender: TObject); var s: string; function StringContainsChinese(const str: Widestring): boolean; var i: integer; 阅读全文
posted @ 2024-06-05 06:28 秋·风 阅读(294) 评论(4) 推荐(0)

2024年6月4日

摘要: 和网友(不好意思,忘了是那位了)交流中,他反馈BufDataSet多列排序时得到的结果不符合预期,他也给出修复方法,以下是他的验证及修复方法:环境:fpc 3.3.1问题复现步骤: SQLQuery1.IndexFieldNames:='cl;c2 DESC';这个应该是c1列升序,c2列降序,但是 阅读全文
posted @ 2024-06-04 10:18 秋·风 阅读(116) 评论(0) 推荐(0)

2024年6月3日

摘要: lazarus/fpc自带的bufDataSet和MemDataSet缺少类似TClientDataSet的Delta功能,这个单元从TDataSet扩展了Delta,可以直接生成增删改的SQL,适用于所有TDataSet。 2024-10-25 高勇高老板增强了GetActionSQL功能: fu 阅读全文
posted @ 2024-06-03 11:51 秋·风 阅读(854) 评论(2) 推荐(0)

2024年6月1日

摘要: 最近使用bufdataset时发现可以创建ftVariant类型,但无法正常读写。经搜索,发现fpc官方早在2011年就有解决方案,但到今天最新的fpc3.3.1还没支持,按issues的方法,经测试读写ok,如果你也需要在bufDataSet要用到ftVariant,可以参考以下方法:打开fpcs 阅读全文
posted @ 2024-06-01 19:55 秋·风 阅读(122) 评论(0) 推荐(0)

2024年5月30日

摘要: 新版本fastreport(2024)的架构大调整后,原来的方法已不能使用了,新的设置步骤为:1、将 TfrLocalizationController 组件放置form上( frLocalizationLibrary.lpk 包); 2、在TfrLocalizationController 语言属 阅读全文
posted @ 2024-05-30 14:06 秋·风 阅读(2007) 评论(3) 推荐(1)

2024年5月12日

摘要: 在pcplayer的版本基础上移植到lazarus,并可以跨平台使用。lazarus版的特点:1、根据显示内容调整Toast的宽度和高度,防止显示内容不完整。2、增加提示的显示位置,默认顶居中显示。3、提示可以选择字体2024-05-20:修复指定字体的Bug TToastMessage.Toast 阅读全文
posted @ 2024-05-12 06:38 秋·风 阅读(349) 评论(4) 推荐(1)

2024年5月10日

摘要: 控件设计或其他用途时,可能需判断当前是否在IDE环境:在uses添加LazIDEIntf var IsRunningInIDE: Boolean; begin IsRunningInIDE := (csDesigning in ComponentState) or Assigned(LazarusI 阅读全文
posted @ 2024-05-10 10:58 秋·风 阅读(196) 评论(0) 推荐(0)

2024年5月7日

摘要: 一、问题:当使用到以下对话框时,按键默认显示为英文: 二、有2个解决方法1、第一个方法:使用lazarus自带实现本地化显示,使用方法详见:Translations / i18n / localizations for programs/zh CN - Free Pascal wiki如果要将控件或 阅读全文
posted @ 2024-05-07 08:46 秋·风 阅读(530) 评论(0) 推荐(1)

摘要: 一、问题:lazarus编译以下代码时出错: function GetCPUID(Leaf, Subleaf: Integer): TCPUID; begin asm {$IF Defined(cpu386)} push ebx push edi mov edi, ecx mov ecx, edx 阅读全文
posted @ 2024-05-07 08:20 秋·风 阅读(259) 评论(0) 推荐(0)

上一页 1 ··· 13 14 15 16 17 18 19 20 21 ··· 35 下一页