+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : مصادر دلفي مفتوحة تعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=14)
+--- الموضوع : برنامج رفع الصور ( مفتوح المصدر ) (/showthread.php?tid=4199)
برنامج رفع الصور ( مفتوح المصدر ) - onexite - 15-05-2012
السلام عليكم
برنامج رفع الصور الاصدار الاول
- الخصائص ملتي ثريدينق
- تحقق من كلمة واسم المرور ثغرة خطيرة في هذا الموقع ( xml/json)
- اضافة البرنامج الى المستكشف
- التحميل المتعدد
![[صورة: 20120108160510.png]](http://img507.imageshack.us/img507/1492/20120108160510.png)
البرنامج والكود سورس
كود :
http://www.mediafire.com/?q1k51a6l2qdqqhbملاحظة عند التعديل لا تنسوا حفظ الحقوق وشكرا !!
برنامج رفع الصور ( مفتوح المصدر ) - onexite - 25-05-2012
اسف هناك خطا صغير
قبل
Form1.Memo1.Lines.Add(img_up(Form1.lst1.Items.Strings[0],True)) ;
والصحيح هو
Form1.Memo1.Lines.Add(img_up(Form1.lst1.Items.Strings[i],True)) ;
برنامج رفع الصور ( مفتوح المصدر ) - onexite - 04-07-2012
في الفرم 3
اولا نعرف هذا المتغير العام
PHP كود :
var
Form3: TForm3;
coockie :string;
PHP كود :
coockie:= XMLDocument1.DocumentElement.ChildNodes['cookie'].Text;
PHP كود :
Data.AddFormField('cookie',coockie);
والان يمكنك الرفع الى عضويتك
برنامج رفع الصور ( مفتوح المصدر ) - Mr-HERO - 06-07-2012
شكرا لك بارك الله فيك
برنامج رفع الصور ( مفتوح المصدر ) - onexite - 23-08-2012
الصماتة تم الان تحديد الحجم الاقصى 500 صورة
هذا مفتاح غير محدود
كود :
BXT1Z35V8f6ee0522939d8d7852dbe67b1eb9595