Jump to content
Sign in to follow this  
Info

Right sides GUI

Recommended Posts

Info

How do I make the GUI to look like this:

Posted Image

And not like this:

Posted Image

(Hebrew :D)

Thanks...

Edited by Info

Share this post


Link to post
Share on other sites
Tomb

er.

look at your computer screen in a mirror.

:D

Share this post


Link to post
Share on other sites
Tomb

maybe you can do something with bmp2rgn.dll like how the gui skins were made recently.

Share this post


Link to post
Share on other sites
Info

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

Share this post


Link to post
Share on other sites
aymhenry

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.

Share this post


Link to post
Share on other sites
BrettF

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

Share this post


Link to post
Share on other sites
aymhenry

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

Share this post


Link to post
Share on other sites
aymhenry

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

Share this post


Link to post
Share on other sites
BrettF
aymhenry

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”

  • Like 1

Share this post


Link to post
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
Sign in to follow this  

×

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.