Pharaonic_Guy
- سؤال في التعامل مع الملفات
يوجد ملحوظتان .. الأولي : عدم تعريف المتغير Var .. وبالتالي حلها Dim Var as string الثانية : طالما ستتعامل مع المود Binary فيجب حجز مخزن مناسب Buffer علي الأقل بحجم الملف ليتم وضع بيانات الملف به .. قبل استدعاء الدالة Get وحجم الملف تستطيع الحصول عليه بدالة Lo…
- مشكلة: الأصفار أختفت عند القراءة من ملف بإستخدام Get
2 هكس = 1 بايت جرب .. dim a as string Open file For Binary As #1 i = 11 ExisteCode = True While i < 2614 se = "" For j = i To i + 13 Get #1, j, List(j) a = Hex(List(j)) if len(a) = 1 then se = se & "0" & a else se = se & a end if Next List1.AddItem se i = i + …
- ما أنواع الملفات التي يسمح بها الفاجوال بيزك ؟؟
يمكن التعامل مع جميع الملفات في المود Binary .. ليه سؤالك ده ؟
- وداعاً فيجوال بسيك 6 أهلاً فيجوال بيسك 6
انا عملت باك اب من VB6.exe قبل تطبيقه لكن البرنامج شغال تمام .. وفعلا أيقونات جميلة تشكر أخ عبدالله .. ونتمني المزيد من الإبداع ..
- كيف استخرج الكلمات التي بين الاقواس من تكست بوكس
هل تريد كود جاهز أم تريد الفكرة ؟ /index.ph...st&id=35086
- ممكن موقع للأيقونات
مشكلة هذا الموقع أنه لن يدعم الاستكمال لمن سيقوم بالتحميل أيضا ..
- ممكن موقع للأيقونات
أحاول منذ أسبوعين رفع ملف حجمه 600 ميجا .. قمت بتجميع فيه حوالي 40,000 أيقونة .. يمكن استخدامهم في تصميم التطبيقات والويب .. ومن الأخر به معظم الأيقونات التي خرجت للبشرية بكل الأحجام .. ومعهم أقوي برنامج لتصميم الأيقونات وهو Microangelo المشكلة إني برفعهم FTP …
- (combo +x+.text)أضع مكانها ايه ؟؟؟؟؟
نعم حل المصفوفة أفضل ..
- ارجوكم ساعدوني
ما ينفعش تدخل باليوزر القديم لإن هذا الإداري عاملك Ban علي اليوزر ده .. حاول مراسلة المسئول الأول عن الموقع ليرفع البان عنك .. وسيستجيب لك لإنك عضو مهم ومؤثر ..
- ارجوكم ساعدوني
استخدم اي من الاتي : http://hrmovie.com/ http://anonymouse.org/anonwww.html هوه انت اتوقفت ستين يوم ليه ؟
- أمامك: محرك بحث عربي جديد على الإنترنت
هذه المرة يعتمد علي ياهو .. http://www.amamk.com/?search=%22%D8%B5%D8%...22&type=web http://search.yahoo.com/search?p=%22%D8%B5...ss&ei=UTF-8
- استفسار : كود حفظ صورة
قمت بعمل مثال لكيفية حفظ صورة واسترجاعها بالطريقة التقليدية .. http://rapidshare.com/files/36251971/PIC_ADO.rar.html
- شرح برنامج Inno Setup 5
مجهود رائع ... تشكر عليه
- (combo +x+.text)أضع مكانها ايه ؟؟؟؟؟
المثال التالي اللي انت كنت طلبته .. ازاي تعمل لوب في 8 أدوات كومبو وتعرف الأداة الحالية هي ايه وقيمتها ؟ Dim ctrl As Control For Each ctrl In Me.Controls If TypeOf ctrl Is ComboBox Then For i = 1 To 8 If ctrl.Name = "Combo" & i Then MsgBox "Current Control : "…
- (combo +x+.text)أضع مكانها ايه ؟؟؟؟؟
تمت الإضافة وفي انتظارك
- جهازي يعمل تسجيل خروج
ما دام تسجيل خروج عادي كأنك تقوم بعمل Shutdown فاكيد فيروس .. ربما أيضا قمت بتجربة أداة أو برنامج مقرصن .. عندك أداة OsenXP إذا حست أنه تمت قرصنتها فتقوم بهذه الحركة التي تتحدث عنها .. الحل .. أغلب الفيروسات تستخدم المفتاح Run .. في تشغيل نفسها مع الويندوز .. …
- استفسار : كود حفظ صورة
أفهم من الكود أنك تريد حفظ مسار الصورة أم حفظ الصورة نفسها في الحقل Image ؟ وهل الحقل Image من نوع String أم OLE ؟
- (combo +x+.text)أضع مكانها ايه ؟؟؟؟؟
انا نزلت المشروع الاخير ... علي امل إني افهم منه انت عايز ايه .. بس لقيت كود عجيب .. يستاهل جائزة كبيرة في مسابقة الأكواد العجيبة .. يبدو إنك جمعت كل جزء من كل كود قاله الأعضاء .. وصنعت به شيء فريد .. انا حاسس إنك عايز تعمل حاجة ديناميك .. بحيث تستقبل أرقام وع…
- (combo +x+.text)أضع مكانها ايه ؟؟؟؟؟
طبعا عمره ما هيشتغل علشان بتعمل لووب في كائنات بطريقة خطأ ..
- مثال التشفير مرفق ومطلوب التعديل علية ضروري جدا قبل يومان
أخ ناني طلبك الأساسي مرفق .. ملحوظة : أرجو ألا تطلب مني أشياء أخري .. data.rar