虚心求教：Delphi中的字符串操作函数有哪些(刚从VB转为Delphi)

Question

Copy
Pos
另外JEDI中有一堆关于字符串操作的函数。在www.delphi-jedi.org

Answer 1

我倒是写了一些，请参考：////////////////////////////////////////
// 功能：返回字串左边指定的字符的
// 参数：
// s:     目标串
// Count: 返回的字符数
// 返回值：返回子串
// 日期：2001/6/12
////////////////////////////////////////
Function myLeft(s:string;Count:integer):string;
begin
    Result:=copy(s,1,Count);
end;////////////////////////////////////////
// 功能：返回字串右边指定的字符的
// 参数：
// s:     目标串
// Count: 返回的字符数
// 返回值：返回子串
// 日期：2001/6/12
////////////////////////////////////////
Function myRight(s:string;Count:integer):string;
var
    iLen:integer;
begin
    iLen:=length(s);
    Result:=copy(s,iLen-Count+1,Count);
end;////////////////////////////////////////////////////
// 功能：返回字串指定位置指定个数的字符
// 参数：
// s:     目标串
// Index: 开始的位置
// Count: 返回的字符数
// 返回值：返回子串
// 日期：2001/7/7
////////////////////////////////////////////////////
Function myMid(s:String;Index,Count:integer):String;
Begin
    Result:=Copy(s,Index,Count);
end;////////////////////////////////////////////////////
// 功能：返回字串反向指定位置指定个数的字符
// 参数：
// s:     目标串
// Index: 开始的位置
// Count: 返回的字符数
// 返回值：返回子串
// 日期：2001/7/7
////////////////////////////////////////////////////
Function myMidTurn(s:String;Index,Count:integer):String;
var
    i:integer;
    long:integer;
Begin
    try
       long:=length(s);
        if Index+(count-1)>=long then count:=long-Index+1;
        i:=long-(Index-1)-(Count-1);
        Result:=Copy(s,i,Count);
    except
        result:=s;
    end;
end;VB 的 InStr 可用 Pos 代替

Answer 2

帮助文件里查,一堆
string functions, MBCS

Answer 3

Pos, Insert, Delete, SetLength, Copy
还有就是String其实是一个Char数组，所以可以用for,while来循环访问它里面的每个字符。
for I:=1 to length(S) do
 //do some thing

Answer 4

感谢各位热心人，谨代表VB向Delphi问好！！
CSDN人气就是不一样，这里让我感觉温暖！

Answer 5

fillchar 函数 用指定的值填充连续字节的数 
length 函数 返回字符串的动态长度 
str 函数 将数值转换为字符串
stralloc 函数 给以null结束的字符串分配最大长度-1的缓冲区 
strbufsize 函数 返回存储在由stralloc分配的字符缓冲区的最大字符数 
strcat 函数 将一字符串附加到另一字符串尾并返回合并的字符串 
strcomp 函数 比较两个字符串 
strcopy 函数 将一个字符串复制到另一个字符串中 
strdispose 函数 释放堆栈上的字符串 
strecopy 函数 将一字符串复制到另一个字符串并返回结果字符串尾部的指针 
strend 函数 返回指向字符串尾部的指针 
stretch 属性 自动适应控件的大小 
strfmt 函数 格式化一系列的参数 
stricomp 函数 比较两个字符串（不区分大小写） 
stringReplace 替换字符串
stringtowidechar 函数 将ansi字符串转换为unicode字符串 
strlcat 函数 将一字符串中的字符附加到另一字符串尾并返回合并的字符串 
strlcomp 函数 以最大长度比较两个字符串 
strlcopy 函数 将一个字符串中的字符复制到另一个字符串中 
strlen 函数 返回字符串中的字符数 
strlfmt 函数 格式化一系列的参数，其结果中包含有指向目标缓冲区的指针 
strlicomp 函数 以最大长度比较两个字符串（不区分大小写） 
strlower 函数 将字符串中的字符转换为小写 
strmove 函数 将一个字符串中的字符复制到另一个字符串中 
strnew 函数 在堆栈上分配一个字符串 
strpas 函数 将以null结束的字符串转换为pascal类的字符串 
strpcopy 函数 将pascal类的字符串复制为以null结束的字符串 
strplcopy 函数 从pascal类的最大长度字符串复制为以null结束的字符串 
strpos 函数 返回一个字符串在另一个字符串中首次出现指针 
strrscan 函数 返回字符串中最后出现字符的指针 
strscan 函数 返回字符串中出现首字符的指针 
strtodate 函数 将字符串转换为日期格式 
strtodatetime 函数 将字符串转换为日期/时间格式 
strtofloat 函数 将给定的字符串转换为浮点数 
strtoint 函数 将字符串转换为整型 
strtointdef 函数 将字符串转换为整型或默认值 
strtotime 函数 将字符串转换为时间格式 
strupper 函数 将字符串中的字符转换为大写 
stringreplace()函数 替换选定的字符
upcase 将字符转换为大写 
uppercase 将给定的字符串变为大写 
trim 函数 从给定的字符串中删除前导和尾部的空格及控制字符 
trimleft 函数 从给定的字符串中删除首部的空格及控制字符 
trimright 函数 从给定的字符串中删除尾部的空格及控制字符 
widecharlentostring 函数 将ansi字符串转换为unicode字符串 
widecharlentostrwar 函数 将unicode字符串转换为ansi字符串变量 
widechartostring 函数 将unicode字符串转换为ansi字符串 
widechartostrvar 函数 将unicode字符串转换为ansi字符串变量