مجموعة اسالة

السلام عليكم

بالنسبة للتعامل مع MySQL كان هناك موضوع سابق بسيط كان يتحدث عنها وعن التعامل مع الرجستري لكن حذفت الملفات من سوء الحظ :S :angry:

بكل الأحوال في الرابط ملف بحجم ( 4.947 م ) فيه المشروع كامل مع أدواته و يحتوي على ملف نص فيه شرح الخطوات للعمل على المشروع الرجاء قرائته قبل البدء

ينقص المشروع

1- MySQL Server 5

2- MySQL GUI Tools

يمكن الحصول و التعرف على كيفية التعامل معهما من هنا

/index.php?showforum=171

رابط تحميل المشروع

http://www.4shared.com/file/77168174/56de83e1/mysqltest.html

رجاء أعذروني في حال ورود أي خطأ :blush:

و الأعلام عن الخطأ في حال وجوده لإجراء التعديل

أرجو الأستفادة و السلام ختام

بالنسبة للسؤال الأول

المنهج WriteComponent ل Stream يحفظ خصائص الكائن ولكن بصيغة ثنائية Binary ولتحويله إلى نص ObjectBinaryToText والعكس للقراءة

var
 mStream: TMemoryStream;
 sStream: TStringStream;
 S, S1: String;
begin
 mStream:= TMemoryStream.Create;
 mStream.WriteComponent(Panel1);
 mStream.Seek(0, soFromBeginning);
 sStream:= TStringStream.Create(S);
 ObjectBinaryToText(mStream, sStream);
 sStream.Seek(0, soFromBeginning);
 S1:=sStream.DataString;
 Memo1.Text:= S1;
end;

حسين طي كتب:

بالنسبة للسؤال الأول

المنهج WriteComponent ل Stream يحفظ خصائص الكائن ولكن بصيغة ثنائية Binary ولتحويله إلى نص ObjectBinaryToText والعكس للقراءة

var
 mStream: TMemoryStream;
 sStream: TStringStream;
 S, S1: String;
begin
 mStream:= TMemoryStream.Create;
 mStream.WriteComponent(Panel1);
 mStream.Seek(0, soFromBeginning);
 sStream:= TStringStream.Create(S);
 ObjectBinaryToText(mStream, sStream);
 sStream.Seek(0, soFromBeginning);
 S1:=sStream.DataString;
 Memo1.Text:= S1;
end;

هو مزبوط كلامك و انا وصلت لمرحلة حفظت العنصر و خصائصه و خصائص العناصر ضمنه قفت عند مشكلة حفظ أبناء الابناء

هلا وضعت محاولتك هنا

لاني ارى انه بما انك وصلت الى

اقتباس

هو مزبوط كلامك و انا وصلت لمرحلة حفظت العنصر و خصائصه و خصائص العناصر ضمنه قفت عند مشكلة حفظ أبناء الابناء

فلم يبقى إلا القليل من التنسيق فقط .

والله المستعان