Jump to content

A scrollable read only?


Vindicator
 Share

Recommended Posts

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:

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 by P a R a D o X

If I hadn't said thank you yet, and you deserve it, than thank you...

Link to comment
Share on other sites

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 by Paulie
Link to comment
Share on other sites

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

My Scripts:Radioblog Club Music DownloaderOther stuff:Fun movieIm serious read the help file it helps :PFight 'Till you drop. Never stop, You Cant give up. Til you reach the top Fight! you’re the best in town Fight!
Link to comment
Share on other sites

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 by Paulie
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...