Amir--- via fpc-pascal wrote:
Hi all,
I have a List of record, where the record has a WideString field.
I have some code like the following:
function check(constref v: TMyRecord; data: TListOfMyRecord): Boolean;
var
r: TMyRecord;
begin
Result := False;
for r in data do
if r.State = v.State then
Exit(True);
end;
I call this method a lot and the CPU profiling shows a lot of cpu time
spent on "fpc_copy_proc" (which I assume is doing the deep copy on
records) from "TCustomListEnumerator.GetCurrent".
I considered other alternatives like using enumerators but they all need
a to return a record (and hence copying the widestring field).
I can think of two solutions to get rid of the wasting(!) so much time
on "fpc_copy_proc":
1) Changing the TMyRecord to TMyClass. But then I need to Create and
Free a "lot" of objects.
2) Update TListOfMyRecord to TListOfPointerToMyRecord. This requires a
"lot" of memory allocation/fragmentation.
Is there a better solution?
Pass the data parameter by reference.
Regards,
Adriaan van Os
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
