ثامر أبو بلقيس
15-12-2014, 11:19 PM
السلام عليكم ورحمة الله وبركاته
من أعمال أحد عمالقة مطوري البرنامج
reteset بتاريخ 07-30-2012
نقلت لكم الأكواد المستعملة في ظهور منظر عنصر Grid من اليمين إلى اليسار
في global functions
function SetRightToLeft(hWnd)
local WS_EX_LAYOUTRTL = 0x00400000;
local GWL_EXSTYLE = -20;
local nOldLong = DLL.CallFunction("User32.dll", "GetWindowLongA", (hWnd..","..GWL_EXSTYLE), DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL);
local nNewLong = DLL.CallFunction("User32.dll", "SetWindowLongA", (hWnd..","..GWL_EXSTYLE..","..(nOldLong+WS_EX_LAYOUTRTL)), DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL);
return (tonumber(nNewLong) > 0);
end
الكود المسؤول عن التنفيذ ازرعه حسب رغبتك في زر في إحدى أحداث الصفحة .... الخ
local tblGridProps = Grid.GetProperties("Grid1");
SetRightToLeft(tblGridProps.WindowHandle);
Grid.SetRedraw("Grid1", true, true);
سلام :abc_138:
من أعمال أحد عمالقة مطوري البرنامج
reteset بتاريخ 07-30-2012
نقلت لكم الأكواد المستعملة في ظهور منظر عنصر Grid من اليمين إلى اليسار
في global functions
function SetRightToLeft(hWnd)
local WS_EX_LAYOUTRTL = 0x00400000;
local GWL_EXSTYLE = -20;
local nOldLong = DLL.CallFunction("User32.dll", "GetWindowLongA", (hWnd..","..GWL_EXSTYLE), DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL);
local nNewLong = DLL.CallFunction("User32.dll", "SetWindowLongA", (hWnd..","..GWL_EXSTYLE..","..(nOldLong+WS_EX_LAYOUTRTL)), DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL);
return (tonumber(nNewLong) > 0);
end
الكود المسؤول عن التنفيذ ازرعه حسب رغبتك في زر في إحدى أحداث الصفحة .... الخ
local tblGridProps = Grid.GetProperties("Grid1");
SetRightToLeft(tblGridProps.WindowHandle);
Grid.SetRedraw("Grid1", true, true);
سلام :abc_138: