2013/2/4 Vincent Snijders <[email protected]> > 2013/2/4 silvioprog <[email protected]>: > > 2013/2/4 David Knaack <[email protected]> > >> > >> I may not understand the scope of your question, but could you use the > >> swap function? > >> > >> http://www.freepascal.org/docs-html/rtl/system/swap.html > >> > >> Like so (edited in email, not compile checked): > >> > >> function ReadMWord(AStream: TStream): Word; > >> var > >> MW: Word > >> begin > >> AStream.Read(MW, SizeOf(Word)); > >> Result := Swap(MW); > >> end; > > > > > > Perfect! :) > > > > Thank you very much! > > Instead of swap, you may use beton, so that it works on big endian cpus > too: > http://www.freepascal.org/docs-html/rtl/system/beton.html > > Vincent >
Many thanks guy, worked like a charm too! :) I'll use BEtoN instead Swap. -- Silvio Clécio My public projects - github.com/silvioprog
-- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
