المشاركات : 71
المواضيع 17
:
: 0
الإنتساب : Dec 2013
السلام عليكم
نجحت بفضل الله في قرائة به ملف xml في مكون ميمو1
و لكن بعض ملفات xml مشفرة بتكويد للغه أقصد utf-8 .. فلا يمكنني القرائة بحيث تظهر رموز غريبة
فكيف اجعل ميمو1 يقرأ التكويد ؟ و جزاكم الله خيرا و نفع الله بكم
المشاركات : 654
المواضيع 82
:
: 57
الإنتساب : Mar 2011
من DSiWin32.pas
PHP كود :
function UTF8Encode(const ws: WideString): UTF8String;
begin
if ws = '' then
Result := ''
else begin
SetLength(Result, Length(ws)*3); // worst case - 3 bytes per character
SetLength(Result, WideCharBufToUTF8Buf(ws[1], Length(ws)*SizeOf(WideChar),
Result[1]));
end;
end; { UTF8Encode }
function UTF8Decode(const sUtf: UTF8String): WideString;
var
leftUtf: integer;
begin
if sUtf = '' then
Result := ''
else begin
SetLength(Result, Length(sUtf)); // worst case - 1 widechar per character
SetLength(Result, UTF8BufToWideCharBuf(sUtf[1], Length(sUtf), Result[1], leftUtf)
div SizeOf(WideChar));
end;
end; { UTF8Decode }
المشاركات : 975
المواضيع 50
:
: 218
الإنتساب : Feb 2008
السلام عليكم
ماذا استخدمت لتحميل ملف xml ؟
و لرب نازلة يضيق لها الفتى ذرعا و عند الله منها المخرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج