Re: Hex zur ü ckverwandeln

[Andy Fuchs <andy at foxwerk dot de>]

Hi Mike,

  for i = 1 to  CountFields(sOut," ")
    sOrig = sOrig + Chr(Val("&h" + NthField(sOut," ",i)))
  next

Funktioniert halt (wie dein Hinweg) nur mit SingleByte Characters

-- Andy Fuchs


> From: Mike Ott <mike at psb-info dot ch>
> Reply-To: REALbasic NUG German <realbasic-nug dot de at lists dot 
> realsoftware dot com>
> Date: Fri, 16 Dec 2005 22:58:10 +0100
> To: REALbasic-NUG German <realbasic-nug dot de at lists dot realsoftware dot 
> com>
> Conversation: Hex zurückverwandeln
> Subject: Hex zur ü ckverwandeln
> 
>   for i = 1 to LenB(myString)
>     sOut = sOut + RightB("00"+Hex(AscB(MidB(myString,i,1))),2) + " "
>   next