Ich bekomme hier noch die Kriese :-( Ich habe weiternin mit dem Encoding rumgespielt:
dim b as Boolean dim s as string Window1.Title=key //####> komischerweise Title.Encodings=nil s=Window1.Title.ConvertEncoding(Encodings.UTF8) s=DefineEncoding(key,Encodings.UTF16 ) //####> jetzt hat s immernoch nur ein Byte (ich hätte zwei erwartet) aber es ist das richtige Zeichen s=ConvertEncoding(s,Encodings.UTF8) //####> s ist jetzt leer, 0 Bytes länge , Enconig US-ASCII :-( b=addGray(s) return b Was passt an s=ConvertEncoding(s,Encodings.UTF8) nicht? Oder liegt es daran, dass s in UTF16 nur ein Byte lang ist? MfG, Metti.
