09-04-17, 01:53 PM
ارجو المساعده قمت بعمل قاعده بيانات باستخدم الاكسيس ولكن عند فتح النموزج من جهاز تانى تفتح بشكل مختلف اريد تحجيك الفورم بحيث تفضل ثابته وتفتح بنفس الاعدات اللى عملهتا هل يوجد حل ؟
09-04-17, 01:53 PM
09-04-17, 02:03 PM
السلام عليكم أخي العزيز ورحمة الله وبركاته
قم بإنشاء موديل جديد بعنوان Rsize وضع بداخله الكود التالي :
ثم ضع في الحدث Open للنموذج الكود التالي :
أتمنى لك التوفيق
طبعا يجب أن تنادي الموديل Resize في الحدث Open لكل نموذج
قم بإنشاء موديل جديد بعنوان Rsize وضع بداخله الكود التالي :
PHP كود :
Option Compare Database
Declare PtrSafe Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Declare PtrSafe Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As Long, lpExitCode As Long) As Long
Public Const PROCESS_QUERY_INFORMATION = &H400
Public Const STILL_ACTIVE = &H103
ثم ضع في الحدث Open للنموذج الكود التالي :
PHP كود :
Private Sub Form_Open(Cancel As Integer)
On Error Resume Next
ReSizeForm Me
أتمنى لك التوفيق
طبعا يجب أن تنادي الموديل Resize في الحدث Open لكل نموذج
09-04-17, 02:54 PM
مش عارفه ازاى احطها فى النموزج فى الاكسيس ازاى ارجو التوضيح
09-04-17, 02:58 PM
ماشي رح سجل فيديو