Am 12.06.2010 um 13:11 schrieb Robert Lehner: > Hallo, > > wie sucht man einen 4-stelligen hexadezimalen Wert?
Also das hier funktionier schon einmal: dim r as RegExMbs dim s as string dim c as integer s="123 äöü ABC 456" r=new RegExMBS if r.Compile(".ö.") then c=r.Execute(s,0) MsgBox str(c)+" "+str(r.Offset(0))+" "+str(r.Offset(1)) // shows: 1 4 10 // 1 for ubound of the offset array // 4 for 4 bytes before the matched pattern // 10 for the 10 bytes before the end of the matched pattern end if r=new RegExMBS if r.Compile(".\xF6.") then // finds ö using Unicode codepoint c=r.Execute(s,0) MsgBox str(c)+" "+str(r.Offset(0))+" "+str(r.Offset(1)) // shows: 1 4 10 // 1 for ubound of the offset array // 4 for 4 bytes before the matched pattern // 10 for the 10 bytes before the end of the matched pattern end if Gruß Christian -- Neuigkeiten zu unseren Plugins finden Sie bei uns im Blog: http://www.mbsplugins.de/