百万软件

原来使用华为的SDK，但是升级到D12.1后，不能正常使用了，现在把它改成Zxing的条码和二维码识别库。

delphi仪表盘，基于d11.3和skia4delphi以及fmxui扩展的类似于汽车仪表盘，可以灵活的设置各种参数。

delphi d11 fmx发布Linux 程序当中出现的问题集合

动态创建控件还是比较管理，但动态管理与赋值还是相对比较麻烦，原来是使用FindComponent来实现，但是可能是创建在不同的组件下面，无法循环还实现，现有利用 List 泛型来实现。由于工作需要，动态创建控件，包括文本，图片，GIF动图，按钮等控件，并根据不同的值，显示不能的内容，需要在运行时来改变状态，由此只能使用动态创建控件来实现功能上的要求。

通过rtti遍历record，支持delphi2010以上版本，更低版本不支持。可以遍历record的field的名称、类型和长度。delphi遍历record。

使用TDelphiZXingQRCode控件生成二维码条形码打印到TBitmap位图中，可以把二维码保存到JPG图片中。

DELPHI 制作FONT资源文件时，有可能会报 "brcc32 exited with code 1" ，最终选择不用font 而使用：RCDATA制作资源例如：AR_01RCDATA "AR_01 Regular.ttf"ZR_01 RCDATA "ZR_01 Regular.ttf"新建一个DLL程序，添加刚才的资源文件，直接编译成DLL文件====================================================================..

这里写自定义目录标题欢迎使用Markdown编辑器新的改变功能快捷键合理的创建标题，有助于目录的生成如何改变文本的样式插入链接与图片如何插入一段漂亮的代码片生成一个适合你的列表创建一个表格设定内容居中、居左、居右SmartyPants创建一个自定义列表如何创建一个注脚注释也是必不可少的KaTeX数学公式新的甘特图功能，丰富你的文章UML 图表FLowchart流程图导出与导入导出导入欢迎使用Markdown编辑器你好！ 这是你第一次使用 Markdown编辑器 所展示的欢迎页。如果你想学习如何使用Mar

//显示边框//TDrawableBorder(tvGua.Background).Border.Kind:=TBrushKind.Solid;//TDrawableBorder(tvZhong.Background).Border.Kind:=TBrushKind.None;

1.在项目中使用FastMM4打开项目文件，让第一个单元引用FastMM4.2.定义编译条件变量Shift+Ctrl+F11,打开项目设置窗口，设置Conditional defines。定义三个编译变量:FullDebugModeLogMemoryLeakDetailToFileClearLogFileOnStartup3.设置Map file为Detailed4.新建个单元，并设置一处内存泄漏调式状态运行项目，点击按钮，产生泄漏，然后退出程序，这时候弹出内存泄窗口。再打开执行程序的

语音合成，据说Android系统从1.6版本开始就支持TTS（Text-To-Speech）。但是android系统默认的TTS引擎:Pic TTS不支持中文。好在现在国内较多的手机都已安装好中文的TTS引擎。使用Delphi开发一个可以朗读中文的APP就非常的简单。本文给大家介绍使用Delphi开发基于安卓原生的TTS（中文语音合成），将文字转语音实现中文的朗读。APP运行后，需要手机上已安装语音引擎。如果您手机上已安装并设置了语音引擎，即可开始朗读。安卓系统的TTS可支持很多语音引擎，如：谷歌、讯

uses Classes, SysUtils, FMX.Helpers.Android, Androidapi.JNI.GraphicsContentViewText, Androidapi.JNI.Net, Androidapi.JNI.JavaTypes //调用浏览器打开网址procedure XOpenURL(AUrl: String);var Intent: JIntent;begin Intent := TJIntent.JavaClass.init(TJIn.

下面定义的函数和过程都在同一个公共单元中(非窗体单元)在一个函数中调用方式如下(调用行，就是这一行出错）：datamodule1.query1.FieldByName('XB').OnGetText:=GetName;在同一个单元中定义的过程如下：procedure GetName(Sender: TField; var Text: String; DisplayText: Boolean);begin with datamodule1.query1 do begin .

delphi 执行JS函数，再也不用担心JS怎么转换成pascal语言了！因为引入OLE，则需要引入：ComObj, ActiveX; 在DELPHI 7 和 DELPHI D10.3中验证通过！function FunRunJs(str: string): string;var m_OLE : Variant; StrList: TStringList;begin Result:=''; if Trim(str)='' then exit; //创建JS变体类型 .

前言使用Delphi开发安卓APP时，我们经常想要实现状态栏沉浸样式，但这方面资料较少，很多使用修改配置文件的方式去处理。使用起来相对麻烦了一些。为此，我花了点时间观摩学习了JAVA及其他Delphi实现状态栏沉浸式的代码，在自己动手实践后全面进行了封装。（目前 据我所查询资料了解的，这是在delphi中实现安卓沉浸最为方便、快捷、适配效果最好的方式。）实现功能简介目前封装好的类主要可以分别实现安卓状态栏与导航栏的透明与不透明、设置颜色、设置字体的显示模式，如下图所示（这是演示APP展示的效果，也包

delphi 对金额double类型向上取整，保留小数位//新保留小数位，只要后面有多余的数据，则进位function NewRoundTo(value: Double; ws: Integer): Double;var iLen: Integer;begin iLen:=StrToInt('1'+stringOfChar('0', ws)); Result:=Ceil(valu...

前几天有个朋友问我这个问题：有段编码字符要转为图片，问我怎么实现？其实凭经验大多数人第一时间想到的就是这是base64编码，告知后但对方就是没法解，没办法啊，好人做到底，动手给对方写个demo，利用indy自带的TIdEncoderMIME和TIdDecoderMIME来完成该过程。关键代码如下：unit Unit1;interfaceuses Windows, Me...

IDHTTP indy10访问asp.net服务器 经常报#10054错误，编码乱码处理方法。在网络上查询了很多方法，最终都没有办法解决，最后在ASP.NET的WEB处理页面上加上了：Response.Flush();则可以了。/////以下是DELPHI部分：idHttp:=TIdHTTP.Create(nil); with idHttp do begin ...

var slr: TStringList; F:TFileStream; S:WideString; i: integer;const FileName='TalkList.txt';begin F:=TFileStream.Create(FileName,fmOpenRead); I:=F.Size; SetLength(S, I div 2); F.Read...

这里指的文本是用于Windows系统中的扩展名为.txt的文件。Notepad（记事本）只支持四种格式：ANSI/Unicode/Unicode big endian/UFT-8，在Delphi中如何判断与读取这些不同格式的文本呢？首先，不同编码的文本，是根据文本的前两个字节来定义其编码格式的。定义如下：ANSI： 无格式定义；Unicode： 前两个字节为FFFE；Unicode bi...