取字符串长度的函数是什么,我忘了。 AnsiString a;int length=a.length() 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 取子串是substring(s:string ,i:int,j:int); ansistring aint b=a.length() Length引用单元:System函数声明:function Length(S):Integer;例子:Procedure TForm1.Button1Click(Sender:TObject);var Str:String;beginStr:='我爱Delphi';//中文算两个字节,有空格的话空格也算showmessage(InttoStr(length(Str)));end; vara:string;b:integer;begina:='this is a string,ha ha';b:=length(a);//取出a长度edit1.text:=inttostr(b);end; Length引用单元:System函数声明:function Length(S):Integer;例子:Procedure TForm1.Button1Click(Sender:TObject);var Str:String;beginStr:='我爱Delphi';//中文算两个字节,有空格的话空格也算showmessage(InttoStr(length(Str)));end; length(str:string);StrLen(const Str: PChar) 怎么返回多个pchar 呢??? 实在没办法了,求助delphi连接sql server问题 CB和Delphi能装在一个目录下? delphi中除四舍五入函数外,有没有一入的函数? 如何使用dcc32来编译包? 如何令窗体在移动到最左边之后不再左移动 为什么我用RAVE做出来的报表不能显示数据 其实你不懂我的心 50分,问很简单的alter语句 请教关于cxgrid的用法? 如何调用包中的函数? 关于SQL的问题
int b=a.length()
引用单元:System
函数声明:function Length(S):Integer;
例子:
Procedure TForm1.Button1Click(Sender:TObject);
var Str:String;
begin
Str:='我爱Delphi';//中文算两个字节,有空格的话空格也算
showmessage(InttoStr(length(Str)));
end;
a:string;
b:integer;
begin
a:='this is a string,ha ha';
b:=length(a);//取出a长度
edit1.text:=inttostr(b);
end;
引用单元:System
函数声明:function Length(S):Integer;
例子:
Procedure TForm1.Button1Click(Sender:TObject);
var Str:String;
begin
Str:='我爱Delphi';//中文算两个字节,有空格的话空格也算
showmessage(InttoStr(length(Str)));
end;
StrLen(const Str: PChar)