814
社区成员
- 主页
- API 调用
- 基础类
- 控件与界面
- 数据库相关
- DataWindow
- 项目管理
- Web 应用
- 脚本语言
...全文
请发表友善的回复…
发表回复
likecoco99 2003-12-11
学习~~~~~~~
poemlake 2003-12-11
我翻了pfc，找到了一个实现在办法
用到的对象n_base pfc_n_base pfc_n_cst_string n_cst_string
函数of_parsetoarray( as_source,as_delimiter, string as_array)
这个函数的功能是把一个长字符串按分隔符分成数组，你所要的第n行的字符就是as_array[n]
然后再通过mid取出 as_array[n]中的某个字符。
具体实现方法，你得到整个文件的字符串，把字符串传给上面的函数的参数as_source，然后，你取出一行，看一看分隔符是什么，把分隔符再传给上面的函数的as_delimiter,定义一个数组as_array，上面的函数会把字符按分隔符分成数组存入as_array
用到的对象n_base pfc_n_base pfc_n_cst_string n_cst_string
函数of_parsetoarray( as_source,as_delimiter, string as_array)
这个函数的功能是把一个长字符串按分隔符分成数组，你所要的第n行的字符就是as_array[n]
然后再通过mid取出 as_array[n]中的某个字符。
具体实现方法，你得到整个文件的字符串，把字符串传给上面的函数的参数as_source，然后，你取出一行，看一看分隔符是什么，把分隔符再传给上面的函数的as_delimiter,定义一个数组as_array，上面的函数会把字符按分隔符分成数组存入as_array
CodeMagic 2003-12-11
给你实现代码：
String Str,Final_Str
Int Handle,Row,From_Pos,To_Pos,i
//变量说明:Row代表要取字符串所在的行数，From_Pos代表字符串的起始位置
//To_Pos代表字符串的终止位置，Final_Str存放最终要得到的字符串
i=0
Handle=FileOpen('文件名称',LineMode!,Read!)
If Handle=-1 Then Return
Do While True
If FileRead(Handle,Str)<0 Then
MessageBox('Error','所要的行不存在')
Return
End If
i++
If i=Row Then Exit
Loop
Final_Str=Mid(Str,From_Pos,To_Pos -From_Pos+1)
String Str,Final_Str
Int Handle,Row,From_Pos,To_Pos,i
//变量说明:Row代表要取字符串所在的行数，From_Pos代表字符串的起始位置
//To_Pos代表字符串的终止位置，Final_Str存放最终要得到的字符串
i=0
Handle=FileOpen('文件名称',LineMode!,Read!)
If Handle=-1 Then Return
Do While True
If FileRead(Handle,Str)<0 Then
MessageBox('Error','所要的行不存在')
Return
End If
i++
If i=Row Then Exit
Loop
Final_Str=Mid(Str,From_Pos,To_Pos -From_Pos+1)
CodeMagic 2003-12-10
这点问题都解决不了，还写什么程序，不行的话，明天中午给你个程序。
mitaro 2003-12-10
依照你的指示看了一下pb8参考手册，要实现起来很复杂很复杂。我快昏死了。
klbt 2003-12-10
没有现成的，只能自己编码，用fileread函数，行模式