Sorry, last example included an external class. This is the same example
ready to copy/past and regenerate the SCX with FoxBin2Prg.
With this combobox setup, It only shows UPPER case letters.
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR
SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY
FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.19" SourceFile="xx.scx" /> (Solo para binarios
VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS dataenvironment AS dataenvironment
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale=""
Uniqueid="" ClassIcon="1" />
DataSource = .NULL.
Height = 0
Left = 0
Name = "Dataenvironment"
Top = 0
Width = 0
ENDDEFINE
DEFINE CLASS form1 AS form
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items
OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Combobox1" UniqueID="" Timestamp="" />
*<DefinedPropArrayMethod>
*p: val1
*p: val2
*</DefinedPropArrayMethod>
Caption = "Form1"
DoCreate = .T.
Name = "Form1"
val1 =
val2 =
ADD OBJECT 'Combobox1' AS combobox WITH ;
ControlSource = "thisform.val1", ;
Format = "!", ;
Left = 44, ;
Name = "Combobox1", ;
Top = 24
*< END OBJECT: BaseClass="combobox" />
ADD OBJECT 'Combobox2' AS combobox WITH ;
Left = 44, ;
Name = "Combobox2", ;
Style = 2, ;
Top = 64
*< END OBJECT: BaseClass="combobox" />
PROCEDURE Combobox1.Init
this.AddListItem("item 1")
this.AddListItem("item 2")
this.AddListItem("item 3")
ENDPROC
ENDDEFINE
2015-06-19 14:26 GMT+02:00 Fernando D. Bozzo <fdbo...@gmail.com>:
> This is my test form "xx.scx" exported to text:
>
>
>
> *--------------------------------------------------------------------------------------------------------------------------------------------------------
> * (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR
> SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
> * (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY
> FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
>
> *--------------------------------------------------------------------------------------------------------------------------------------------------------
> *< FOXBIN2PRG: Version="1.19" SourceFile="xx.scx" /> (Solo para binarios
> VFP 9 / Only for VFP 9 binaries)
> *
> *
> DEFINE CLASS dataenvironment AS dataenvironment
> *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale=""
> Uniqueid="" ClassIcon="1" />
>
> DataSource = .NULL.
> Height = 0
> Left = 0
> Name = "Dataenvironment"
> Top = 0
> Width = 0
>
> ENDDEFINE
>
> DEFINE CLASS form1 AS form
> *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
>
> *-- OBJECTDATA items order determines ZOrder / El orden de los items
> OBJECTDATA determina el ZOrder
> *< OBJECTDATA: ObjPath="Mcombobox1" UniqueID="" Timestamp="" />
> *< OBJECTDATA: ObjPath="Mcombobox2" UniqueID="" Timestamp="" />
>
> *<DefinedPropArrayMethod>
> *p: val1
> *p: val2
> *</DefinedPropArrayMethod>
>
> Caption = "Form1"
> DoCreate = .T.
> Name = "Form1"
> val1 =
> val2 =
>
> ADD OBJECT 'Mcombobox1' AS mcombobox WITH ;
> ControlSource = "thisform.val1", ;
> Format = "!", ;
> Left = 44, ;
> Name = "Mcombobox1", ;
> Top = 24
> *< END OBJECT: ClassLib="..\autemis\comun\libreria\mstandar.vcx"
> BaseClass="combobox" />
>
> PROCEDURE Mcombobox1.Init
> this.AddListItem("item 1")
> this.AddListItem("item 2")
> this.AddListItem("item 3")
>
> ENDPROC
>
> ENDDEFINE
>
>
>
>
> 2015-06-19 14:23 GMT+02:00 Fernando D. Bozzo <fdbo...@gmail.com>:
>
>> Hi Paul:
>>
>> I'm testing with a combobox with style=0 and RowSourceType=0, and it is
>> working.
>>
>> I think that Format and InputMask only works with this setting.
>>
>> VFP 9 SP2
>>
>> Regards.-
>>
>>
>>
>>
>> 2015-06-19 14:17 GMT+02:00 Paul Newton <paul.new...@pegasus.co.uk>:
>>
>>> Hi all
>>>
>>> I have a dropdown combo with Format and InputMask both set to ! but it
>>> allows me to type in lowercase ...
>>>
>>>
>>> Any ideas?
>>>
>>> TIA
>>> Paul Newton
>>>
[excessive quoting removed by server]
_______________________________________________
Post Messages to: ProFox@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/CAGQ_Ju=qZGFMbwfrK=iiNE5ykzoe6VYwd8V+EypE=gpkq3k...@mail.gmail.com
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
