A scrollable read only?

[Vindicator]

ok, I sorta have an EULA, and I dont want the person to be able to edit thats in it, so I have the script check if the edit window is still the same as the EULA file, but this only works if the user deletes everything in the window:

expandcollapse popup

While 1
;Rewrite
If $click = 1 Then
If Not GUICtrlRead($Edit_2)=$read Then
GUICtrlSetData($Edit_2,$read)
EndIf
EndIf
;end
    $msg = GuiGetMsg()
    Select
        Case $msg = $Button_4
            Dim $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(52,"Quit",'Are you sure to want to exit installation?')
Select
   Case $iMsgBoxAnswer = 6 ;Yes
Exit
   Case $iMsgBoxAnswer = 7 ;No
EndSelect
        Case $msg = $Button_3
If $click=1 Then
    If GUICtrlRead($Input_5)="u4ia" Then
        WinClose("Install")
    Else
        MsgBox(0,"Oops!","Please read the EULA and input the password into the box to the left")
    EndIf
EndIf
If $click=0 Then
$read=FileRead("EULA.txt")
GUICtrlSetData($Edit_2,$read)
$Input_5 = GuiCtrlCreateInput("", 300, 360, 60, 20)
$click=1
EndIf

Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
        ;;;
    EndSelect
WEnd

But instead of that, how could I make the control scrollable, but not editable?

Edited November 5, 2006 by P a R a D o X

[Paulie]

ok, I sorta have an EULA, and I dont want the person to be able to edit thats in it, so I have the script check if the edit window is still the same as the EULA file, but this only works if the user deletes everything in the window:

(Snip)

But instead of that, how could I make the control scrollable, but not editable?

you can just give your edit the "$ES_READONLY" style, then they can't edit it Edited November 5, 2006 by Paulie

[rambo3889]

Paulie even if he did that it would remove the scroller in the right in the edit so i cant scroll i got the same problem sometimes when i need to that

[Paulie]

Paulie even if he did that it would remove the scroller in the right in the edit so i cant scroll i got the same problem sometimes when i need to that

GuiCtrlCreateEdit("Bla", 10, 10, 400, 400, BitOR($ES_AUTOVSCROLL, $ES_READONLY, $WS_VSCROLL))

Does that not work?

Works for me..

Edited November 5, 2006 by Paulie

[rambo3889]

I think that works havent tested yet

[Vindicator]

yes it does...thanks

[GaryFrost]

I've post this sooooooo many times

http://www.autoitscript.com/forum/index.ph...st&p=251991