كيفية عرض dbgrid من اليمين لليسار ؟

عليكم السلام

الاداة يبدو انها ليست عندي !!

عطني اسمها كامل

أخي الكريم

الأداة اسمها dbgrid32.ocx

السلام عليكم ورحمة الله

بص يا سيدي علي الرغم من اني تركت فيجوال 6 من زمان , بس يلا أهو الواحد يكسب ثواب :lol:

باستخدام دوال الـ API كالآتي :

Private Declare Function GetWindowLong Lib "user32.dll" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32.dll" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const WS_EX_LAYOUTRTL As Long = &H400000&
Private Const GWL_EXSTYLE As Long = -20

وفي حدث الضغط علي زر مثلا :

Dim oldlong As Long
oldlong = GetWindowLong(datagrid.hwnd,GWL_EXSTYLE)
SetWindowLong datagrid.hwnd,GWL_EXSTYLE,oldlong or WS_EX_LAYOUTRTL
datagrid.refresh

ملحوظه أنا لم أجرب الكود لكنه لدي منذ فتره , وان كان به خطأ فأرجو من الأخوه تصحيحه ,,,

الأخ الفاضل hazzoom

جزاك الله خيرا ونجحت معي والحمد لله

لكن بما أنك تريد الثواب ونحن في رمضان , وأنا برضه عاوز أكسبك ثواب , فممكن تقولنا على طريقة لجعل Toolbar من اليمين لليسار ؟

فقد جربت هذه الطريقة معه ولم تنفع

وجزاك الله خيرا