galg

طيب ياخوي وش فايدة الكود التالي واين يوضع Text1.Text = Mid(CommonDialog1.Path, 1, InStrRev(CommonDialog1.Path, "\")) Text2.Text = Mid(CommonDialog1.Path, InStrRev(CommonDialog1.Path, "\") + 1)

السلام عليكم ورحمة الله وبركاته اخواني اريد كود يقوم بحفظ ماكتب في التكست بضغطة زر وبأسم محدد في تكست متواجد في البرنامج يعني لا يقوم بفتح CommonDialog1 بل يحفظه تلقائيا في تكست طبعا يتم تحديد مسار الحفظ مسبقا والصوره المرفقه توضح اكثر في انتظاركم اخواني..

انا سمعت ان البرنامج لايدعم العربيه فهل هذا صحيح...!!

هذي اول مشاركه لي ولا احد جاااوب علي..؟؟ العلم ليس احتكاااااار

ما احد يعرف الكوود..!؟؟ لأأإ خيـر في كـاتم العلـــــــم

الحل كامل بالمرفقات دعوااتك ___________4_.rar

السسلام عليكم ورحمة الله وبركاته انا لديه فكره عن برنامج لكنني أحتاج لكودين الاول يقوم بأستعراض الجهاز..للبحث عن الخطوط فقط" TrueType Font file " مع امكانية فتح اكثر من خط .."اذا امكن" ويقوم بفتح مسار الخط بتكست.. والكود الثاني اضعه في زر يقوم بنقل لخط الى مجل…

لدي كود يقوم باستعراض الخطوط التي بالجهاز لكن المشكله في بعض الخطوط تأتي صيغتها غير معروفه فالبرنامج يقفل على طول ابي اذا مريت على خط صيغته غير معروفه..يعطيني مسج يقول ان الخط صيغته غير معروفه الكود Private Sub cmdCollectFonts_Click() ' جعل مؤشر الفارة في وضع …