频道分类
您的位置:网站首页 > 函数

Delphi pSafeArray与TBytes类型转换

虽然Delphi有这自己独特的语言优势,但是跟其他语言加解密互通时,处理显得尤为麻烦。比如3DES加解密,网上…

类别:函数 标签: 作者:admin 日期:2018-02-02 18.25.47

delphi 得到IP地址最后一个点后面的值

functionExtractIP(constS:String):String;varI,L,K1,K2:Integer;ip:string;beginip:=S+'.';L:=Length(ip);…

类别:函数 标签: 作者:admin 日期:2018-01-31 23.50.37

Delphi 常用函数记录

//判断是否是数字functionIsNumeric(sDestStr:string):Boolean;//简写多余汉字functionSimplifyWord(sWord:…

类别:函数 标签: 作者:admin 日期:2018-01-30 10.32.33

delphi BytesToFile

procedureBytesToFile(bData:TByteArray;sPath:string);varhFile:THandle;dWritten:DWORD;beginhFile:=Crea…

类别:函数 标签: 作者:admin 日期:2018-01-30 09.13.57

delphi CopyFileProgressBar 拷贝文件显示进度条

CopyFileProgressBar(pwidechar(ListBox1.Items.Strings[I]),pwidechar(NewDir+'\'+ExtractFileName(ListBo…

类别:函数 标签: 作者:admin 日期:2018-01-29 21.35.46

delphi 分离网址链接最后一层文件目录

functionEx****actURLName(constS:S****ing):S****ing;varI,L,K1,K2:Integer;beginL:=Length(S);result:=&#…

类别:函数 标签: 作者:admin 日期:2018-01-29 20.19.24

delphi 分享三个随机字符串

usesmath;functionGenID:String;varb,x:byte;beginResult:='{';Randomize;forb:=1to8dobeginifRandom(100)>…

类别:函数 标签: 作者:admin 日期:2018-01-29 20.00.35

delphi 读取流信息

functionReadString(TheStream:TStream;Length:integer):string;varn:longword;t:byte;beginSetLength(resu…

类别:函数 标签: 作者:admin 日期:2018-01-29 18.21.15

delphi ValidateName 过滤特殊字符

functionValidateName(n:string):string;varbanned,res:string;i,j:integer;beginres:=n;banned:='\/:*?"<>…

类别:函数 标签: 作者:admin 日期:2018-01-29 17.59.34

delphi GetHref 获取<a href="链接"></a>中href的数据

functionGetHref(href,s:s****ing):s****ing;varp:integer;beginp:=pos(href,s);if(p=0)or(s[Length(href)+…

类别:函数 标签: 作者:admin 日期:2018-01-29 17.36.25

Delphi中CoInitialize作用

CoInitialize(LPVOID),它将以特定参数调用CoInitializeEx,为当前单元初始化COM库,并标记协同模式为单线程…

类别:函数 标签: 作者:admin 日期:2018-01-29 14.09.44

delphi MailURLMayBeInvalid 检测邮箱地址有效性

functionMailURLMayBeInvalid(consts:string):Boolean;vari:Integer;c:string;begin//'',ä,ö,ü,…

类别:函数 标签: 作者:admin 日期:2018-01-28 20.26.23

delphi StringToWideString WideStringToString

{:ConvertsUnicodestringtoAnsistringusingspecifiedcodepage.@paramwsUnicodestring.@paramcodePageCodepa…

类别:函数 标签: 作者:admin 日期:2018-01-28 18.44.26

delphi 获取/设置桌面窗口样式的Delphi代码

varhWin:HWND;lStyle:LongInt;lExStyle:LongInt;beginhWin:=65632;//$00010060//获取和设置该窗口的样式lSt…

类别:函数 标签: 作者:admin 日期:2018-01-28 11.40.01

delphi HTML document接口获取网页中所有图片

usesmshtml,ActiveX,COMObj,IdHTTP,idURI;{....}procedureGetImageLinks(AURL:string;AList:TStrings);varI…

类别:函数 标签: 作者:admin 日期:2018-01-27 22.48.02

Delphi 获取外部程序句柄与发送消息

源码unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialog…

类别:函数 标签: 作者:admin 日期:2018-01-27 18.37.01

DELPHI GetWindowText - 获取窗口标题

//声明:GetWindowText(hWnd:HWND;{窗口句柄}lpString:PChar;{接收文本的缓冲区的指针}nMaxCount:Integer{指…

类别:函数 标签: 作者:admin 日期:2018-01-27 18.34.39

delphi ReadProcessMemory 输入进程ID 输入读取地址

procedureTForm6.Button1Click(Sender:TObject);varGhwnd:HWND;ProcID:Cardinal;Process:THandle;lpBaseAdd…

类别:函数 标签: 作者:admin 日期:2018-01-27 17.59.18

delphi XE Berlin ReadProcessMemory WriteProcessMemory

delphiXEBerlinReadProcessMemoryWriteProcessMemorydelphiXE,Berlin[dcc32Error]Unit9.pas(93):E2033Type…

类别:函数 标签: 作者:admin 日期:2018-01-27 17.56.08

delphi IsIPAdress 非正则表达式验证IP的方法

functionIsIPAdress(constValue:String):Boolean;varn,x,i:Integer;Posi:Array[1..4]ofInteger;Oktet:Array…

类别:函数 标签: 作者:admin 日期:2018-01-26 16.27.28