> 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