2018-05-14 11:46 GMT+02:00 Torsten Bonde Christiansen <t...@epidata.info>:

> SetLength(NewArray, Length(OldArray));
> for i := Low(OldArray) to High(OldArray) do
>   NewArray[i] := OldArray[i];
>

you can just use :

NewArray := Copy(OldArray);

looks better ;)

-- 
Best regards,
Maciej Izak
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Reply via email to