GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV
,
WEBDEV
e
WINDEV Mobile
Inicio
|
Mensagens recentes
|
Conecte-se...
|
Disconnect
|
Português
Inicio
→
WINDEV 25
→
WX - Exemplo de Autocomplete
WX - Exemplo de Autocomplete
Iniciado por BOLLER, dez., 06 2019 1:44 PM - 4 respostas
Conecte-se…
BOLLER
#1
Membro registado
3.651 mensagems
Popularité : +175 (223 votes)
Publicado em dezembro, 06 2019 - 1:44 PM
Exemplo de Autocomplete
CODIGO DA JANELA
Procedure
WIN_AssistedInput_Functions
(
)
CONSTANT
IDCloseChrono
=
1
END
// Array that contains all the countries
garrArrCountry
is array of strings
Código do campo de texto
evento: Whenever modify // Sempre que modificar
s
Text
is string
n
Position
is int
// Deletes the previous entries
AssistedInputDeleteAll
(
MySelf
)
// Browses the array entries
FOR
ALL
E
LEMENT
s
ACountry OF garrArrCountry
// If the country contains the input
IF
s
ACountry
[
~
]
MySelf THEN
// Formats the text
s
Text
=
s
ACountry
n
Position
=
Position
(
s
Text
,
MySelf
,
1
,
IgnoreCase
)
// Formats the text to highlight the sought term
s
Text
=
s
Text
[
[
TO
n
Position
-
1
]
] +
gFontBold
(
True
) +
gPen
(
LightRed
) +
s
Text
[
[
n
Position TO
n
Position
+
Length
(
MySelf
)
-
1
]
] +
gPen
(
Black
) +
gFontBold
(
False
)
+
s
Text
[
[
n
Position
+
Length
(
MySelf
)
TO
]
]
// Adds the country
AssistedInputAdd
(
MySelf
,
s
Text
)
END
END
// Opens the assisted input on the control
AssistedInputOpen
(
MySelf
)
EXEMPLO CONSTA EM:
" UNIT EXAMPLES "
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
Mensagem modificada, dezembro, 06 2019 - 1:46 PM
Denunciar
0
0
BOLLER
#2
Membro registado
3.651 mensagems
Popularité : +175 (223 votes)
Publicado em dezembro, 06 2019 - 1:45 PM
Procedure
__FillCountries
(
)
s
CountryList
is string
= [
Andorra
United Arab Emirates
Afghanistan
Antigua-AND-Barbuda
Albania
Armenia
Angola
Argentina
Austria
Australia
Azerbaijan
Bosnia-Herzegovina
Barbados
Bangladesh
Belgium
Burkina-Faso
Bulgaria
Bahrain
Burundi
Benin
Brunei
Bolivia
Brazil
Bahamas
Bhutan
Botswana
Belarus
Belize
Canada
Dem. Rep. of Congo
Central African Republic
Congo
Switzerland
Ivory Coast
Chile
Cameroon
China
Colombia
Costa Rica
Cuba
Cape Verde
Cyprus
Czech Republic
Germany
Djibouti
Denmark
Dominica
Dominican Republic
Algeria
Ecuador
Estonia
Egypt
Eritrea
Spain
Ethiopia
Finland
Fiji
Micronesia
France
Gabon
United Kingdom
Grenada
Georgia
Ghana
Gambia
Guinea
Equatorial Guinea
Greece
Guatemala
Guinea-Bissau
Guyana
Honduras
Croatia
Haiti
Hungary
Indonesia
Ireland
Israel
India
Iraq
Iran
Iceland
Italy
Jamaica
Jordan
Japan
Kenya
Kyrgyzstan
Cambodia
Kiribati
Comoros
St-Christopher-AND-Nieves
North Korea
South Korea
Kuwait
Kazakhstan
Laos
Lebanon
St-Lucia
Liechtenstein
Sri Lanka
Liberia
Lesotho
Lithuania
Luxembourg
Latvia
Libya
Morocco
Monaco
Moldavia
Madagascar
Marshall
Macedonia
Mali
Burma
Mongolia
(the)
Malta
Mauritius
Maldives
Malawi
Mexico
Malaysia
Mozambique
Namibia
Niger
Nigeria
Nicaragua
Netherlands
Norway
Nepal
Nauru
New Zealand
Oman
Panama
Peru
Papua-New-Guinea
Philippines
Pakistan
Poland
Portugal
Palaos
Paraguay
Qatar
Romania
Russia
Rwanda
Saudi Arabia
Salomon
Seychelles
Sudan
Sweden
Singapore
Slovenia
Slovakia
Sierra Leone
San Marino
Senegal
Somalia
Suriname
Sao Tome-AND-Principe
Salvador
Syria
Swaziland
Chad
Togo
Thailand
Tajikistan
Turkmenistan
Tunisia
Tonga
Turkey
Trinite-AND-Tobago
Tuvalu
Tanzania
Ukraine
Uganda
United States (the)
Uruguay
Uzbekistan
Holly See (the), OR Vatican (the)
St-Vincent-AND-the Grenadines
Venezuela
Vietnam
Vanuatu
Samoa
Yemen
South Africa
Zambia
Zimbabwe
Montenegro
Porto Rico
Serbia
Timor-Leste
Netherlands Indies
Antarctica
American Samoa
Aruba
Aland, islands
Faroe, islands
Guernesey
Greenland
Guam
Isle of Man
Jersey
Caiman, islands
Northern Mariannes, islands
Montserrat
Norfolk, island
Virgin Islands of USA
]
// Converts the string into array
StringToArray
(
s
CountryList
,
garrArrCountry
,
CR
)
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
Denunciar
0
0
BOLLER
#3
Membro registado
3.651 mensagems
Popularité : +175 (223 votes)
Publicado em dezembro, 06 2019 - 1:50 PM
CloseAssistedInput USA CRONOMETRO // TIMER
Procedure
C
loseAssistedInput
(
)
// Closes the assisted input
AssistedInputClose
(
E
DT_Search_3
)
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
Denunciar
0
0
BOLLER
#4
Membro registado
3.651 mensagems
Popularité : +175 (223 votes)
Publicado em dezembro, 06 2019 - 2:03 PM
Procedure
StringCountAscii
(
Texto
,
C
aracter
)
x
,
qtde
is int
=
0
ntotal
is int
=
Length
(
Texto
)
LOOP
(
ntotal
)
x
+
+
IF
Texto
[
[x]
] =
Charact
(
C
aracter
)
// 34 = aspa dupla //58 = : dois pontos
qtde
+
+
END
END
RESULT
qtde
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
Mensagem modificada, dezembro, 06 2019 - 2:04 PM
Denunciar
0
0
BOLLER
#5
Membro registado
3.651 mensagems
Popularité : +175 (223 votes)
Publicado em dezembro, 12 2019 - 12:23 PM
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
Denunciar
0
0
→ Voltar para WINDEV 25
WINDEV 25
Français
English
Español
Portuguesa
Fermer cette fenêtre
Tipo de Pesquisa
Apenas tópicos
Todas as mensagens
Período de pesquisa
Qualquer momento
Última hora
Últimas 24 horas
Semana passada
Mês passado
Ano passado
Cancelar
Pré-visualização da sua mensagem
Adicionar imagem
Importar uma imagem de uma URL
Enviar uma imagem a partir do seu disco
Deixe um ficheiro ou clique em "Procurar ..."
ou
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto