Jump to content

Right sides GUI


Info
 Share

Recommended Posts

  • 8 months later...

Don't know how to do it... that's why I asked for help.

check this site,

http://www.microsoft.com/middleeast/msdn/mirror.aspx

you may read in that site

Mirroring is a term used to specify right-to left (RTL) layout, which identifies how text and GDI objects are laid out in a window. Therefore, it gives a perfect right-to-left (RTL) look and feel to the UI. For Windows 98 and Windows Me, this technology was only available on Arabic enabled and localized operating systems. However, on all Windows 2000 varieties and later, are already mirroring aware. Mirroring is in fact nothing else than a coordinate transformation.

Link to comment
Share on other sites

Quick example.

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$gui = GUICreate ("Mirrored Test", 400, 300, -1, -1, BitOR ($WS_CAPTION, $WS_SYSMENU), $WS_EX_LAYOUTRTL)
$label = GUICtrlCreateLabel ("THIS IS A TEST WITH NON MIRRORED TEXT", 10, 10, 250)
GUISetState ()

While 1
    $nMsg = GUIGetMsg ()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Cheers,

Brett

Link to comment
Share on other sites

try this code which make the from from right to left Mirror

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

;Global Const $WS_EX_LAYOUTRTL = 0x400000
;This style sets the layout to RTL. Therefore, the horizontal origin is the right edge and increasing horizontal value would advance to the left.
Global Const $WS_EX_NOINHERITLAYOUT = 0x100000 


#Region ### START Koda GUI section ### Form=
;BitOR($WS_EX_LAYOUTRTL,$WS_EX_RIGHT,$WS_EX_WINDOWEDGE,$WS_OVERLAPPEDWINDOW)



;$Form1 = GUICreate("Form1", 633, 441, 193, 133, -1, $WS_EX_LAYOUTRTL)
$Form1 = GUICreate("Form1", 300, 300, 193, 133)

;$Form1 = GUICreate("Form1", 633, 441, 193, 133, -1, BitOR($WS_EX_LAYOUTRTL,$WS_OVERLAPPEDWINDOW))

$Label1 = GUICtrlCreateLabel("Label", 10, 10, 61, 20)

$Button1 = GUICtrlCreateButton("Button1", 10, 60, 137, 57, 0)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 10, 200, 265, 41)


;$Form1 = GUICreate("Form1", 633, 441, 193, 133, -1, BitOR($WS_EX_LAYOUTRTL,$WS_EX_WINDOWEDGE))


GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

post-44971-1232628697_thumb.jpg

Link to comment
Share on other sites

  • 3 weeks later...

Also try this for Msgbox  "not list on help files"

; Mirrored Msgbox

Msgbox (0x100000,"Test Mirror", "This is a Mirrored Msgbox")

; Alignment to Right

Msgbox (0x080000,"Test Right to left only", "This is a Right to left text only")

post-44971-1234421683_thumb.jpg

Edited by aymhenry
Link to comment
Share on other sites

Hi,

Intresting, but seems to be a way to get your post count up? The OP hasn't replied since 29 April 2008... :)

Hi

1- the flag 0x100000 is not listed on the help file, i discovered it by trial and error.

Msgbox (0x100000,"Test Mirror", "This is a Mirrored Msgbox")

2- Mirror tech. is so important for people like me who writes Arabic scripts “Right to left”

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...