Hi Yes, Thats it almost exactly, I just need to convert to little endian, I think I can manage that! Thanks -pm
On Thu, Feb 21, 2019 at 10:45 PM Arnaud de Montard via 4D_Tech < [email protected]> wrote: > > > Le 21 févr. 2019 à 22:09, Peter Mew via 4D_Tech <[email protected]> > a écrit : > > > > Hi > > This is driving me mad, so I hope someone will point me in the right > > direction. > > I have a string of text. > > I can find its length in Hex. now I want to write this length as 4 hex > > bytes, into the string, with the aim of doing a text to blob, later on. > > If I just add the Hex Number to the string it takes 8 bytes > > (String+HexByte0+HexByte1+HexByte2+HexByte3) > > If I convert the Hex Numbers to decimal and Do > > String+char(DecByte0)+char(DecByte1) etc. > > It takes up 4 Bytes but the Numbers written to the string are wrong. > > Something like that? > > $hello:="hello world!" > $len:=Length($hello) > $hex:=String($len;"&x") > $hex:=Substring($hex;3) > $string:=$hex+$hello+"xxxxxxxxx" > C_BLOB($blb) > $charset:="utf-8" > CONVERT FROM TEXT($string;$charset;$blb) > $string2:=Convert to text($blb;$charset) > $offset:=4 > $hex2:=Substring($string2;1;$offset) > $len2:=hexaToDecimal ($hex2) > $hello2:=Substring($string2;$offset+1;$len2) > ASSERT($len2=$len) > ASSERT($hex2=$hex) > ASSERT($hello2=$hello) > > -- > Arnaud de Montard > > > > ********************************************************************** > 4D Internet Users Group (4D iNUG) > Archive: http://lists.4d.com/archives.html > Options: https://lists.4d.com/mailman/options/4d_tech > Unsub: mailto:[email protected] > ********************************************************************** ********************************************************************** 4D Internet Users Group (4D iNUG) Archive: http://lists.4d.com/archives.html Options: https://lists.4d.com/mailman/options/4d_tech Unsub: mailto:[email protected] **********************************************************************
