如何将带有图表的 cxGrid 导出到 Excel 文件
可以使用 ExportGridToXLSX 方法将 Grid 导出到 XLSX 文件uses cxGridExportLink; procedure <AForm>.<AcxButton>Click(Sender: TObject); begin ExportGridToXLSX('c:\chart.xlsx'...
使用皮肤时，如何更改 TcxButton 背景颜色
procedure TfmMain.cxButtonNoteCustomDraw(Sender: TObject; ACanvas: TcxCanvas; AViewInfo: TcxButtonViewInfo; var AHandled: Boolean); begin ACanvas.Brush.Color := clRed; ACanvas.Floo...
cxGrid 如何将某个单元格的值复制到剪贴板
uses .., clipbrd; if GridView.OptionsSelection.CellSelect then Clipboard.AsText := <GridView>.Controller.FocusedRow.Values[FocusedColumn.Index];
TcxDBPivotGrid 导出到Excel
uses cxExportPivotGridLink； procedure ExportGrid(aGrid: TcxCustomPivotGrid); var SaveDialog: TSaveDialog; begin if not Assigned(aGrid) then Exit; SaveDialog := TSaveDialog.Create(...
Delphi 将方法以参数的形式传递
RAD Studio 10.2.3 测试√ 代码：procedure TForm_Tips.Button_ParamIsFuncClick(Sender: TObject); type // 需要先声明一个方法的类型 TFuncType = function(ANum: Integer): Integer; func...
Delphi 巧用TstringList
TStringList 中有一个属性Delimiter，很多时候可以巧用这个属性！有一字符串，中间有许多特殊符号，现在需要把其分割开，如果用TStringList的Delimiter属性，将会使程序变得非常简单。TStringLi...
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...
Delphi TStringList 存取数据
RAD Studio 10.2.3 测试√存对象：StrList.AddObject(mStrKey, mValueObj); 取对象mIndex := StrList.IndexOf(mStrKey); if mIndex >= 0 then Result := TClass(StrList.Objects[mIndex]);...
Delphi 高精度计时
RAD Studio 10.2.3 测试√源码仓库(Gitee)：https://gitee.com/xiaoyinhui这个计时精度是根据自己电脑硬件配置决定的我目前的可以精确到 0.1 微秒使用实例PS：需要引用单元 uHightAccuracyTime...
Delphi StyleControls之标题栏Tabs
控件 scStyledForm 下的 Tabs 下的子项的 OnClick 事件【进行 cxPageControl 的面板切换】procedure TForm1.scStyledForm1Tabs0Click(Sender: TObject); begin cxPageControl1.ActivePageIndex ...
Delphi StyleControls之功能按钮设计
控件：scGPGlyphButton控件部分属性：【关闭和最小化下的OnClick事件】procedure TForm2.scGPGlyphButton1Click(Sender: TObject); begin Application.Terminate; //关闭 end; procedure TForm2...
记录学Delphi安卓编程过程中的一个坑
以下这段代码在win10和在安卓下的执行顺序有区别：abcde为序号：在win中，顺序是abcdef，fs在修改后能保存，在安卓下，顺序是aefbcd，所以fs没能在修改后保存。a: TDialogService.MessageDialog...
记录学习使用stylecontrols5.8控件的几个坑
坑1：TscListView控件的Bug：当OtherView.ViewStyle:=vsTile后会产生异常，经跟踪代码，是有一处integer溢出导致，具体也不知道是在哪个环节出的问题，加了几行判断代码修正后，不异常了，不知...
Delphi StyleControls之渐变色标题栏
RAD Studio 10.3 测试√【scStyledForm】DWMClientShadow-----------------设置窗体为无边框窗体【下面方法中使用一种即可实现】【scLabel、scPanel、scGPPanel】DragForm---------------------...
Delphi XE2 为 VCL 提供的 14 种样式
其实只提供了 13 个 vsf 样式文件, 还有默认的 Windows 样式, 共 14 种.在空白窗体上添加 ListBox1 等控件, 测试代码:uses IOUtils, Vcl.Styles, vcl.Themes; procedure TForm1.FormCreate(Send...
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...
DELPHI 关于 Style 的几点
Delphi xe2以前的样式或风格编辑器叫vcl Style 之后改为 BMP Style，同时支持VCL和FMX，Delphi本身的设计是超前的，在多年后其他的语言或环境里才有类似的技术，比如微软的WPF的XMAL相关思想，...