Xailer & OZ Software

El entorno de desarrollo definitivo en Xbase
https://forum.xailer.com/

OnCheckState problem

https://forum.xailer.com/viewtopic.php?t=2188

Página 1 de 1

OnCheckState problem

Publicado: Mar Oct 25, 2005 11:05 am
por Ingo
This is a multi-part message in MIME format.
------=_NextPart_000_0007_01C5D953.F34CD960
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_0008_01C5D953.F34CD960"
------=_NextPart_001_0008_01C5D953.F34CD960
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Hello,
sorry I have still problems with TComboBox / OnCheckState.
Please look at the example:
a form with ComboBox an editcontrol and an OK-button
The editcontrol:OnCheckState() returns .F. if ComboBox:cText is empty =
and on the other side .T. if not
METHOD Edit2CheckState( oSender ) CLASS TForm1
RETURN !EMPTY(::oCombo:cText)
=20
Please input "a" or any char into the ComboBoxEdit and then try to =
change the focus to the Edit-control by using the TAB-key. The focus =
changes to the OK-button and not to editcontrol and afterwards by the =
next turn over the Combo he will change to the editcontrol.
In FW16 I used the When-clause of the editcontrol and called =
oDlg:AevalWhen() in the Valid-clause of the ComboBox.
How can I do the same in Xailer?
Regards
Ingo
------=_NextPart_001_0008_01C5D953.F34CD960
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2900.2769" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY>
<DIV><FONT face=3DArial size=3D2>Hello,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>sorry I have still problems with =
TComboBox /=20
OnCheckState.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Please look at the =
example:</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>a form with ComboBox an editcontrol and =
an=20
OK-button</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>The editcontrol:OnCheckState() returns =
..F.Âif=20
ComboBox:cText is empty and on the other side .T. if not</FONT></DIV>
<DIV>Â</DIV>
<DIV><FONT face=3DArial size=3D2>ÂÂÂ METHOD =
Edit2CheckState( oSender=20
) CLASS TForm1</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>ÂÂÂ RETURN=20
!EMPTY(::oCombo:cText)<BR></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Please </FONT><FONT face=3DArial =
size=3D2>input "a" or=20
any charÂinto the ComboBoxEdit and then try to change the focus to =
the=20
Edit-control by using the TAB-key. The focusÂchanges to the =
OK-button and=20
not to editcontrol and afterwards by the next turn over the =
ComboÂhe will=20
change to the editcontrol.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>In FW16 I used the When-clause of the =
editcontrol=20
and called oDlg:AevalWhen() in the Valid-clause of the =
ComboBox.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>How can I do the same in =
Xailer?</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Regards</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Ingo</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV></BODY></HTML>
------=_NextPart_001_0008_01C5D953.F34CD960--
------=_NextPart_000_0007_01C5D953.F34CD960
Content-Type: application/x-zip-compressed;
name="Test.zip"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
filename="Test.zip"
UEsDBAoAAAAAAMBUWTMAAAAAAAAAAAAAAAAHAAAAU291cmNlL1BLAwQUAAAA CABhVFkzvVB3Z/oB
AABJCAAAEAAAAFNvdXJjZS9Gb3JtMS5wcmfNVF1vmzAUfUfiP9x1L6RaSFJp mmSpkxIHVqYEInC1
7ZGCG7wQ3IGR0H79bDOyhIxtD0tVv9gcn3vvwfdjcm0acA2bkn+lO4GA0Epo ZBkLyhC43OXlfmY/
lVsJLmiVZCVlD3WxRZo2rwUvUWdR7xHMpuPZu/HNdPpWoRPTMI3XrEjyOqVw 9TlmOS3tJLtSOF7N
owiIjgBuGKzbs7oCABysN4Hv+AR4sFuIog86KRM3fRDz/QNXDvSFlBRDjrO4 2NIUPN8jYLv24Xrt
kLtgCbik8mdVZGt0jOuoOGfJzgIe0SKlJZwQlIlXMMHinH2nAyQtE2c02UVC hhlgad2t0APjDRSe
3Bu5B3mqj78xUv57hgOs+6f0LwKchomj8NynjcAiV0zTcPylTthpRtvyaB73 OqOTyfi/rjZVl/D6
pxzDcWGaBkI45xVVxRE65D70wWf5hXUNltaZtpB+q2XTtsX1nBKHC7un8aDp lbPekC8WQm2booTI
+hpdWOY/d9bZy3aDA93axH7Ghx1u65cn8WymvDCJQwOtJ3MV4PkKig2vTOOT R+4gWHx0MOks9aD0
XPj1N2DP/aV9qOiukkEvybSUL3SLXFakkShZsXWajjZ6P+2YcrWgpH6gQp20 5eiYENLHklaZJd/v
BD9r/RaXc9pz9cfPk9wu/+4/AFBLAwQUAAAACABhVFkz00jNFMcBAAAkBAAA EAAAAFNvdXJjZS9G
b3JtMS54Zm2VU81uozAYvEfKO3zisCJSVAFpN22kHgohSrZNqAJppd7c4BYr xq7AqKirffe1DQlO
FXW3F/h+hmFmDMswmUdTCAqMBJ7xIrcHENzdxDEkqnP7vX4PAOLqDRcTE6XH k0mMhc8rlpY2nI+c
IXijkbx44yG4Fx7sUdsE1wIm12AluBRWO+UzzvQ0UYU9aPltsJYxxIiVEOOC vFhDuByC5D53nAMj
CyjBTDySVGSKwnOvjjdzTF4zze66l+2KLgkjOfnAPq/V5mx2dtig+vQmYgtG BEFULrUDZb8b7b20
0gdtXo+LZA6R/ysMEmU04Pkz10519cxr6XaF323pkL60phSPEafrySClcddR sboGCC0EzktF9xus
GyY4I0iGZAUUVWlTTnnBRYZ1fY841cUTFsiCPweeiAUZYq+NLS2s6S0DEaZE fEZ1s8/IzVsqUzhG
NrMjZE2EgZFdt+1ylF24mp7OU/F6Ok9V/U+WThPmlbo7BugB0aoRbCoMMrzd xWLvRb+um31XbbTz
BdNq/UrI0/q33rE8+/FP+d0ruRcGpvuRfkS7Tgdb8hTRNS4rqrd5Ed2adijZ 7vRTWopuvzaxDpPN
eqUV9nt/AVBLAwQUAAAACAAwTlcz7081W9AAAAAlAQAADwAAAFNvdXJjZS9U ZXN0LnByZ02PTYvC
MBCG74X+h6F7aQW1XRAh4KFi3ZOytDl4jelgo2lTxgn+/W2zu+BxHt55P9aL OIIFfJO744MFSHxy
IAfFaH7v1Ui3wPb41B2hufrhJqBhRdy71ltokaAcR2seio0bgrj07Ej8e/le QJEvi+3yM883M13H
URx9mEFb3yIkF2Us0kp3ycynPhpbTwgnZYY0mx4AmkrCoZQVfFX1qTwHFlJ1 SBVaGrYIYgfJXDsJ
Anl01BdpJs74St/lkImmc68/73ef2ofEOKqRPU1rfgBQSwMEFAAAAAgATVNZ MzcA36mjAQAA1AIA
AAgAAABUZXN0LnhwamVSy27bMBC8C9CvCHWfQAEeHMtGVZiWIQltgDgHito4 rCmSWJKp/fddSkmb
OiftzgyHy1nd7Zv6+3rV3edZd3HA4Ax5VoKXqFxQ1rAOfMizOgYXw9QUk2Rl R6c0IDt/E9jbiHnG
hTLcDlED21gcF4XDI6FRB+U0VMYHYSR4VnRFnt3uuTDqgfzmvpJ0V57tBYoR AqCnpl5zVmyI/EF9
mmVRvMuzBjQID4zKm6j0kIo0jTAXxpe7crnrfiuTMHdp1PExkFOHYgAu8JRs STyCCam8q/ddVe9a
ev0yBjuKoCSH8UlgCVLTLFME0wwl9PFYmQc7z9tG5xC83yoDuzj2gInD8dWJ F0n7aDHIGIIyx5n5
KdAY6rbwBJotKCSLUE95p6m4cBvKdtauCLMaKNhnIGnp1hPp0wvKqqH11U21 Tq9oaRMSSoVsrihY
I3UcJui5TBH6v7qXmuLufyWAPmS7qbaT4WLe+bTK96/3+oGtvh5uRfoHDlr1 B0q1tzf2XNh0/uMb
1gS0eiY/XZEVF/60HlSY6c/XtHFaSPgn+HIlaMPwn/8fUEsBAhQACgAAAAAA wFRZMwAAAAAAAAAA
AAAAAAcAAAAAAAAAAAAQAP9BAAAAAFNvdXJjZS9QSwECFAAUAAAACABhVFkz vVB3Z/oBAABJCAAA
EAAAAAAAAAABACAAtoElAAAAU291cmNlL0Zvcm0xLnByZ1BLAQIUABQAAAAI AGFUWTPTSM0UxwEA
ACQEAAAQAAAAAAAAAAEAIAC2gU0CAABTb3VyY2UvRm9ybTEueGZtUEsBAhQA FAAAAAgAME5XM+9P
NVvQAAAAJQEAAA8AAAAAAAAAAQAgALaBQgQAAFNvdXJjZS9UZXN0LnByZ1BL AQIUABQAAAAIAE1T
WTM3AN+powEAANQCAAAIAAAAAAAAAAEAIAC2gT8FAABUZXN0LnhwalBLBQYA AAAABQAFACQBAAAI
BwAAAAA=
------=_NextPart_000_0007_01C5D953.F34CD960--

