29-08-16, 04:09 PM
تقييم الموضوع :
[مثال] برنامج تخزين الصور في قاعدة بيانات في Lazarus
|
تم الشكر بواسطة: Amir_Alzubidy
(29-08-16, 02:42 PM)abulayth كتب : شكرا جزيلا أخي . هدفي من البرنامج ليس عمل برنامج متكامل فكل واحد يضيف له ما يراه مناسب لاحتياجاته أردت توضيح فكرة تخزين الصور في قاعدة البيانات على شكل
data و ليس رابط كما يفعل البعض و بالنسبة للحفظ عل القرص يمكن ان تضيف مكون SavePictureDialog1 و زر و تكتب فيه الكود :
كود : procedure TFormMain.Button1Click(Sender: TObject); أما بالنسة لتخزين الأيقونات يمكن استثناءها بعملية فلترة في المكون OpenPictureDialog1
تم الشكر بواسطة: abulayth , أبوبكر سويدان , أبوبكر سويدان , Amir_Alzubidy
29-08-16, 04:27 PM
السلام عليكم
بعد اذن اخي ابو ناصر نوع قاعدة البيانات sqlite اما اسم قاعدة البيانات mydb.db وهذا مثال لكود الاضافة من نفس البرنامج PHP كود : Stream := TMemoryStream.Create; وايضا تستطيع استخدام قواعد بيانات access + Mysql يعطيك العافية (( يَا أَيَّتُهَا النَّفْسُ الْمُطْمَئِنَّةُ ارْجِعِي إِلَى رَبِّكِ رَاضِيَةً مَرْضِيَّةً فَادْخُلِي فِي عِبَادِي وَادْخُلِي جَنَّتِي ))
تم الشكر بواسطة: Amir_Alzubidy
(29-08-16, 04:09 PM)سعود كتب :(29-08-16, 03:59 PM)abulayth كتب : السلام عليكم قاعدة البيانات هي من نوع SQLite3 و البرنامج الذي استعمله هو المحرر SQLiteMaestro أخي سعو د يمكنك بالمحرر SQLiteMaestro انشاء قاعدة البيانات أو الاتصال بها و اجراء تعديلات عليها و اضافة بيانات رابط تحميل المحرر [url= https://www.sqlmaestro.com/products/sqlite/maestro][/url]https://www.sqlmaestro.com/products/sqlite/maestro/ تم الشكر بواسطة: أبوبكر سويدان
29-08-16, 11:22 PM
ما شاء الله على الشباب... منورين والله.
تم الشكر بواسطة: Amir_Alzubidy , Amir_Alzubidy
31-08-16, 06:12 PM
ABuLayth
يا جدي اللي في الصورة فورم والا messagebox مع انه اغلب ضني انها MessageBox اللي خلاني افكر وجود الايقونات على زري OK & Cancel ???????????????????????? سبحان الله والحمدلله ولا إله إلا الله والله أكبر
اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
تم الشكر بواسطة: abulayth , Amir_Alzubidy
31-08-16, 07:10 PM
ماشي يا جدو هاي msgbox من النظام
واظن انه نظام رائع لانه يعمل على كل الانظمة بما فيها Linux يعطيك العافية (( يَا أَيَّتُهَا النَّفْسُ الْمُطْمَئِنَّةُ ارْجِعِي إِلَى رَبِّكِ رَاضِيَةً مَرْضِيَّةً فَادْخُلِي فِي عِبَادِي وَادْخُلِي جَنَّتِي ))
تم الشكر بواسطة: أبو عمر , أبوبكر سويدان , Amir_Alzubidy
نعم هي msgbox من Lasarus مصصمة هكذا .
بالنسبة للازاروس شبيهة جدا جدا بالدلفي من ناحية الأكواد فهما يعملان تحت منصتين مصممتين بلغة باسكال هما توربو باسكال و فري باسكال و من لديه خبرة في الدلفي لن يجد صعوبة في لازاروس تم الشكر بواسطة: abulayth , abulayth , أبوبكر سويدان , Amir_Alzubidy , Amir_Alzubidy
19-11-16, 12:20 AM
ماذا لو أحببنا عرض الصورة في تقرير Lazreport؟
تم الشكر بواسطة: Amir_Alzubidy
(19-11-16, 12:20 AM)أبوبكر سويدان كتب : ماذا لو أحببنا عرض الصورة في تقرير Lazreport؟ السلام عليكم و رحمة الله ، أولا أعتذر عن انقطاعي عن المنتدى بسبب ظروف شغلي أما بالنسبة لعرض الصورة في تقرير قبل ذلك فأستسمح أستاذنا أبو بكر أن يتضمن شرحي فكرة بسيطة عن اضافة و تصميم تقرير لكي تعم الفائدة و الذي سنخصص له ان شاء الله شرحا وافيا في احدى المشاركات ان سنحت الفرصة . 1 - نضيف لفورم المشروع الموجود في بداية المشاركة زر BUTTON1 لعرض التقرير و ومن التبويب LazReport نضيف المكونين frReport1 و frDBDataSet1 ونغير الخصائص من المحرر كمايلي : Button1.Caption الى عرض التقرير frReport1.Dataset الى frDBDataSet1 frDBDataSet1.DataSet الى Query حيث Query هو الاسم البرمجي للمكون SQLQuery في المشروع الأصلي الموجود في بداية المشاركة 2- نضغط ضغطا مزدوجا على المكون frReport1 لعرض مصمم التقارير و ندرج له : * band من نوع Page header و ندرج فوق هذا الباند عدد 2 من Rectangle Object نكتب في الأول النص : و صف الصورة و في الثاني النص عرض الصورة * و Band من نوع Master data ونغير له data source من [None] الى frDBDataSet1 و ندرج فوقه : - Rectangle Object و نكتب فيه الكود [Query.pictureDescription] و ذلك لربطه باسم حقل وصف الصورة في قاعدة البيانات ، Query تم شرحا آنفا - و Picture التي نضغط عليها ضغطا مزدوجا ثم نختار Memo و نكتب الكود [Query.pictureStore] و ذلك لربطها باسم حقل تخزين الصورة في قاعدة البيانات ثم نحفظ التقرير المصمم باسم report في مجلد المشروع و نغلق التقرير لنعود للفورم الرئيسية . 3 - نضغط ضغطا مزدوجا على زر عرض التقرير و نكتب الكود : frReport1.LoadFromFile('report.lrf'); frReport1.ShowReport; وأخيرا نحفظ المشروع . و عند تنفيذ البرنامج و عرض التقرير يظهر كما في الصورة تم الشكر بواسطة: abulayth , abulayth , أبوبكر سويدان
|
|
يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم