var
str:String;
begin
length(Str);//length of a string
end;
str:String;
begin
length(Str);//length of a string
end;
解决方案 »
- Delphi编写的DLL文件,如何在入口点函数里返回false
- 求助:代码行数问题
- 求助,stringgrid如何编辑指定的列
- 大家帮忙.谢谢!..(急急急急急)
- 用Delphi的DBExpress连接MySQL,提示"Unable to Load LIBMYSQL.dll."
- 如何用dbgrid实现下面的功能啊?谢谢!
- 问一个集合运算问题.
- 在线等待:模式窗口会不会影响它后面的主窗口接收消息和处理消息?多谢!
- 前10位有分。override和overload叫法
- 关于TlistView 的问题!
- 有谁做过“文物馆的文物或藏品综合管理系统”如能提供资料或动者!本人感谢!
- 关于DBGRID的小问题。
这样试试吧:
var
i:integer;
C:AnsiChar;
Str:String;
begin
i:=SizeOf(C)*(length(Str)+1);
end;
C为每个String中的字符的大小,乘上Length(Str)+1为总的字符个
(String变量的第0个单元被占用了,也应该算上)
如果你在实际应用中使用的是string类型,而编译开关用的是默认的话,则你在使用Ansistring,string类型时length返回的为该字符串的字节数.如果你使用的是widestring类型则返回的就不是字节数,而是字符个数了.当然你可以用sizeof测试一下该类型是几个bite的,然后再作处理也可.