| | | | | |

2023年12月21日

摘要： https://docwiki.embarcadero.com/Libraries/Sydney/en/System.StrUtils.IfThen function IfThen(AValue: Boolean; const ATrue: string; AFalse: string = ''): 阅读全文

posted @ 2023-12-21 15:42 涂磊阅读(168) 评论(0) 推荐(0) 编辑

2023年12月19日

uniGUI学习之禁用缓存(75)

摘要：引用了第三方js,css等文件，但是因为缓存的原因，修改后没有及时生效。方法一：在ServerModule的OnHTTPCommand事件中，加入以下代码 AResponseInfo.CacheControl := 'max-age=0, no-cache, no-store, must-reva 阅读全文

posted @ 2023-12-19 21:16 涂磊阅读(167) 评论(0) 推荐(0) 编辑

uniGUI学习之自定义Hint(74)

摘要： Dellphi10.3菜单项的 hint 默认Hint样式 procedure TMainForm.UniFormShow(Sender: TObject); var i: Integer; begin for i := 0 to Self.ControlCount - 1 do begin wit 阅读全文

posted @ 2023-12-19 20:57 涂磊阅读(88) 评论(0) 推荐(0) 编辑

2023年12月15日

(16)FastReport 预览设置

摘要： https://www.cnblogs.com/txgh/p/17641518.html FastReport 预览设置属性和方法 TfrxPreviewOptions.AllowEdit property AllowEdit: Boolean; 启用或禁用已完成的报表编辑。默认值为 True。阅读全文

posted @ 2023-12-15 19:53 涂磊阅读(552) 评论(0) 推荐(0) 编辑

(15)直接在Form上预览

摘要：拖一个 frxPreview1到界面上 procedure TForm13.FormCreate(Sender: TObject); begin //frxReport1.ShowReport();// frxReport1.Preview := frxPreview1; frxReport1.Pr 阅读全文

posted @ 2023-12-15 17:24 涂磊阅读(37) 评论(0) 推荐(0) 编辑