Delphi中如何处理超过255字节的字符串。。。

zjwzzhy 2002-01-17 11:42:19

Delphi中如何处理超过255字节的字符串。。。　String类型最大255字节，如果超过255字节，应该如何处理，望高手指点。。。。

...全文

343 6 打赏收藏转发到动态举报

写回复

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

zjwzzhy 2002-01-18

打赏
举报

回复

先给分，明天再试试。。。　

王集鹄 2002-01-17

打赏
举报

回复

{$H+}
{$H+}
{$H+}
{$H+}
{$H+}

王集鹄 2002-01-17

打赏
举报

回复

{$H+}
const
S: string =
'12345678901234567890123456789012345678901234567890' +
'12345678901234567890123456789012345678901234567890' +
'12345678901234567890123456789012345678901234567890' +
'12345678901234567890123456789012345678901234567890' +
'12345678901234567890123456789012345678901234567890' +
'12345678901234567890123456789012345678901234567890' +
'12345678901234567890123456789012345678901234567890';

zjwzzhy 2002-01-17

打赏
举报

回复

不是吧，我声明的时候没有用shortstring,只是用string,然后我将大于255字节的字符串赋值给它，就无法编译，提示字符串长度超过255

王集鹄 2002-01-17

打赏
举报

回复

const
S =
'1234....常量太长' +
'....就换行加5678';

王集鹄 2002-01-17

打赏
举报

回复

string没有255长度的限制
除非是ShortString

Delphi中处理字符串的相关方法 1、字符集转换方法 (1）stringtowidechar function stringtowidechar(const source:string;dest :pwidechar;destsize :integer) :pwidechar; 将默认string类型的字符串转换为unicode编码的字符串。dest参数指定了保存目的串的缓冲区位置 (2）widecharlentostring function widecharlentostring(source :pwidechar;sourcelen :integer) :string; 将sourcelen长度的unicode编码字符串转换为单字节或多字节字符串。实际的转换是通过调用win32 API函数

字符串处理单元，完全兼容宽字节处理（即使用wideString），特有的中文字符串处理函数（如简繁转换等等），经过多次优化，大多以编表的方式进行处理（一般来说是最快的处理方式）。

Delphi判断双字节，用法简单，在窗口输入框中输入字符串，单击按钮即可，程序会判断出是否包含有双字节字符，判断方法请看下边的代码段：　　s := Edit1.Text; 　　i := 0; 　　while i　　begin 　　 if (ByteType(S,i) mbSingleByte) then 　　 begin 　　 s1 := s1 copy(s,i,2) ' '; 　　 i := i 2; 　　 end 　　 else 　　 i:= i 1; 　　end; 　　label2.Caption := trim(s1);

Delphi 判断字符串中是否有中文，这个挺有意思，也很实用的技巧，在一串字符中判断是否有中文文字，根据所点字节都可以判断，不过本源码中所使用的方法也很有参考性，最终的运行示例效果如截图所示。

摘要:Delphi源码,字符处理,字符统计 Delphi在一段文字中分别统计中文字符和英文字符个数，程序智能判断是中文还是英文字符，并把各自的统计结果显示出来，主要是用一个for循环遍历字符串，逐一通过调用ord函数将所有字符转换为对应的数值,再通过Length来判断各个字节所对应的字符数值是否在33～126之间，从而区分出是英文或是中文，然后下一步就好操作了，直接过滤出大于127的为中文、33～126之间的为英文，并返回到窗体的控件上显示。运行环境：Windows/Delphi7

5,388

社区成员

262,729

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章