help for guictrlcreateinput

[randeep]

hello all,

i have made a form (added) with tabs.

1. now the writing in 'Inputs' is disabled. now i want to write in the 'inputs' in the tabs (that will be default and not be changeable by the user, user can only read from it). if i write in the script then how can i write a paragraph that should be shown in 'inputs' and will not be editable. (using $ES_READONLY).

SOLVED

2. if i use '$ES_READONLY', then it becomes uneditable, but the 'Input' becomes grey. is there way to convert the change the color of input (grey to white)????

SOLVED

expandcollapse popup

#include <GUIConstantsEx.au3>
#include <EditConstants.au3>


Opt('MustDeclareVars', 1)

Example()

Func Example()
    Local $tab, $tab0, $tab0OK, $tab0input
    Local $tab1, $tab1combo, $tab1OK, $n
    Local $tab2, $tab2OK, $msg, $tab1input, $CloseBtn

    GUICreate("About", 400, 250)  ; will create a dialog box that when displayed is centered
    $n = GUICtrlCreatePic("ARTEVEAI.jpg", 20, 40, 120, 120)
    GUICtrlCreateGroup("", 10, 172, 380, 51)
    GUICtrlCreateLabel("Windos OS : " & @OSVersion & " " & @OSServicePack, 20, 182)
    guictrlcreatelabel("Memory available to Windows (Bytes):", 20, 200)
    GUISetFont(9, 300)

    $CloseBtn = GUICtrlCreateButton("Close", 320, 226, 70 , 20)

    $tab = GUICtrlCreateTab(10, 10, 380, 160)

    $tab0 = GUICtrlCreateTabItem("About DB Installer")
    $tab0input = GUICtrlCreateInput("default", 150, 40, 230, 80, $ES_READONLY)
    GUICtrlCreateLabel("Version 1.0.0.1", 230, 125)
    GUICtrlCreateLabel("© Artevea Digital Limited.", 200, 145)


    $tab1 = GUICtrlCreateTabItem("Shortcuts")
    $tab1input = GUICtrlCreateInput("Version", 20, 40, 360, 120, $ES_READONLY)

    $tab2 = GUICtrlCreateTabItem("History")
    $tab1input = GUICtrlCreateInput("", 20, 40, 360, 120, $ES_READONLY)



    GUICtrlCreateTabItem("")    ; end tabitem definition

    GUISetState()

    While 1
        $msg = GUIGetMsg()

        If $msg = $GUI_EVENT_CLOSE Then ExitLoop

        if $msg = $CloseBtn then exitloop

    WEnd
EndFunc   ;==>Example

thanx in advance...

Edited July 1, 2009 by randeep

[Mat]

Use GUICtrlSetBkColor (-1, 0xFFFFFF)

expandcollapse popup

#include <GUIConstantsEx.au3>
#include <EditConstants.au3>

Opt('MustDeclareVars', 1)

Example()

Func Example()
    Local $tab, $tab0, $tab0OK, $tab0input
    Local $tab1, $tab1combo, $tab1OK, $n
    Local $tab2, $tab2OK, $msg, $tab1input, $CloseBtn

    GUICreate("About", 400, 250)  ; will create a dialog box that when displayed is centered
    $n = GUICtrlCreatePic("ARTEVEAI.jpg", 20, 40, 120, 120)
    GUICtrlCreateGroup("", 10, 172, 380, 51)
    GUICtrlCreateLabel("Windos OS : " & @OSVersion & " " & @OSServicePack, 20, 182)
    guictrlcreatelabel("Memory available to Windows (Bytes):", 20, 200)
    ;GUISetFont(9, 300)

    $CloseBtn = GUICtrlCreateButton("Close", 320, 226, 70 , 20)

    $tab = GUICtrlCreateTab(10, 10, 380, 160)

    $tab0 = GUICtrlCreateTabItem("About DB Installer")
    $tab0input = GUICtrlCreateInput("default", 150, 40, 230, 80, $ES_READONLY)
       GUICtrlSetBkColor (-1, 0xFFFFFF)
    GUICtrlCreateLabel("Version 1.0.0.1", 230, 125)
    GUICtrlCreateLabel("© Artevea Digital Limited.", 200, 145)


    $tab1 = GUICtrlCreateTabItem("Shortcuts")
    $tab1input = GUICtrlCreateInput("Version", 20, 40, 360, 120, $ES_READONLY)
       GUICtrlSetBkColor (-1, 0xFFFFFF)

    $tab2 = GUICtrlCreateTabItem("History")
    $tab1input = GUICtrlCreateInput("", 20, 40, 360, 120, $ES_READONLY)
       GUICtrlSetBkColor (-1, 0xFFFFFF)

    GUICtrlCreateTabItem("")    ; end tabitem definition

    GUISetState()

    While 1
        $msg = GUIGetMsg()

        If $msg = $GUI_EVENT_CLOSE Then ExitLoop

        if $msg = $CloseBtn then exitloop

    WEnd
EndFunc   ;==>Example

[randeep]

thanx MDiesel for replying

problem 2 is solved. but problem 1 is still remained

[trancexx]

thanx MDiesel for replying

problem 2 is solved. but problem 1 is still remained

MemGetStats()