如何把文本文件里的所要取的数据取出来传到一个报表模板.(写好的)请大家给予帮助...谢谢(100)

varFileName:String;beginFileName='d:/123.txt';TextFile.LoadFromFile(FileName);end而且,我给你提供的代码并不是完成你问题的所有代码,只是核心部份,还需要你看懂消化后灵活应用。并且,你需要参考VBScript手册,因为正则表达式是由那个得来的。总之,正则表达式能完成从字符串找到你想要找到的任何东西及组合,看你如何应用它了,而且它的速度是相当之快的。很多有名的编辑软件都支持正则表达式。如EditPlus等。
 
哦.这么复杂.我没有想到.谢谢...这几天替领导出差学习去了.
 
VBScript是VB中使用的吧...在DELPHI中如何调用了?是不是也要在use 里加VBScript?
 
//字符串分割: Splitvar reg: TPerlRegEx; List: TStrings;begin List := TStringList.Create; reg := TPerlRegEx.Create(nil); reg.Subject := 'aaa,bbb,ccc,ddd'; reg.RegEx := ','; {这里可是运行相当复杂的分割符啊} reg.Split(List,MaxInt); {第一个参数读入的是 Subject; 第二个参数是分成多少份} { 输入一个最大整数, 表示能分多少就分多少} ShowMessage(List.Text); {返回: aaa bbb ccc ddd } FreeAndNil(reg); List.Free;end;
 
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,ComObj,activex,VBScript;加了,提示找不到[Fatal Error] Unit2.pas(7): File not found: 'VBScript.dcu'
 
顶部