>     for i := 0 to Dest.Size - 1 do
>       IntToHex(Dest.ReadByte, 2);

Personally, I'd write() the strings that come from inttohex, instead of
discarding them :_)
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to