• ¡Welcome to Square Theme!
  • This news are in header template.
  • Please ignore this message.
مهمان عزیز خوش‌آمدید. ورود عضــویت


امتیاز موضوع:
  • 8 رای - 3 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5
Title: RightToLeft
حالت موضوعی
#1
ُس !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! دوستان خسته نباشید !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
برای RightToLeft می توانید از کدهای زیر استفاده کنید.

کد:
Option Explicit
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Const WS_EX_LAYOUTRTL = &H400000
Private Const GWL_EXSTYLE = -20
Private Sub form_Load()
SetWindowLong Form1.hWnd, GWL_EXSTYLE, GetWindowLong(Form1.hWnd, GWL_EXSTYLE) Or WS_EX_LAYOUTRTL
End Sub

سوالی هست؟
:::::::::::::::::::::::::   دیگه میرم ...   :::::::::::::::::::::::::

 
پاسخ
  


پرش به انجمن:


Browsing: 1 مهمان