在delphi中使用PerlRegEx的问题
代码如下：
Delphi(Pascal) code:
for i := 0 to 49 do
begin
reg.Subject := List[i];
reg.RegEx := '"';
reg.Replacement := '';
reg.ReplaceAll;
end;
因程序需要，我想替换List这个数组中所有元素的双引号。但是reg.Subject始终都是List[0]的值，请问是什么原因呢？
怎么没看到把reg.subject更新到list里
for i := 0 to 49 do
begin
reg.Subject := List[i];
reg.RegEx := '"';
reg.Replacement := '';
reg.ReplaceAll;
List[i]:= reg.Subject; // <- 更新
label1.caption:= inttostr(i); // <- 测试循环
end;
具体代码如下：
Delphi(Pascal) code:
procedure GetList();
var
MyStr:String;
reg: TPerlRegEx;
regs: TPerlRegEx;
regd: TPerlRegEx;
regss: TPerlRegEx;
List: TStrings;
Lists: TStrings;
i: Integer;
begin
reg := TPerlRegEx.Create(nil);
regs := TPerlRegEx.Create(nil);
regd := TPerlRegEx.Create(nil);
regss := TPerlRegEx.Create(nil);
List := TStringList.Create;
Lists := TStringList.Create;
//MyStr是一个网页里
相关问答：
接收到的文本内容是ucs2编码格式，请问怎样转换成中文
按我的理解，UCS-2是字符集，具体的编码有UTF-8，UTF-16 (LE/BE)等。
如果你用Delphi 2009及以上版本，可以看看TEncoding类。
btw. 你说的转换成中文是啥意� ......
昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下：
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......
我在出库窗口写了个方法：ADOQueryBill 的bNum 字段的OnValidate方法 实现的是出库数量不能大于入库的数量，否则就重新输入数量，以下是我的代码：
procedure TFrmStockOut.ADOQueryBillbNum_Validate(Sender: TFie ......
我在网上找了个关于IEBHO的代码，然后按照哪个设置了，后来运行的时候出现
构建
[警告] Project2.dpr(14): File not found: 'MYbho.TLB'
[警告] Project2.dpr(16): File not found: 'MYbho.RES'
......
我在网上找了个关于IEBHO的代码，然后按照哪个设置了，后来运行的时候出现
[错误] Unit1.pas(15): Undeclared identifier: 'GetTypeInfoCount'
[错误] Unit1.pas(15): Undeclared identifier: 'GetTypeInfo ......
