|
@@ -146,7 +146,7 @@ var
|
|
str : string;
|
|
str : string;
|
|
begin
|
|
begin
|
|
i := LOWSTR;
|
|
i := LOWSTR;
|
|
- idx := 0;
|
|
|
|
|
|
+ idx := LOWSTR;
|
|
count := 0;
|
|
count := 0;
|
|
Result := TMultiExpression.Create;
|
|
Result := TMultiExpression.Create;
|
|
exp := aExpression.TrimLeft;
|
|
exp := aExpression.TrimLeft;
|
|
@@ -176,8 +176,8 @@ begin
|
|
if (rexp.Combine = TCombine.coNone) and not (exp.IsEmpty) then raise ENotValidExpression.Create('Not valid expression defined!');
|
|
if (rexp.Combine = TCombine.coNone) and not (exp.IsEmpty) then raise ENotValidExpression.Create('Not valid expression defined!');
|
|
//add to multiexpression
|
|
//add to multiexpression
|
|
Result.Add(rexp);
|
|
Result.Add(rexp);
|
|
- idx := 0;
|
|
|
|
- i := -1;
|
|
|
|
|
|
+ idx := LOWSTR;
|
|
|
|
+ i := 0;
|
|
end;
|
|
end;
|
|
Inc(i);
|
|
Inc(i);
|
|
end;
|
|
end;
|