تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[Acces2010] ارجو المساعده فى حجم النموزج
#1
ارجو المساعده قمت بعمل قاعده بيانات باستخدم الاكسيس ولكن عند فتح النموزج من جهاز تانى تفتح بشكل مختلف اريد تحجيك الفورم بحيث تفضل ثابته وتفتح بنفس الاعدات اللى عملهتا هل يوجد حل ؟
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم أخي العزيز ورحمة الله وبركاته
قم بإنشاء موديل جديد بعنوان Rsize وضع بداخله الكود التالي :
PHP كود :
Option Compare Database

Declare PtrSafe Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As LongByVal bInheritHandle As LongByVal dwProcessId As Long) As Long
Declare PtrSafe Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As LonglpExitCode 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 لكل نموذج
واعبد ربك حتى يأتيك اليقين
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , Amir_Alzubidy
#3
مش عارفه ازاى احطها فى النموزج فى الاكسيس ازاى ارجو التوضيح
الرد }}}
تم الشكر بواسطة:
#4
ماشي رح سجل فيديو
واعبد ربك حتى يأتيك اليقين
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , Amir_Alzubidy



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم