- 2025-01-20FastReport调用Delphi中的自定义函数(人民币大写金额)
人民币大写金额转换函数1functionMoneyToCn(ANumberic:Real):string;2const3s1:string='零壹贰叁肆伍陆柒捌玖';4s2:string='分角元拾佰仟万拾佰仟亿拾佰仟万';56functionStrTran(constS,s1,s2:string):string;7begin8Result:=St
- 2025-01-14DELPHI中MessageBox的用法
MessageBox对话框输入控件的ImeName属性把输入法去掉就默认为英文输入了MessageBox对话框是比较常用的一个信息对话框,其不仅能够定义显示的信息内容、信息提示图标,而且可以定义按钮组合及对话框的标题,是一个功能齐全的信息对话框信息提示图标,而且可以定义按钮组合及对话框的
- 2025-01-07Delphi窗口分割用splitter分割2个Panel
在Delphi中放置两个Panel和一个Splitter组件,可以按照以下步骤操作:添加第一个Panel:在Form上添加一个Panel组件。设置第一个Panel的Align属性为alLeft(如果你希望垂直分割)或alTop(如果你希望水平分割)。添加Splitter组件:在Form上添加一个Splitter组件。设置Splitter的A
- 2025-01-03delphi djson 类与JSON 互转,与 Java、Golang 一致写法
前因为什么要开发这个JSON库?原因是delphi官方的json既没有处理null(也叫零值)的问题;举例说明吧:开发者往往需要类与JSON之间进行序列化和反序列化;接下来我们举个例子:Person{id:Int64;//IDname:string;//姓名desc:string;//描述}这样一个类在不
- 2025-01-01记录学Delphi安卓编程过程中的一个坑
记录学Delphi安卓编程过程中的一个坑以下这段代码在win10和在安卓下的执行顺序有区别:abcde为序号:在win中,顺序是abcdef,fs在修改后能保存,在安卓下,顺序是aefbcd,所以fs没能在修改后保存。a:TDialogService.MessageDialog('用户:'+user+'已经存在,但你输入的密码与保存的密码不相同,
- 2025-01-01webBroker的option,类似Delphi的ComboBox1
<formaction="KK"method="post"><selectname="address"id="ida"><optionvalue="cc">长春</option><optionvalue="hz">杭州</option><optionvalue=&q
- 2024-12-31delphi base64 图片
usesSystem.SysUtils,System.Classes,System.NetEncoding; //将图片转换为Base64字符串functionImageToBase64(constImageFileName:string):string;varImage:TImage;Stream:TFileStream;Base64:TBase64Encoding;beginImage:=TImage.Create(nil);tryImage
- 2024-12-31delphi 协程 doroutine 成功回调
示例代码unitmain;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics,Vcl.Controls,Vcl.Forms,Vcl.Dialogs,Vcl.ComCtrls,Vcl.StdCtrls,doroutine;typeTForm3=class(TForm)Button1:T
- 2024-12-31delphi 协程 doroutine bg + ui 嵌套 并行
前言bg与ui是互相嵌套的,没有终点;就是说程序若是高密计算,ui+bg一切同时并行,快速响应;示例代码unitmain;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics,Vcl.Controls,Vcl.Forms,Vcl.Dial
- 2024-12-31delphi 重复执行 协程;doroutine - repeat
代码示例重复执行的协程是【智能】,是上一次任务【完成后】,间隔x毫秒执行下一次任务;unitmain;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics,Vcl.Controls,Vcl.Forms,Vcl.Dialogs,Vcl.StdCtrl
- 2024-12-27delphi PopupMenu、& 符号、自定义快捷键
delphiPopupMenu、&符号若要去除这个自动的英文后缀只需要:但这样做后,全部去除快捷键,若我们不想全部去除,它自动的又不方便我们使用,我们可以指定,快捷键:效果:可见&是一个特殊符号,若组件的caption='xyz',这个xyz里若包含&,会忽略,两个&&才能表示一个&;
- 2024-12-26delphi里 TRegistry 的用法
在Delphi中,TRegistry类用于访问和操作Windows注册表。通过TRegistry,你可以读取、写入、删除注册表项和值。以下是一些基本的用法示例:引入单元首先,你需要在使用TRegistry的单元中引入Registry单元:usesRegistry;创建和初始化要使用TRegistry,你通常需要创建一个
- 2024-12-25TMS WEB Core Crack,Key Features of TMS WEB Core
TMSWEBCoreCrack,KeyFeaturesofTMSWEBCoreTMSWEBCoreisconsideredidealforproducingmodernwebsoftwareforusersanddevelopers.DiscoveringtheunlimitedpossibilitiesoftheapplicationsalongwithdevelopmentwiththeuseoftheTMS
- 2024-12-21Delphi WebBroker上传文件
主页面从a01.html导入<formaction="http://127.0.0.1:8080/upload"method="post"enctype="multipart/form-data"><inputtype="file"size="60"name="myfile"><inputtype=&quo
- 2024-12-17Delphi中相关单元
1.Delphi的TypInfo单元是什么?TypInfo单元是Delphi运行时类型信息(RTTI)的核心单元。它提供了一组函数和类型,用于在运行时检查和操作类型信息。这对于许多高级编程技术非常有用,例如对象检查器、序列化、持久化以及元编程。TypInfo单元的主要功能和用途:运行时类型识别(RT
- 2024-12-17Delphi WebBroker【Web服务器应用程序】+简单接口
一、建好项目1.新建File-New–Other–找到Web服务器应用程序2.然后会弹出这些界面,基本都直接下一步就好了【这个Demo就是这样这样的】下面可以测试一下自己的8080端口是否被占用了,占用了就换别的就好了,然后完成【不会影响后面的操作】 二、项目创建完成后然后就
- 2024-12-17Delphi 在窗体界面显示之后执行事件 AfterShow
正常情况下,需要在启动之后直接执行某事件,一般会将函数放在Create或者OnShow里面。但是,这种情况下,当事件耗时较久是,界面会迟迟不肯出现,只能等待Create喝OnShow执行完毕之后才会显示。为了能够在界面能够先出现,然后运行需要的事件,可以使用消息的机制自定义添加一个AfterShow的函数
- 2024-12-15纪念程云大侠
与程云兄的缘份,起始于Delphi大富翁论坛,因“程云的一堆SQL”而结缘,在论坛发起的第二次(玉渊潭)和第三次(香山)大富翁聚会中逐渐相熟。自2002年5月3日那场坛友初聚起,加上中间各种小聚,至近年来的4年多共事时光,不经意间,二十余载岁月已悄然流逝,往昔匆匆,仿若弹指一挥间。惜乎天有不测之风
- 2024-12-15Delphi:含义、用途、过程和应用
什么是德尔菲法?德尔菲法是一种用于预测和决策的结构化通信方法,涉及专家小组。该过程包括多轮问卷,专家提供匿名回答。这些回复被汇总并与小组共享,允许根据集体意见进行调整以达成共识。从选择专家开始,该方法通过多轮评论进行,直到达成共识。虽然它提供了一些优势,例如无
- 2024-12-15delphi TFixedQueue 静态固定元素数队列,手工实现;
unitzx.core.FixedQueue;interfaceusesSystem.SysUtils,System.Generics.Collections;typeTFixedQueue<T>=classprivate///<summary>///一个动态数组,用于存储队列元素,动态数组会自动管理内存///</summary>FItems:TArray<T>;
- 2024-12-10别人的-Delphi开发经验谈
--------开发环境-------- Delphi7是一个很经典的版本,在Win2000/XP下推荐安装Delphi7来开发软件,在Vista下推荐使用Delphi2007开发软件。安装好Delphi7后,应立即安装Delphi7UpdatePack1,Delphi2007则建议尽量安装最新的版本。工欲善其事,必先利其器,为了提升开发效率,为
- 2024-12-09delphi写一个 LinkedList,泛型容器,方便从中间删除
在Delphi中,创建一个泛型链表(LinkedList)容器需要定义节点类和链表管理类,并确保它们都是泛型的,以便可以存储任何类型的元素。以下是一个简单的泛型链表实现,它包括节点类TLinkedListNode<T>和链表管理类TLinkedList<T>。这个实现支持从中间删除元素。unitGeneric.LinkedList;
- 2024-12-06从Delphi到Lazarus——在Lazarus中使用ActiveX控件(导入类型库)
0.前言Lazarus的设计目标是应用FreePascal,所以所有凡是FreePascal能运行的平台,Lazarus都可以运行。通俗地说就是Lazarus追求的是跨平台编程,致力于“一次编写,到处编译”。Lazarus最初是一个基于FreePascal的Delphi仿制品。Lazarus作为一个可能代替Delphi的集成开发环境,从诞生
- 2024-12-05Delphi对接微信人脸支付Windows SDK
开发环境DelphiXE11.3只有部分代码,做个笔记;这个只有调人脸识别(WindowsSDK)代码,只有部分代码 {微信刷脸支付}unitUWX_PayFaceSDK;interfaceusesSystem.SysUtils,System.DateUtils,System.JSON;typemWX_PayFace_CMD_Type=(mWX_init,mWX_getRawdata,mWX
- 2024-12-05从Delphi到Lazarus——Delphi转换器
0.前言在Lazarus中使用Delphi编写的文件是一件很简单的事情,这是因为Lazarus可以直接打开Delphi的任何文件,甚至有些文件可以不做任何修改就可以直接使用到你的Lazarus程序中。不过,Lazarus与Delphi毕竟不是同一个东西,还是存在一些区别的,这就需要将Delphi文件转换为Lazarus需要的格