Como se puede hacer un Valid y When con QlineEdit() sin usar el get ?, se puede ?, porque no veo en los ejemplos ninguna practica de lo dicho, seria como el OnChange, Onclick ......
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveTouch Valid y When
Aqui tienes un ejemplo de como poder hacer el VALID:
#include "FiveTouch.ch"
function Main()
local oDlg, oGet1, cTest
local oBtnOk, oBtnCancel
DEFINE DIALOG oDlg
@ 20, 20 GET oGet1 VAR cTest OF oDlg SIZE 100, 20
oGet1:Connect( "textEdited(QString)", { | u | MsgInfo( u ) } )
@ 200, 90 BUTTON oBtnOk PROMPT "Ok" OF oDlg ;
ACTION MsgInfo( "Ok!" )
@ 200, 220 BUTTON oBtnCancel PROMPT "Cancel" OF oDlg ;
ACTION oDlg:End()
ACTIVATE DIALOG oDlg CENTERED
return nilTambien podrias usar esta se帽al que se emite cuando se ha terminado de editar:
http://doc.qt.io/qt-4.8/qlineedit.html#editingFinished
http://doc.qt.io/qt-4.8/qlineedit.html#editingFinished
#include "FiveTouch.ch"
function Main()
local oDlg, oGet1, cTest
local oBtnOk, oBtnCancel
DEFINE DIALOG oDlg
@ 20, 20 GET oGet1 VAR cTest OF oDlg SIZE 100, 20
oGet1:Connect( "editingFinished()", { || MsgInfo( "VALIDar desde aqui" ) } )
@ 200, 90 BUTTON oBtnOk PROMPT "Ok" OF oDlg ;
ACTION MsgInfo( "Ok!" )
@ 200, 220 BUTTON oBtnCancel PROMPT "Cancel" OF oDlg ;
ACTION oDlg:End()
ACTIVATE DIALOG oDlg CENTERED
return nilhay dos se帽ales que se reciben de QWidget pero no se como podemos usarlas:
http://doc.qt.io/qt-4.8/qwidget.html#signals
En concreto keyboardGrabber() y mouseGrabber() servir铆an para hacer el WHEN
http://doc.qt.io/qt-4.8/qwidget.html#signals
En concreto keyboardGrabber() y mouseGrabber() servir铆an para hacer el WHEN
Este Ejemplo me funciona bien para el Valid, porque en funci贸n de lo que devuelva, (.t.) o (.f.), la funci贸n KeyBoardEvents() detiene la aplicaci贸n, pero pierdo el control con el rat贸n y me gustar铆a en la funci贸n KeyBoardEvents() asignarle al ENTER que funcionar谩 como el TAB, Saludos
include "FiveTouch.ch"
function Main()
local oDlg, oGet1, cTest
local oBtnOk, oBtnCancel
DEFINE DIALOG oDlg
@ 20, 20 GET oGet1 VAR cTest OF oDlg SIZE 100, 20
oGet1:connect( QEvent_KeyPress , { |e| KeyBoardEvents( e, cTest ) } )
//QEvent_KeyPress -- viene de Hbqtgui.ch
@ 200, 90 BUTTON oBtnOk PROMPT "Ok" OF oDlg ;
ACTION MsgInfo( "Ok!" )
@ 200, 220 BUTTON oBtnCancel PROMPT "Cancel" OF oDlg ;
ACTION oDlg:End()
ACTIVATE DIALOG oDlg CENTERED
return nil
//---------------------------------------------------
Function KeyBoardEvents( e, cText )
LOCAL lSalida := .T.
LOCAL nKey := e:key()
// (.T.) No Permite Continuar
// (.F.) Permite Continuar
Do Case
Case nKey == Qt_Key_Return .OR. nKey == Qt_Key_Enter
MsgInfo('Enter')
lSalida := .F.
Case nKey == Qt_Key_Tab
MsgInfo('Tab')
lSalida := .F.
Case nKey == Qt_XButton1
MsgInfo('Mouse')
lSalida := .F.
Case nKey == Qt_Key_F1
MsgInfo('F1')
lSalida := .T.
EndCase
Return( lSalida )