导航
  • 主页
  • API 调用
  • 基础类
  • 控件与界面
  • 数据库相关
  • DataWindow
  • 项目管理
  • Web 应用
  • 脚本语言

关于pb读取txt文件中指定位置字符的问题。

mitaro 2003-12-10 09:16:46
请问谁有实现以下功能的PB代码?

读取文本文件中某行第几个到第几个字符到string变量
...全文
252 点赞 收藏 6
写回复
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
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
回复
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)
回复
CodeMagic 2003-12-10
这点问题都解决不了,还写什么程序,不行的话,明天中午给你个程序。
回复
mitaro 2003-12-10
依照你的指示看了一下pb8参考手册,要实现起来很复杂很复杂。我快昏死了。
回复
klbt 2003-12-10
没有现成的,只能自己编码,用fileread函数,行模式
回复
发动态
发帖子
PowerBuilder
创建于2007-09-28

814

社区成员

PowerBuilder 相关问题讨论
申请成为版主
社区公告
暂无公告