Attached files Test.zip (2.1 KB)Â

OnCheckState problem

Publicado: Mar Oct 25, 2005 12:21 pm
por ignacio
Ingo,
Change all your code for only this two lines:
METHOD ComboEditUpdate( oSender ) CLASS TForm1
RETURN ::RequestState()
METHOD Edit2CheckState( oSender ) CLASS TForm1
RETURN !EMPTY(::oCombo:cText)
RequestState() is equivalent to AevalWhen()
Regards,
"Ingo" <ingo.jh@web.de> escribió en el mensaje news:[email=435df541@ozsrvnegro.ozlan.local...]435df541@ozsrvnegro.ozlan.local...[/email]
Hello,
sorry I have still problems with TComboBox / OnCheckState.
Please look at the example:
a form with ComboBox an editcontrol and an OK-button
The editcontrol:OnCheckState() returns .F. if ComboBox:cText is empty and on the other side .T. if not
METHOD Edit2CheckState( oSender ) CLASS TForm1
RETURN !EMPTY(::oCombo:cText)

Please input "a" or any char into the ComboBoxEdit and then try to change the focus to the Edit-control by using the TAB-key. The focus changes to the OK-button and not to editcontrol and afterwards by the next turn over the Combo he will change to the editcontrol.
In FW16 I used the When-clause of the editcontrol and called oDlg:AevalWhen() in the Valid-clause of the ComboBox.
How can I do the same in Xailer?
Regards
Ingo
--

