首页
博客
源码
资源
博客
源码
写文章
发布博客
发布资源
登录
X
delphi
相关资讯
热门
最新
代码人生
01-01 08:00
代码人生
delphi中使用array结构体最好的例子
delphi中使用array结构体最好的例子 转自https://blog.csdn.net/qq_26657857/article/details/88733320 在开发中,能用结构体尽量不用类,因为结构体的存储机制是“栈”,这就意味着自动释放内存。但是在使用过程中也要注意以下几点:1.用完清空 2.用多少申请多少 下面用具体实例说明: unit Unit1; interface us
88
代码人生
01-01 08:00
代码人生
Delphi下载
Delphi下载 今早最好的消息,Delphi 10.2.3如期发布,下载地址: 原文:https://www.cnblogs.com/welcome-to-fang-qi-blog/p/14462490.html
87
代码人生
01-01 08:00
代码人生
delphi 窗口置顶及uniquery.locateEx的用法
delphi 窗口置顶及uniquery.locateEx的用法 窗口置顶: SetWindowPos(Form_showerr.Handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE); 数据集的locate方法: uses memdata; DataModule1.UniQuery_hklist.LocateEx(‘普查机构代码;户籍归属地派出所代码;户号;姓名‘,
85
代码人生
01-01 08:00
代码人生
delphi assigned
delphi assigned assigned 判断指针是否为空,空返回假 ptr:=GetMem(SizeOf(testrecord)); if not Assigned(ptr) then begin OutputDebugString(‘ nil‘); end; 原文:https://w
84
代码人生
01-01 08:00
代码人生
delphi 图片加水印源代码
delphi 图片加水印源代码 unit UWaterMark; interface uses {$IFNDEF DELPHIXE2ANDUP} windows,SysUtils,classes,graphics,Gdiplus; {$ELSE} winapi.windows, System.SysUtils,System.Classes,Vcl.Graph
84
代码人生
01-01 08:00
代码人生
Delphi TField.ProviderFlags 属性
Delphi TField.ProviderFlags 属性 Delphi TField.ProviderFlags 属性 单元:DB 说明:指定应用更新时提供程序如何使用字段值。 语法: property ProviderFlags: TProviderFlags; 描述:ProviderFlags仅与提供给提供程序组件抯事件处理程序的数据包中出现的字段相关。此属性是一组标志,用于确定在应用更新或解决更新错
84
代码人生
01-01 08:00
代码人生
Delphi的Json学习之一
Delphi的Json学习之一 -------Unit开始 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: T
83
代码人生
01-01 08:00
代码人生
Delphi 转换大小写字符(UpperCase、LowerCase)
Delphi 转换大小写字符(UpperCase、LowerCase) Delphi 转换大小写字符(UpperCase、LowerCase) 1、UpperCase //转换成大写 function UpperCase(const S: string): string; var Ch: Char; L: Integer; Source, Dest: PChar; begin L := Length(S);
81
代码人生
01-01 08:00
代码人生
Delphi两个取字串长度的函数strlen,length
Delphi两个取字串长度的函数strlen,length 相关资料: http://www.delphitop.com/html/zifuchuan/1242.html 【strlen】PChar 串专用函数:串长度procedure TForm1.BitBtn1Click(Sender: TObject); var s: Widestring; begin s := ‘桂枝香在故国晚秋‘; Sh
81
代码人生
01-01 08:00
代码人生
Delphi System单元-Odd- 判断是否是奇数
Delphi System单元-Odd- 判断是否是奇数 Delphi System单元-Odd- 判断是否是奇数 原型: function Odd(X:Integer): boolean; Delphi示例: var i: Integer; b: Boolean; begin i := 1; b := Odd(i); {是奇数返回真} Sh
80
«
1
2
...
7
8
9
10
11
12
13
14
15
»