topic-43864

Posts: 1387

Joined: Fri May 23, 2008 01:33 PM

Fwh 23.10 TGet problem (Solved)
Posted: Fri Nov 03, 2023 08:13 AM

Hi,

I have installed version 23.10. I have compiled my all code in application without any error. I cannot enter anything on the username and password page at the entrance of my application. I use FW_SetUnicode( .f. ).

When I change FW_SetUnicode( .t. ), I can enter.

Is this a mistake? Is it a specific change?

Code (fw): Select all Collapse

    oMyApp := Self

    @ nHBasla+018,4 GROUP oGrp1 TO nHBasla+62,146 Pixel
   
    nHBasla:=oDlg:nHeight-278
    @ nHBasla+024, 50 CHECKBOX oKA_Sakla VAR lKA_Sakla PROMPT "Kullanıcı Adı Sakla" SIZE 90, 10 OF oDlg UPDATE PIXEL

  @ nHBasla+000, 10 SAY "Kullanıcı Adı" PIXEL 
  @ nHBasla+014, 10 SAY "Parola" PIXEL SIZE 50, 12
  @ nHBasla+(-2), 50 GET oUserName VAR mUserName VALID ! Empty( mUserName ) SIZE 90, 12 PIXEL 
  @ nHBasla+012, 50 GET oPass VAR mPass VALID (!Empty(mPass) .OR. LASTKEY()=5) SIZE 90, 12 PIXEL PASSWORD

  
  @ nHBasla+038, 20 BTNBMP oBtn PROMPT " &Giriş Yap " SIZE 55,20 PIXEL;
        RESOURCE "ButtonLogin" LEFT 2007 ROUND ;
    ACTION (mResult:=Login_Action(@mUserName, @mPass, oWnd, oDlg, oUserName, oPass, oMyApp))

  @ nHBasla+038, 80 BTNBMP btnCancel PROMPT " &Çıkış " SIZE 50,20 PIXEL;
            RESOURCE "ButtonClose" LEFT 2007 ROUND ;
        ACTION (mResult:=.F., ::oWnd:bValid := nil, oDlg:End()) CANCEL    
    btnCancel:lCancel := .t.    

  ACTIVATE DIALOG oDlg CENTERED ON INIT IIF(!EMPTY(oMyApp:OParam:xDEF_KULLADI),;
        oPass:SetFocus(),oUserName:SetFocus())

Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.06

Antonio Linares

Posts: 44158