OnCheckState problem

Publicado: Mar Oct 25, 2005 12:27 pm
por ingo[1]
Ignacio,
I changed the code, it doesn't work by using TAB-key.
Regards
Ingo
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> schrieb im Newsbeitrag news:435e0734$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Ingo,
Change all your code for only this two lines:
METHOD ComboEditUpdate( oSender ) CLASS TForm1
RETURN ::RequestState()
METHOD Edit2CheckState( oSender ) CLASS TForm1
RETURN !EMPTY(::oCombo:cText)
RequestState() is equivalent to AevalWhen()
Regards,
"Ingo" <ingo.jh@web.de> escribió en el mensaje news:[email=435df541@ozsrvnegro.ozlan.local...]435df541@ozsrvnegro.ozlan.local...[/email]
Hello,
sorry I have still problems with TComboBox / OnCheckState.
Please look at the example:
a form with ComboBox an editcontrol and an OK-button
The editcontrol:OnCheckState() returns .F. if ComboBox:cText is empty and on the other side .T. if not
METHOD Edit2CheckState( oSender ) CLASS TForm1
RETURN !EMPTY(::oCombo:cText)

Please input "a" or any char into the ComboBoxEdit and then try to change the focus to the Edit-control by using the TAB-key. The focus changes to the OK-button and not to editcontrol and afterwards by the next turn over the Combo he will change to the editcontrol.
In FW16 I used the When-clause of the editcontrol and called oDlg:AevalWhen() in the Valid-clause of the ComboBox.
How can I do the same in Xailer?
Regards
Ingo
--

OnCheckState problem

Publicado: Mar Oct 25, 2005 12:29 pm
por ingo[1]
Ignacio,
heureka :-)) now it works!!!!!!
Thanks
Ingo
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> schrieb im Newsbeitrag news:435e0734$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Ingo,
Change all your code for only this two lines:
METHOD ComboEditUpdate( oSender ) CLASS TForm1
RETURN ::RequestState()
METHOD Edit2CheckState( oSender ) CLASS TForm1
RETURN !EMPTY(::oCombo:cText)
RequestState() is equivalent to AevalWhen()
Regards,
"Ingo" <ingo.jh@web.de> escribió en el mensaje news:[email=435df541@ozsrvnegro.ozlan.local...]435df541@ozsrvnegro.ozlan.local...[/email]
Hello,
sorry I have still problems with TComboBox / OnCheckState.
Please look at the example:
a form with ComboBox an editcontrol and an OK-button
The editcontrol:OnCheckState() returns .F. if ComboBox:cText is empty and on the other side .T. if not
METHOD Edit2CheckState( oSender ) CLASS TForm1
RETURN !EMPTY(::oCombo:cText)

Please input "a" or any char into the ComboBoxEdit and then try to change the focus to the Edit-control by using the TAB-key. The focus changes to the OK-button and not to editcontrol and afterwards by the next turn over the Combo he will change to the editcontrol.
In FW16 I used the When-clause of the editcontrol and called oDlg:AevalWhen() in the Valid-clause of the ComboBox.
How can I do the same in Xailer?
Regards
Ingo
--
Todos los horarios son UTC+02:00
Página 1 de 1

Desarrollado por phpBB® Forum Software © phpBB Limited

Traducción al español por phpBB España