摘要：
先记录，再学习。 TThread.CreateAnonymousThread(); //普通 TThread.Queue(); //队列 TThread.Synchronize(); //VCL 同步 阅读全文
posted @ 2020-04-24 21:29
redhat588
阅读(145)
评论(0)
推荐(0)
摘要：
IsLetter: {是否是个字母; 范围 A..Z 与 a..z} IsUpper: {是否是个大写字母; 范围 A..Z} IsLower: {是否是个小写字母; 范围 a..z} IsDigit: {是否是个十进制数字; 范围 0..9} IsNumber: {是否是个数字符号; 范围包括 0 阅读全文
posted @ 2020-04-24 21:06
redhat588
阅读(177)
评论(0)
推荐(0)
摘要：
uses Character; {Character.ToUpper} procedure TForm1.Button1Click(Sender: TObject); var c: Char; str: string; begin c := ToUpper('a'); str := ToUpper( 阅读全文
posted @ 2020-04-24 21:04
redhat588
阅读(134)
评论(0)
推荐(0)
摘要：
使用的是 Delphi 2010 下 IOUtils 单元的 TDirectory.Copy 函数: uses IOUtils; procedure TForm1.btn1Click(Sender: TObject); const SourceDir = 'C:\Temp1'; { 源文件夹必须存在 阅读全文
posted @ 2020-04-24 20:55
redhat588
阅读(216)
评论(0)
推荐(0)
摘要：
unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, V 阅读全文
posted @ 2020-04-24 20:45
redhat588
阅读(474)
评论(0)
推荐(0)
摘要：
TDictionary 泛型字典，类似哈希表. unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vc 阅读全文
posted @ 2020-04-24 10:17
redhat588
阅读(282)
评论(0)
推荐(0)
摘要：
跟着万一老师学习笔记 TQueue 和 TStack, 一个是队列列表, 一个是堆栈列表; 一个是先进先出, 一个是先进后出.TStack 主要有三个方法、一个属性:Push(压栈)、Pop(出栈)、Peek(查看下一个要出栈的元素);Count(元素总数). unit Unit1; interfa 阅读全文
posted @ 2020-04-24 09:04
redhat588
阅读(185)
评论(0)
推荐(0)
浙公网安备 33010602011771号