dbf_idxfile.pas
1.
[code]
procedure TIndexFile.Open;
FCurrentParser.ParseExpression(String(PIndexHdr(FIndexHeader)^.KeyDesc));
[/code]
It seems OK.
2.
[code]
procedure TIndexFile.ReadIndexes;
FParsers[I].ParseExpression(PIndexHdr(FIndexHeader)^.KeyDesc);
[/code]
Why not?
[code]
FParsers[I].ParseExpression(PIndexHdr(FIndexHeader)^.KeyDesc);
[/code]
3.
[code]
procedure TIndexFile.CreateIndex(FieldDesc, TagName: string; Options: TIndexOptions);
TempParser.ParseExpression(String(FieldDesc));
[/code]
Is cast String to String is necessary?
4.
[code]
procedure TIndexFile.CreateIndex(FieldDesc, TagName: string; Options: TIndexOptions);
TempParser.ParseExpression(String(FieldDesc));
[/code]
Is cast String to String is necessary?
Indeed, these casts to string are not required. I just committed the modified code.