- 博客(387)
- 资源 (9)
- 收藏
- 关注
RSS订阅原创 Delphi Xe 10.3 钉钉SDK开发——审批流接口（获取表单ProcessCode）
Log.Debug(dk.GetProcessCode('ERP客户订单'),'debug');dk.Getappsecret := '你企业钉钉的Appsecret';dk.Getappid := '你企业钉钉的APPID';二、接口获取：今天的重点，不说了，直接上代码。ProcessCode后面就是了！中年大叔学Delphi。
2024-04-16 21:17:05
448
原创 Delphi TDictionary字典类
ws2.range['E' + inttostr(k) + ':K' + inttostr(k)].value := VarArrayOf([temparr[0],temparr[5], temparr[1], temparr[2], '新刀具区', 0, temparr[4]]);上面的代码,把字典里的K,V用"@"符号拼接了起来,塞进一个TStringList类里.字典不可以排序,但是TStringList可以啊,只是在使用里,需要SPLIT一下元素才行。Add：向字典中添加一个键和其对应的值。
2024-04-07 06:36:38
821
原创 delphi 设置win10 dpi 缩放规则
假设现在有一个软件界面（宽为950像素，高为700像素），该软件在24寸、分辨率为1900*1400的显示器上显示正常，但放到高dpi显示器（同样是24寸，但分辨率为3800*2800）上显示效果会如何？比如一个32寸的显示，但分辨率只有1920*1440，而一个24寸的显示器，分辨率却达到3840*2160，很明显后面这个显示器的每英寸的像素点的个数多，显示的画面更加细腻。同样，在系统dpi缩放改变时，系统也不会将软件进行缩放拉伸，但软件会收到WM_DPICHAN。所以：高分辨率不等于高dpi。
2024-04-04 06:08:00
322
原创 delphi windows 程序DPI缩放设置
win10，win7系统里 程序经常变形，很可能是 windows 缩放比例大于100%，设置windows缩放比例比较麻烦，可以通过注册表设置程序的DPI缩放比例。
2024-04-04 06:06:38
183
原创 TMS FlexCel VCL & FMX v7.8学习汇总
https://www.cnblogs.com/txgh/category/2172481.html?page=105]ApiMateRadStudio.exe上传xls,自动生成pacsal代码04]FlexCel之预览Excel03]FlexCel将DBGrid1导出为Excel02]FlexCel的Demo和帮助CHM01]TMS FlexCel VCL & FMX v7.8的下载和安装
2024-04-01 07:16:14
186
原创 uniGUI之主窗口折叠UI之UniTreeMenu(32-2)
目前发现菜单太多时右侧不能自动出现垂直滚动条，即太多的子菜单将超出屏幕范围，鼠标滚轮不能翻动菜单项，不太方便。在UniTreeMenu的clientEvents属性里的UniEvents里，左侧顶部选择Ext.list.Tree,然后在treeMenu.afterCreate里面添加代码如下，即可解决，效果还不错。[info]和[search],[home],[download],[trash],[refresh],[reply],[star],[user]有用，不是所有的都会显示出来。
2024-04-01 07:14:11
623
原创 delphi android打开pdf
另外，如果您需要更强大的PDF编辑和显示功能，可以考虑使用其他第三方组件，如SynPDF或VCL for PDF。在Delphi开发的Android应用程序中打开PDF文件，您可以使用第三方组件，如TeePDF、SynPDF或VCL for PDF等。另外，如果您希望在Android设备上直接打开PDF文件，而不需要在应用程序中显示，可以使用Intent来启动系统的PDF查看器。在这个示例中，我们创建一个Intent来启动系统的PDF查看器，并传递PDF文件的路径。首先，您需要下载并安装TeePDF组件。
2024-03-01 09:25:29
167
原创 Delphi在App中打开Android文件
这一句搞出来的 URI 会导致异常。这里对于文件的描述，是一个 URI，因此，理论上，是一个网络文件，比如 http://xxx.xxx.xx/abc.mp4 也是能打开的。最近要播放 MP4，再次把这段代码拿来测试了一下。不过根据我的经验，如果你的手机安装了多个播放器，这时候系统会问你用哪个播放器。有了这几行代码，任何安卓系统支持的文件，都可以打开。
2024-01-12 14:36:17
499
原创 UniGUI中-UniTreeMenu1常见技巧
目前发现菜单太多时右侧不能自动出现滚动条，即太多的子菜单将超出屏幕范围，鼠标滚轮不能翻动菜单项，不太方便。在UniTreeMenu的clientEvents属性里的UniEvents里，左侧顶部选择Ext.list.Tree,然后在treeMenu.afterCreate里面添加代码如下，即可解决，效果还不错。[info]和[search],[home],[download],[trash],[refresh],[reply],[star],[user]有用，不是所有的都会显示出来。
2023-12-17 17:34:56
1136
原创 在unigui中为组件添加hint
'closable:false,draggable:false,target:"' + jsname + '_id",html:"'+hint+'",title:"提示"});//改变hint的样式。
2023-12-17 10:28:46
462
原创 TUniGUISession属性及方法
这些方法允许开发人员管理会话的生命周期，存储和检索与会话相关的数据，并执行其他与会话相关的操作。请注意，具体的属性和方法可能会因UniGUI的不同版本而有所变化。为了获得最准确的信息，建议查阅适用于你所使用的UniGUI版本的官方文档或源代码。TUniGUISession类是UniGUI框架中用于管理用户会话的类，主要用于存储和管理用户的会话信息。以上是TUniGUISession类常用的方法和属性，通过这些方法和属性可以实现对用户会话的管理和控制。的属性，具体可能会因版本和框架的具体实现而有所不同。
2023-12-17 08:28:44
1060
原创 解决UniDBTreeGrid在数据更新后自动折叠的问题
UniDBTreeGrid控件在数据更新之后，总是会自动折叠，我想要让它既更新了数据，又不自动折叠。通过以上三个步骤即可解决问题。
2023-12-16 10:58:05
413
原创 uniGUI 应用捕获按键
存在的问题，当显示一个urlFrame，焦点在他上面时，不会触发OnKeyDown事件，从而定义的按键无法捕获到了！MainForm有个属性MonitoredKeys，用来处理捕获用户在浏览器中的按键。
2023-12-16 09:38:27
354
原创 为uniDBGrid设置文字操作栏
对于Web应用界面，这是最常见的方式，那对于我等Delphi开发者来说，基于uniGUI该怎么实现呢？1]首先，为uniDBGrid准备“操作”这一栏的显示内容，具体说，在数据集中准备好显示的数据。我是为数据集加了一列，叫operation。把记录的id传过来了。
2023-12-16 09:37:52
641
原创 uniGUI学习之UniHTMLMemo1富文本编辑器
也许是uniHTMLMemo的BUG，uniMemo在不断增加新的消息时会自动滚屏，但是UniHTMOMemo不会，可在发完消息后和收到消息后添加调用javaScript函数解决。解决系统自带的不能插入图片，字体少等问题 https://www.lanrenzhijia.com/comm/4520.html。在这里你会发现我在发送文字处增加了“”，那是因为如果不增加这个，接收窗口显示时会把多次信息链接到一起，没有换行。5、显示 并 编辑 HTML源代码(主要是图片处理)4、输入长度限制问题。
2023-12-16 09:18:45
566
原创 UniGUI之提示信息MessageDlg及获得信息Prompt
UniSession.AddJS('Ext.get("messagebox-1001_header-title-textEl").setText("确认")');UniSession.AddJS('Ext.get("messagebox-1001_header-title-textEl").setText("信息")');UniSession.AddJS('Ext.get("messagebox-1001_header-title-textEl").setText("警告")');
2023-12-16 09:15:03
616
原创 UniGUI学习之UniImage
ui.Picture.Bitmap.Canvas.TextOut(10, 10, '图片填上文字');UniImage图片填上文字。
2023-12-16 09:07:06
508
原创 uniGUI之上传文件UniFileUploadButton
/要在与exe同下新建一个UploadFolder文件夹。//将 文件 保存到UploadFolder文件夹，先要创建这个UploadFolder文件夹。: 文件类型过滤，有图片image/* audio/* video/*三种过滤。//将 文件 加载到 UniImage1里。标题以及消息文本，可翻译成中文。
2023-12-16 09:06:24
1426
原创 uniGUI学习之Cookie
UniApplication.Cookies.SetCookie(const ACookieName: string,const AValue: string,AExpires: TDateTime = 0,ASecure: Boolean = False,AHTTPOnly: Boolean = False,const APath: string = '/')
2023-12-16 09:02:47
439
原创 uniGUI之MASK遮罩
在页面进行后台数据库操作的时候，不想 用户再进行 页面上的 其他操作，这时候就要 将页面 遮罩。// 是否显示信息。//很简单，本例子就是告诉大家如何在程序忙碌时弹出一个“请等待。ScreenMask.Message:='后台处理中，请稍候';
2023-12-16 09:00:00
390
原创 UniGUI 之UniDBGrid
/DisplayValues存储显示文字 ,不设置 则 显示 True/False;.GridLotacao .x-grid-column {/*带元素id的属性（设置栏），在unidbgrid中的layoutconfig属性中的cls子属性中加入GridLotacao名称*/.GridLotacao .x-grid-cell {/*带元素id的属性（设置单元格），在unidbgrid中的layoutconfig属性中的cls子属性中加入GridLotacao名称*/// 一定为True;
2023-12-16 08:16:36
1426
原创 uniGUI for Delphi UniSweetAlert控件详解
1、AlertType：提示类型，分为atError、atSuccess、atInfo、atQuestion、atWarning五种类型，主要控制提示界面顶部的图标样式；2、AllowEscapeKey：是否允许Esc键关闭提示界面；3、AllowOutsideClick：是否允许点击提示框外部区域关闭提示界面；4、Animation：动画；5、CancellButtonText：取消按钮中文内容；6、ConfirmButtonText：确认按钮中文内容；
2023-12-16 08:10:52
566
原创 unigui分bpl如何访问mainmodule的变量
使用接口的好处是可以更好地封装和保护数据，并且可以实现更灵活的数据共享方式。你可以根据需要定义任意数量的接口，每个接口可以包含不同的方法和属性。此外，接口还支持跨进程和跨线程的访问。因此，使用接口是在UniGUI中实现BPL与MainModule之间数据共享的一种常见和推荐的方法。要在UniGUI中的BPL访问MainModule中的变量，可以使用全局变量或接口来实现数据共享。请注意，在使用全局变量时，要确保MainModule和BPL在相同的进程中运行，以便它们可以共享内存空间。方法一：使用全局变量。
2023-12-15 14:47:57
391
原创 UniGui日常技巧：解决在苹果手机ios系统中UnimNumberEdit无法输入小数
那么如何在unigui种修改呢，uninumberedit->clientevents->unievents->aftercreate，添加如下代码sender.inputElement.set({inputmode: "decimal"})在unigui的手机端中使用unimnumberedit的时候，苹果手机只能输入0-9整数数字，安卓手机没有问题。，苹果手机numeric就是0-9，如果要输入小数需要使用。不使用虚拟键盘，这个时候页面需要使用自定义的键盘代替。默认值，会显示标准输入键盘。
2023-12-09 09:07:03
612
原创 UniGui使用CSSUniTreeMenu滚动条
老规矩，unitreemeu的layout的componentcls里添加bbtreemenu，然后在css里添加。有些人反应UniTreeMenu当菜单项目比较多的时候会超出但是没有出滚动条，只需要添加如下CSS。然后当内容超出后就会自动出现滚动条。
2023-12-09 09:06:15
515
原创 UniGui使用CSS移动端按钮标题垂直
然后添加css，老规矩，添加css的方法有两种一种在servermodule的customcss里添加，一种是使用自定义css文件添加，此处以第一种方法演示。unigui移动端中按钮拉窄以后，标题无法垂直居中，是因为标题有一个padding属性，在四周撑开一段距离。解决方法，用css修改padding，具体做法如下。首先给button的cls创建一个cls,例如。把按钮设高一些，btn的height设置成60。
2023-12-09 09:03:38
634
原创 UniDBGrid序号列添加标题
UniSession.AddJS('MainForm.UniDBGrid1.columnManager.columns[0].setText("序号")');有人想要在UniDBGrid的序号列加上标题，就是这里。
2023-12-09 09:01:55
376
原创 UniGui禁用缓存
exe模式下所有的请求，无论是数据还是文件，都是由unigui服务器进行处理，而isapi模式下，文件请求都是由iis进行处理，所以没有执行到此代码，也就不会生效（iis可以设置自定义header来禁用缓存），同理HyperServer下也不生效，因为hy下文件处理由hy完成，同样没有执行到此代码。只要地址不变，就会使用缓存。，不缓存，那么所有文件在每次刷新的时候都会重新加载，就会增加服务器压力。今天有人问到如何禁用缓存，原因是引用了第三方js,css等文件，但是因为缓存的原因，修改后没有及时生效。
2023-12-09 08:54:37
669
原创 UniGui使用CSS优化PageControl
把此图片另存到tab-default-close.gif 然后运行库里覆盖掉原来的图片。最后提示，此css是在默认的皮肤也就是classic下修改，其他皮肤未测试。以上代码贴到ServerModule的CustomCSS里。关闭按钮是图片，重新制作一个合适的图片替换掉即可，比如。如果有其他喜欢的样式自己做图片替换掉即可。
2023-12-09 08:49:41
542
原创 去掉手机端顶部间隙
在ServerModule的customcss里添加以下代码。Unigui手机端打开时，在顶部有一条白色间隙。使用以下方法可以去除间隙。
2023-12-09 08:46:55
343
delphi代码标准文档
2010-04-16
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人