السلام عليكم :
قمت بتخزين محتوى RichEdit في قاعدة بيانات SQL Server في حقل Nvarchar(max)
و عند استعادته الى نفس الكائن TRichEdit يختفي التنسيق و تضهر الاسطر بشيفرة rtf
مثال على ذلك : {\rtf1\fbidis\ansi\ansicpg1252\deff0\deflang1033{\fonttbl{\f0\fswis
ما هو الحل لإستدعاء محتوى الحقل بالتنسيق في الكائن RichEdit
وعليكم السلام ورحمة الله
كيف قمت باسترداد البيانات وعن طريق اي خاصية
هل مثلا عن طريق الخاصية Text
كود :
RichEdit.text:=Fieldname.asstring
لو كذلك لا ينفع هناك خاصية تقريبا تسمى RTF لاسترداد البيانات بهذا التنسيق او جرب الخاصية Lines
او استخدم المكون DBRichEdit
(03-01-2024, 03:18 PM)Delphi4Us كتب : [ -> ]لو كذلك لا ينفع هناك خاصية تقريبا تسمى RTF لاسترداد البيانات بهذا التنسيق او جرب الخاصية Lines
او استخدم المكون DBRichEdit
السلام عليكم :
أنا استخدم دلفي 2010 و خاصية RTF لم أجدها ضمن خاصية Lines اما فيما يخص DBRichEdit تعمل بشكل صحيح
- قمت بتحويل النص الى Stream و استخدمت الخاصية Lines.LoadFromStream ونجح الأمر .
مشكور كل من تفاعل من أجل المساعدة .
الدالة المستخدمة :
كود :
function StringToStream(const AString: string): TStringStream;
begin
Result := TStringStream.Create(AString);
end;
procedure TMainForm.FileOpen(Sender: TObject);
var MyStream: TStringStream;
begin
MyStream:= StringToStream(T1RaportTxt.AsString);
Richedit.Lines.LoadFromStream(MyStream);
end;
جرب استخدام الطريقة التالية مباشرة
كود :
Richedit.Lines.Add(T1RaportTxt.AsString)
في جدول الخصائص للمكون RichEdit ابحث عن PlainText و اجعلها False يبدو انه تم العبث بها دون انتباه..