税控机输出的文本文件两列中间的字符是什么?或者说如何分割? 不是吧,我用ultraedit看那个字符是20(十六进制),但是我用#20分割却不行哦 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我以前做过同类的分割程序,首先你的判断不用判断这个占位符是什么,只要数据格式统一,你可以直接使用COPY函数,如果,数据格式不统一, 你直接进行比较: if Pos('这里的字符直接从文件里拷贝过来', str) > 0 then stemp := copy(str, 1, Pos('', str);如果,你一定要知道是什么符号,你可以这样:var f: TextFile; s, stemp: string;begin AssignFile(F, FileName); Reselt(F); Rewrite(F, s); stemp := s; //在此行打上断点,再查看s, 或stemp的值,如果是特殊字符 //系统会用‘#’+ 数字,显示。这样你就可以知道 //分割符是什么了。 // .........end; 谁有《深入delphi6网络编程》附带光盘源码 成都现在是JAVA C# C++ 的工作很好找,我不知道其他地方,我打算换种开发工具了 高手帮帮忙,fastreport边生成报表文件边传输到打印机 极度郁闷!放分! 我试了,可是不行呀。 菜单小问题!!!在线等待!!! 请问怎么在delphi 中调用 word SQLDirect components for Delphi6 正式版谁有? 请各位看看我的代码,哪里有错了? SQL语句改错 強烈推荐——一个老程序员的心里话 1(转) 关于DBGrid
首先你的判断不用判断这个占位符是什么,
只要数据格式统一,你可以直接使用COPY函数,
如果,数据格式不统一,
你直接进行比较:
if Pos('这里的字符直接从文件里拷贝过来', str) > 0 then
stemp := copy(str, 1, Pos('', str);如果,你一定要知道是什么符号,你可以这样:
var
f: TextFile;
s, stemp: string;
begin
AssignFile(F, FileName);
Reselt(F);
Rewrite(F, s);
stemp := s; //在此行打上断点,再查看s, 或stemp的值,如果是特殊字符
//系统会用‘#’+ 数字,显示。这样你就可以知道
//分割符是什么了。
//
.........
end;