排序
使用皮肤时，如何更改 TcxButton 背景颜色
procedure TfmMain.cxButtonNoteCustomDraw(Sender: TObject; ACanvas: TcxCanvas; AViewInfo: TcxButtonViewInfo; var AHandled: Boolean); begin ACanvas.Brush.Color := clRed; ACanvas.Floo...
1个月前cxGrid 如何将某个单元格的值复制到剪贴板
uses .., clipbrd; if GridView.OptionsSelection.CellSelect then Clipboard.AsText := <GridView>.Controller.FocusedRow.Values[FocusedColumn.Index];
1个月前TcxDBPivotGrid 导出到Excel
uses cxExportPivotGridLink； procedure ExportGrid(aGrid: TcxCustomPivotGrid); var SaveDialog: TSaveDialog; begin if not Assigned(aGrid) then Exit; SaveDialog := TSaveDialog.Create(...
1个月前Delphi 将方法以参数的形式传递
RAD Studio 10.2.3 测试√ 代码：procedure TForm_Tips.Button_ParamIsFuncClick(Sender: TObject); type // 需要先声明一个方法的类型 TFuncType = function(ANum: Integer): Integer; func...
1个月前
Delphi 巧用TstringList
TStringList 中有一个属性Delimiter，很多时候可以巧用这个属性！有一字符串，中间有许多特殊符号，现在需要把其分割开，如果用TStringList的Delimiter属性，将会使程序变得非常简单。TStringLi...
1个月前Delphi TstringList Stringlist的特殊用法
procedure TForm1.btn1Click(Sender : TObject); var m : Integer; s : string; strlst : TStringList; begin strlst := TStringList.Create; strlst.Add('张三=80'); strlst.Add('张四=90'); s...
1个月前Delphi TStringList 存取数据
RAD Studio 10.2.3 测试√存对象：StrList.AddObject(mStrKey, mValueObj); 取对象mIndex := StrList.IndexOf(mStrKey); if mIndex >= 0 then Result := TClass(StrList.Objects[mIndex]);...
1个月前
Delphi 高精度计时
RAD Studio 10.2.3 测试√源码仓库(Gitee)：https://gitee.com/xiaoyinhui这个计时精度是根据自己电脑硬件配置决定的我目前的可以精确到 0.1 微秒使用实例PS：需要引用单元 uHightAccuracyTime...
1个月前
Delphi StyleControls之标题栏Tabs
控件 scStyledForm 下的 Tabs 下的子项的 OnClick 事件【进行 cxPageControl 的面板切换】procedure TForm1.scStyledForm1Tabs0Click(Sender: TObject); begin cxPageControl1.ActivePageIndex ...
1个月前
Delphi StyleControls之功能按钮设计
控件：scGPGlyphButton控件部分属性：【关闭和最小化下的OnClick事件】procedure TForm2.scGPGlyphButton1Click(Sender: TObject); begin Application.Terminate; //关闭 end; procedure TForm2...
1个月前
记录学习使用stylecontrols5.8控件的几个坑
坑1：TscListView控件的Bug：当OtherView.ViewStyle:=vsTile后会产生异常，经跟踪代码，是有一处integer溢出导致，具体也不知道是在哪个环节出的问题，加了几行判断代码修正后，不异常了，不知...
1个月前记录学Delphi安卓编程过程中的一个坑
以下这段代码在win10和在安卓下的执行顺序有区别：abcde为序号：在win中，顺序是abcdef，fs在修改后能保存，在安卓下，顺序是aefbcd，所以fs没能在修改后保存。a: TDialogService.MessageDialog...
1个月前
Delphi StyleControls之渐变色标题栏
RAD Studio 10.3 测试√【scStyledForm】DWMClientShadow-----------------设置窗体为无边框窗体【下面方法中使用一种即可实现】【scLabel、scPanel、scGPPanel】DragForm---------------------...
1个月前Delphi XE2 为 VCL 提供的 14 种样式
其实只提供了 13 个 vsf 样式文件, 还有默认的 Windows 样式, 共 14 种.在空白窗体上添加 ListBox1 等控件, 测试代码:uses IOUtils, Vcl.Styles, vcl.Themes; procedure TForm1.FormCreate(Send...
1个月前
Delphi12支持全屏显示启动界面的styles.xml
<resources xmlns:android='http://schemas.android.com/apk/res/android'> <style name='AppTheme' parent='@android:style/Theme.Material.Light.NoActionBar'> <item name='a...
1个月前Delphi10控件Style自定义注意点
StyledSettings属性，除常用Family、Size、Style等设置外，修改其它项目注意将Other项设置为True。否则，某些自定义属性无效。
1个月前
DELPHI 关于 Style 的几点
Delphi xe2以前的样式或风格编辑器叫vcl Style 之后改为 BMP Style，同时支持VCL和FMX，Delphi本身的设计是超前的，在多年后其他的语言或环境里才有类似的技术，比如微软的WPF的XMAL相关思想，...
1个月前如何把一个file:///的url地址转成本地文件地址
在 Delphi 中，file:/// 是一种 URL 格式，用于表示本地文件路径。例如，file:///C:/Documents/MyFile.txt 表示本地文件 C:\Documents\MyFile.txt。如果你需要将这种 URL 格式转换为本地文件...
1个月前TListView 判断是否是鼠标左击，点击了Item
1. 使用 OnMouseDown 事件在 OnMouseDown 事件中，Button 参数会告诉你当前按下的是哪个鼠标键（左键、右键或中键）。我们可以在代码中检查 Button 是否为 mbLeft（左键）。procedure T...
1个月前标签
排行
