mahamedaboali

أنا مصرى ودى إيميلاتى mahamedaboali@yahoo.com mahamedaboali@hotmail.com ma2u2000@yahoo.com أرجو أن يكون الموضوع بجد مش هزار وان كان هزار يارت تبلغنا عشان مـ..........................

ضع التالي في قسم التصاريح Option Explicit Private Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long Private Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, ByVal hRgn…

اكتب التالي في موديل Module Declare Function FindWindow Lib "user32" Alias _ "FindWindowA" (ByVal lpClassName As String, _ ByVal lpWindowName As String) As Long Declare Function PostMessage Lib "user32" Alias _ "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As…

أضف التالي في قسم التصاريح Private Declare Function FindWindow Lib "user32" Alias _ "FindWindowA" (ByVal lpClassName As String, _ ByVal lpWindowName As String) As Long Private Declare Function ShowWindow Lib _ "user32" (ByVal hwnd As Long, _ ByVal nCmdShow As …

للبحث عن ملف داخل الجهاز اكتب التالي في موديل Module Declare Function SearchTreeForFile Lib "IMAGEHLP.DLL" _ (ByVal lpRootPath As String, _ ByVal lpInputName As String, _ ByVal lpOutputName As String) As Long Public Const MAX_PATH = 260 Public Function FindFil…

أكتب التالي في قسم التصاريح Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, _ ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, _ ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long Private Const SWP_NOMOVE …

استدعاء البحث الخاص بـ ويندوز أكتب التالي في قسم التصاريح Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As…

على الرحب والسعة الأداة تحت التجريب

شكرا يا أخى على هذه المواضيع الجميلة والمفيدة

السلام عليكم أخي الكريم : الان نتطرق لشفرة تجعل من نموذجك مشع و ذلك باستخدام تصريحات API لماذا استعمل النموذج المشع ؟ * تستعمل النموذج المشع كأن تدل المستخدم لبرنامجك على حوار او لتلفت إنتباهه أو لتحذيره مثلا أو لاي شيئ أخر انت تريده . Private Declare Function…

يا جماعة طول عمر الغرب عايش على السرقة والخداع وياريت إحنا نتعلم وبلاش تماحيك بالغرب وياريت تكون عندنا شركات تدر تنافس وتكمل للآخر وبلاش السلبية دى B)

أريد برنامج Setup Factory وياريت يكون البرنامج مش نسخة تجريبية وياريت إلى عنده البرنامج مايبخل بيه علينا

شكرا على الهدية

:شكرا جزيلا

أنا محمد على وهذه أول مشاركة لى فى هذا المنتدى وإنى أبزل قصار جهدى لإحتراف الفيجوال بيزك ولكنى محتار جدا ومش آدر أجمع أفكار وكل أما أجلس أما الفيجوال أمل إذا ما أردت أن أفعل شيئ ولم يحدث