GET class

plantenkennis · Post by **plantenkennis** » Tue May 29, 2018 9:10 pm

Hello,

How can I use all the methods of the GET class. I want to do the following:

1. When change the input do something or action
2. When the user hits the Enter key, perform an action.

I have the following function

Code: Select all

FUNCTION RK_Input(clabel, cTitle, cText)
*a personalized input window

LOCAL oDlg, oGet
LOCAL nKey := 0
   
    DEFINE DIALOG oDlg TITLE cTitle SIZE 400, 125
   
    @ 70, 10 SAY clabel OF oDlg SIZE 380, 20
   
    @ 45, 10 GET oGet VAR cText OF oDlg TOOLTIP "tik hier in" SIZE 380, 25
    oGet:SetFocus()
    oGet:Change(MsgInfo('OK'))
    MsgInfo(nKey)   

    @ 10, 150 BUTTON "Ok" OF oDlg ACTION (cText := oGet:GetText, oDlg:End())
   
   ACTIVATE DIALOG oDlg CENTERED

RETURN cText

When the user types a letter in the Getbox, perform a function (like a search for the string that is in the getbox
When the user hits the Enter key perform the OK Button.

I hope that this is possible.