### Delphi常用函数详解
#### 一、数学函数
**1. Abs(real)**
功能：返回real参数的绝对值。
示例：
```delphi
var
x, y: Real;
begin
x := -4.3;
y := Abs(x);
// y 的值现在是 4.3
end;
```
#### 二、日期与时间函数
**1. DateToStr(日期)**
功能：将日期转换为字符串。
示例：
```delphi
var
d: TDate;
s: string;
begin
d := Now;
s := DateToStr(d);
// s 的值是 "2023-04-01"（取决于当前日期）
end;
```
**2. DateTimeToFileDate(日期时间)**
功能：将Delphi日期时间格式转换为DOS日期时间格式。
示例：
```delphi
var
dt: TDateTime;
fileDate: TFileDate;
begin
dt := Now;
fileDate := DateTimeToFileDate(dt);
// fileDate 是 DOS 文件日期时间格式
end;
```
**3. EncodeDate(年,月,日)**
功能：根据给定的年月日创建一个Delphi日期。
示例：
```delphi
var
d: TDate;
begin
d := EncodeDate(2023, 4, 1);
// d 的值是 "2023-04-01"
end;
```
**4. DecodeDate(日期)**
功能：将Delphi日期解码为年、月、日。
示例：
```delphi
var
d: TDate;
year, month, day: Word;
begin
d := Now;
DecodeDate(d, year, month, day);
// year, month, day 分别代表当前日期的年月日
end;
```
#### 三、字符串处理函数
**1. AnsiCompareStr(s1, s2)**
功能：比较两个字符串s1和s2。返回值小于0表示s1<s2，等于0表示s1=s2，大于0表示s1>s2。
示例：
```delphi
var
s1, s2: string;
res: Integer;
begin
s1 := 'hello';
s2 := 'world';
res := AnsiCompareStr(s1, s2);
// res 的值小于0
end;
```
**2. AnsiCompareText(s1, s2)**
功能：与AnsiCompareStr类似，但在文本模式下比较字符串。
示例：
```delphi
var
s1, s2: string;
res: Integer;
begin
s1 := 'hello';
s2 := 'Hello';
res := AnsiCompareText(s1, s2);
// res 的值为0，因为忽略大小写
end;
```
**3. AnsiLowerCase(s)**
功能：将8位ASCII编码的字符串s转换为小写形式。
示例：
```delphi
var
s: string;
begin
s := 'HELLO WORLD';
s := AnsiLowerCase(s);
// s 的值是 "hello world"
end;
```
**4. AnsiUpperCase(s)**
功能：将8位ASCII编码的字符串s转换为大写形式。
示例：
```delphi
var
s: string;
begin
s := 'hello world';
s := AnsiUpperCase(s);
// s 的值是 "HELLO WORLD"
end;
```
**5. Concat(s1, s2, ...)**
功能：将多个字符串连接成一个字符串。
示例：
```delphi
var
s1, s2, result: string;
begin
s1 := 'hello';
s2 := 'world';
result := Concat(s1, ' ', s2);
// result 的值是 "hello world"
end;
```
**6. CompareStr(s1, s2)**
功能：比较两个字符串s1和s2。返回值小于0表示s1<s2，等于0表示s1=s2，大于0表示s1>s2。
示例：
```delphi
var
s1, s2: string;
res: Integer;
begin
s1 := 'hello';
s2 := 'world';
res := CompareStr(s1, s2);
// res 的值小于0
end;
```
#### 四、文件处理函数
**1. AssignFile(file; fileName: String)**
功能：将文件句柄file与指定文件名关联。
示例：
```delphi
var
f: Text;
begin
AssignFile(f, 'test.txt');
// 将文件句柄f与文件test.txt关联
end;
```
**2. CloseFile(file)**
功能：关闭由file句柄所指向的文件。
示例：
```delphi
var
f: Text;
begin
AssignFile(f, 'test.txt');
CloseFile(f);
// 关闭文件test.txt
end;
```
**3. FileExists(fileName: String): Boolean**
功能：检查文件是否存在的布尔函数。
示例：
```delphi
var
exists: Boolean;
begin
exists := FileExists('test.txt');
// 检查文件test.txt是否存在
end;
```
**4. FileOpen(file, mode: FileMode): Boolean**
功能：打开一个文件，返回是否成功。
示例：
```delphi
var
f: Text;
success: Boolean;
begin
success := FileOpen(f, fmOpenReadWrite);
// 打开文件进行读写
end;
```
**5. FileRead(file, var buffer, count: Integer): Longint**
功能：从文件中读取数据到缓冲区buffer中。
示例：
```delphi
var
f: Text;
buf: Array[0..255] of Byte;
bytesRead: Longint;
begin
FileOpen(f, fmOpenRead);
bytesRead := FileRead(f, buf, SizeOf(buf));
// 读取文件内容到buf中
end;
```
**6. FileWrite(file, const buffer, count: Integer): Longint**
功能：将数据从缓冲区buffer写入文件。
示例：
```delphi
var
f: Text;
buf: Array[0..255] of Byte;
bytesWritten: Longint;
begin
FileOpen(f, fmOpenWrite);
bytesWritten := FileWrite(f, buf, SizeOf(buf));
// 将buf中的数据写入文件
end;
```
#### 五、内存管理函数
**1. AllocMem(size: Integer): Pointer**
功能：分配size个字节的内存空间，并返回指向该内存区域的指针。
示例：
```delphi
var
p: Pointer;
begin
p := AllocMem(100); // 分配100个字节的内存
// 使用内存
FreeMem(p, 100); // 释放内存
end;
```
**2. FreeMem(p: Pointer; size: Integer)**
功能：释放由p指向的内存区域。
示例：
```delphi
var
p: Pointer;
begin
p := AllocMem(100);
// 使用内存
FreeMem(p, 100); // 释放内存
end;
```
#### 六、其他函数
**1. BlockRead(file, var buffer, count: Integer): Longint**
功能：从文件中读取数据到缓冲区buffer中。
示例：
```delphi
var
f: Text;
buf: Array[0..255] of Byte;
bytesRead: Longint;
begin
FileOpen(f, fmOpenRead);
bytesRead := BlockRead(f, buf, SizeOf(buf));
// 读取文件内容到buf中
end;
```
**2. BlockWrite(file, const buffer, count: Integer): Longint**
功能：将数据从缓冲区buffer写入文件。
示例：
```delphi
var
f: Text;
buf: Array[0..255] of Byte;
bytesWritten: Longint;
begin
FileOpen(f, fmOpenWrite);
bytesWritten := BlockWrite(f, buf, SizeOf(buf));
// 将buf中的数据写入文件
end;
```
**3. Chr(n: Word): Char**
功能：根据ASCII码n返回对应的字符。
示例：
```delphi
var
c: Char;
begin
c := Chr(65);
// c 的值是 'A'
end;
```
**4. Continue**
功能：跳过循环体中的剩余部分并继续执行下一次循环。
示例：
```delphi
var
i: Integer;
begin
for i := 1 to 10 do
begin
if i = 5 then
Continue;
Write(i:2);
end;
// 输出 1 2 3 4 6 7 8 9 10
end;
```
**5. Break**
功能：立即退出循环。
示例：
```delphi
var
i: Integer;
begin
for i := 1 to 10 do
begin
if i = 5 then
Break;
Write(i:2);
end;
// 输出 1 2 3 4
end;
```
**6. Exp(x: Extended): Extended**
功能：计算e的x次方。
示例：
```delphi
var
x: Extended;
begin
x := Exp(1);
// x 的值是 e (大约 2.71828)
end;
```
**7. FloatToStrF(num, FormatType, Width, Decimals, OutStr: string): string**
功能：将浮点数num转换为格式化的字符串OutStr。
示例：
```delphi
var
num: Extended;
s: string;
begin
num := 123.456;
s := FloatToStrF(num, ffFixed, 10, 2, '');
// s 的值是 "123.46"
end;
```
**8. TryEncodeDate(year, month, day: Word): TDateTime**
功能：尝试根据给定的年月日创建一个Delphi日期时间。如果日期无效，则返回0。
示例：
```delphi
var
dt: TDateTime;
begin
dt := TryEncodeDate(2023, 4, 32);
// dt 的值是 0，因为4月没有32天
end;
```
以上列举了Delphi中一些常用的函数及其使用示例，这些函数覆盖了数学、日期时间、字符串处理、文件操作以及内存管理等多个方面，对于开发基于Delphi的应用程序来说非常有用。在实际开发过程中，可以根据具体需求选择合适的函数来实现所需的功能。
