DELPHI
Delphi-UTF8转GBK
/////////////////////////////////////////////function TXml.getValue(str: string): string;//传入的UTF8字符串var s: string;begin if FBase64 then begin s := TN ......
delphi 如何给自开发的组件设置图标?
经过其他老师指点，自己摸索，发现如何实现，现说明如下，供大家参考。一、建立图标文件 1、建立一个24X24的256色BMP格式文件。 2、文件命名为该组件的名称。二、建立资源文件:Project→Resource and Images,点击Add将BMP格式图标文件加入，Resource Ident ......
Delphi 重命名文件夹
//SourceDirectort, DestinationDirectort 绝对路径 function ReNameDirectort(SourceDirectort, DestinationDirectort: string): Boolean;var pDirOperate: TSHFile ......
delphi入门-控制台console application
1 program Project1; 2 uses Windows; 3 begin 4 MessageBox(0,PChar('Ok!'),PChar('Title'),0); 5 end. program Project1; {$APPTYPE CONSOLE} var str: string ......
Delphi 调用 c# 动态库-委托实现回调
由于Delphi 的局限性，有时候有的功能可能无法实现，需要借助与其他语言实现，比如C#,这里演示一下Delphi 如何调用C#动态库 c# 作为面向对象语言，其中所有的定义和Java 一样，一切皆对象，因此在编写动态链接库的时候需要符合com标准，而委托作为方法的指针，在Delphi 中调用需要把 ......
delphi 11.3 java.ioexception:cleartext http traffic [IP地址] not permitted
要在AndroidManifest.xml添加如下属性即可： 参考：How to Fix Cleartext HTTP Traffic not Permitted in Android - TREND OCEANS ......
delphi中Base64编码转成PDF文件
Base64编码转成PDF文件 PDF文件转成Base64编码： 首先，将PDF文件加载到MemoryStream中：varms:TMemoryStream;beginms:=TMemoryStream.Create;try ms.LoadFromFile('file.pdf'); 然后，使用TId ......
delphi 资源文件管理 Resources and Images
1、 把PNG图片放到项目中； 2、 点击主菜单“Project”→“ Resources and Images”，弹出下面的对话框 它会自动识别项目中的图片、音频等文件自动添加进来，如果没有识别出来或者是自定义文件类型的话，就点击【Add】按钮手动添加，然后选择合适的资源类型ResourceTyp ......
delphi FastReport 导出报表
FastReport 导出报表 属性和方法 TfrxReport.Export function Export(Filter: TfrxCustomExportFilter): Boolean; 使用指定的导出过滤器导出报表。 参数 Filter 导出过滤器实例。 当报表组件构建报表并接收到另一个 ......
delphi 使用idhttp+TIdMultiPartFormDataStream 上传表单post文件并解决ssl问题
delphi 使用idhttp+TIdMultiPartFormDataStream 上传表单post文件并解决ssl问题 最近工作需要对接企业微信的推送信息接口 里面有发文件的功能 所以特地记录下上传文件并且使用idhttp遇到的访问ssl网址报错问题 参考文档：https://blog.csdn ......
Delphi WebBrowser调用WebSocket 服务
#####webSocket Demo 使用工具：WebBrowser 传输参数：delphi 给js 赋值JSON字符串，js 接收到后通过JSON.parse()方法转换成JSON对象，然后根据需要参数进行读取, Delphi 通过SuperObject 处理JSON数据 调用JSON方法：We ......
DELPHI中枚举类型数据的介绍和使用方法
在看delphi程序的时候看到aa=(a,b,c,d);这样的东西，还以为是数组，同事说是函数，呵呵，当然这两个都不屑一击，原来这样式子是在声明并付值一个枚举类型的数据。下边写下来DELPHI中枚举类型数据的介绍和使用方法。见笑。。 枚举类型 Pascal程序不仅用于数值处理，还更广泛地用于处理非数 ......
delphi FastReport 常用功能
FastReport 常用功能 属性和方法 TfrxReport.LoadFromFile function LoadFromFile(const FileName: String; ExceptionIfNotFound: Boolean = False): Boolean; 从给定名称的文件中加 ......
Delphi Combobox 数据库取值
combobox1.items.clear; adotable1.open; adotable1.first; with not adotable1.eof do begin combobox1.items.addobject(Fieldbyname('name').asstring,TObject ......
delphi使用ClientDataset和TDatasetProvider更新多表生成更新语句有误
例如 SELECT *，(select name from 表B where id=表a.id) FROM 表A 通过TDatasetProvider生成语句更新表A，运行applyUpdate更新表a，会出现无效字段名错误，通过profile跟踪发现生成的更新表是表b， 解决办法是去掉表b的语句， ......
Delphi SuperObject json操作类的基本用法
Delphi SuperObject json操作类的基本用法 Delphi2009中开始提供了json支持，但并不完善，提供的单元为（Delphi 2009-Delphi XE4 为DBXJson,很不好用，当时据说是为Datasnap开发准备，方法功能不完善，缺少比如XE5以上版本（System ......
Delphi-UniCode转汉字（\u 格式）、汉字转UniCode（\u 格式）
相关资料： https://www.cnblogs.com/guorongtao/p/14729102.html Delphi UniCode转汉字（\u 格式）、汉字转UniCode（\u 格式） 实例代码： 1、UniCode转汉字 function UnicodeToChinese(sStr: ......
C# 调用Delphi 动态链接库通过回调实现发布订阅
在C#中是通过 委托来实现发布订阅机制，其实这和Delphi 中的方法指针类型如出一辙，这里通过一个小Deamo 来说明一下 Delphi 实现动态库 library mydll; uses SysUtils, Dialogs, Classes, Unit1 in 'Unit1.pas' {Form ......
Delphi 论文阅读 Delphi: A Cryptographic Inference Service for Neural Networks
摘要 许多公司为用户提供神经网络预测服务，应用范围广泛。然而，目前的预测系统会损害一方的隐私:要么用户必须将敏感输入发送给服务提供商进行分类，要么服务提供商必须将其专有的神经网络存储在用户的设备上。前者损害了用户的个人隐私，而后者暴露了服务提供商的专有模式。 我们设计、实现并评估了DELPHI，这是 ......
delphi TMS FlexCel 设置页面布局（打印、导出调整为合适大小）
TMS FlexCel 设置页面布局（打印、导出调整为合适大小） 属性和方法 TXlsFile.PrintScale property TXlsFile.PrintScale: Integer 页面布局中的缩放比例，扩大/缩小工作表的百分比。 TXlsFile.PrintToFit property ......
Delphi 泛型类学习（一）TList<Integer>
1 var 2 List: TList<Integer>; 3 FoundIndex: Integer; 4 5 begin 6 { Create a new List. } 7 List := TList<Integer>.Create; 8 { Add a few values to the l ......
Delphi泛型学习（一）TList<Interger>
var List: TList; FoundIndex: Integer; begin { Create a new List. } List := TList.Create; { Add a few values to the list. } List.AddRange([5, 1, 8, 2, ......
Delphi Locate函数[1] - 查询、定位
Delphi TDataSet.Locate函数 - 查询、定位 使用ADO等数据控件的时候，经常会用到 locate 函数，在结果数据集中查询和定位，下面介绍一下： 原型： 1 function Locate(const KeyFields: string; const KeyValues: Va ......
delphi7是什么？--九五小庞
它的前身，即是DOS时代盛行一时的“BorlandTurbo Pascal”，最早的版本由美国Borland（宝兰）公司于1995年开发。主创者为Anders Hejlsberg。经过数年的发展，此产品也转移至Embarcadero公司旗下。Delphi是一个集成开发环境（IDE），使用的核心是由传 ......
delphi 改变输入法位置
var cf: TCompositionForm; begin cf.ptCurrentPos := Point(500, 10); ImmSetCompositionWindow(ImmGetContext(Handle), @cf); end; 其他输入法测试是可以的，QQ五笔不可以。 原因是因 ......
delphi WriteFile
WriteFile函数的第二个参数是一个指向要写入文件的数据的指针。 因此，您可以使用任何指针类型作为第二个参数，包括指向动态数组的指针。 但是，您需要确保指针指向的内存块具有足够的空间来容纳要写入文件的数据。 如果您使用动态数组作为指针，您需要使用SetLength函数为数组分配足够的内存，并使用 ......
delphi string byte pbyte
{ 在这个例子中 我们使用@运算符获取指向数组A第一个元素的指针，并将其分配给P。 接下来，我们使用SetString函数将P转换为指向AnsiString的指针，并将其分配给S。 请注意，我们使用PAnsiChar而不是PChar作为SetString函数的第二个参数，因为字节数组可能包含非ASC ......
delphi下unicodestring 编码为utf-8 RawByteString转换为ansistring
delphi下unicodestring 编码为utf-8 RawByteString转换为ansistringufo2006于 2018-06-14 23:01:09 发布 4453收藏 2分类专栏： 软件开发版权软件开发 专栏收录该内容41 篇文章 1 订阅订阅专栏delphi在新版本的字符串默 ......
delphi7 pas 文件底部有diagram是什么框如何编写
在 Delphi 7 中，pas 文件底部的 diagram 是一个类图，用于显示在 pas 文件中定义的类及其关系。 要编写类图，你需要使用 Delphi 的可视化建模工具，如 ModelMaker Tools 或 ModelMaker Code Explorer。 以下是编写类图的一般步骤： 打 ......
截至目前最便宜的Delphi客户端框架OneFastClient——899元，不是美元，是人民币，关键还是全源码
截至目前最便宜的Delphi客户端框架OneFastClient，关键还是全源码艹！服务端中间件免费，开源——OneDelphi欢迎加入OneDelphi免费开源中间件Q群：193878346需要上车OneFastClient的直接联系叫兽本人，QQ：378464060——教授出品，必属精品！ ......