Buka Fom1, masukkan kode ini dibagian kode paling atas 'Changes prevresize x and y to current widthĤ. TmpControl.Height = tmpControl.Height / PrevResizeY * FormName.ScaleHeight TmpControl.Width = tmpControl.Width / PrevResizeX * FormName.ScaleWidth TmpControl.Top = tmpControl.Top / PrevResizeY * FormName.ScaleHeight TmpControl.Left = tmpControl.Left / PrevResizeX * FormName.ScaleWidth 'Of the control to the form, and change they're TmpControl.Y2 = tmpControl.Y2 / PrevResizeY * FormName.ScaleHeight TmpControl.Y1 = tmpControl.Y1 / PrevResizeY * FormName.ScaleHeight TmpControl.X2 = tmpControl.X2 / PrevResizeX * FormName.ScaleWidth TmpControl.X1 = tmpControl.X1 / PrevResizeX * FormName.ScaleWidth 'A loop to make tmpControl equal to every 'then change prevresizex and y and exit function 'Which means that this function wasn't run before 'Ignores errors in case the control doesn't Public Function ResizeAll(FormName As Form) 'Windows API/Global Declarations for :Auto Resizer Buat modul baru, masukkan kode dibawah ini:
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |