文件名称:USplite
-
所属分类：
- 标签属性：
- 上传时间：2012-11-16
-
文件大小：672byte
-
已下载：0次
-
提 供 者：
-
相关连接：无下载说明：别用迅雷下载，失败请重下，重下不扣分！
介绍说明－－下载内容来自于网络，使用问题请自行百度
用接口实现的字符串分割函数，示例：
var
A: ISplite
I: Integer
begin
A := Splite( 1,2,3 , , )
for I := 0 to A.Count do
ShowMessage(A[I])
A.DoSplite( a b c , )
for I := 0 to A.Count do
ShowMessage(A[I])
end -Split string using interface functions, example: var A: ISplite I: Integer begin A: = Splite (' 1, 2,3' ,' ,' ) for I: = 0 to A. Count do ShowMessage (A [I]) A. DoSplite (' a b c' ,' ' ) for I: = 0 to A. Count do ShowMessage (A [I]) end
var
A: ISplite
I: Integer
begin
A := Splite( 1,2,3 , , )
for I := 0 to A.Count do
ShowMessage(A[I])
A.DoSplite( a b c , )
for I := 0 to A.Count do
ShowMessage(A[I])
end -Split string using interface functions, example: var A: ISplite I: Integer begin A: = Splite (' 1, 2,3' ,' ,' ) for I: = 0 to A. Count do ShowMessage (A [I]) A. DoSplite (' a b c' ,' ' ) for I: = 0 to A. Count do ShowMessage (A [I]) end
(系统自动生成,下载前可以参看下载内容)
下载文件列表
USplite.pas
1999-2046 搜珍网 All Rights Reserved.
本站作为网络服务提供者，仅为网络服务对象提供信息存储空间，仅对用户上载内容的表现方式做保护处理，对上载内容本身不做任何修改或编辑。