https://www.youtube.com/watch?v=pJqPJr0-PrU
Igor Eduardo10 horas atrásCOMENTÁRIO EM DESTAQUE
Como faço para clicar no botao colorir e ele ja deixar o cursor dentro do RTF para a pessoa ja digitar,sem ter que clicar dentro do campo?
Essa aula é para Responder a pergunta de Igor Eduardo
This class is for Answering question Igor Eduardo
http://doc.windev.com/en-US/?3025001&name=SetFocus
http://doc.pcsoft.fr/fr-FR/?3025001&name=SetFocus
Blog - WinDev - Curso String - 001/... - Zeros direita - Rigth
Blog - WinDev - Curso String - 002 - Retirar texto Bloco String
Blog - WinDev - Curso String - 003 - Tamanho das Strings - Length
Blog - WinDev - Curso String - 004 - Transformar String Base 654 Em pdf
Blog - WinDev - Curso String - 005 - Retirar Texto do Lado Esquerdo e Direito
Blog - WinDev - Curso String - 006 - Complet - Completar Strings - Remessa Banco
Blog - WinDev - Curso String - 007 - Contains - Contem
Blog - WinDev - Curso String - 008 - Tirar pontos Cnpj - Replace
Blog - WinDev - Curso String - 009 - String - Placa - LLL9999
Blog - WinDev - Curso String - 010 - StringBuild
Blog - WinDev - Curso String - 011 - StringFormat
Blog - WinDev - Curso String - 012 - StringIncrement
Blog - WinDev - Curso String - 013 - Tirando Enter Observação
Blog - WinDev - curso String - 014 - Rtf - Colorir String
Blog - WinDev - Curso String - 015 - Multilinhas Strings
Blog - WinDev - Curso String - 016 - Numeracao Campo Dim
Blog - WinDev - Curso String - 017 - Numeracao - Juntar Numeracao e Pares
Blog - WinDev - Curso String - 018 - RTF - Posicionar e Colorir
Blog - WinDev - Curso String - 019 - Array guadar e ler codigo/nome - Associative Array
Blog - WinDev - Curso String - 020 - Array - Ver Se Existe -: ..exists
Blog - WinDev - Curso String - 021 - Campo - Posicionar Campo no Final - Cursor - Setfocus
Blog - WinDev - Curso String - 022 - Cep Formatar
Blog - WinDev - Curso String - 023 - Rtf Somar Quantas Linhas
Array guadar e ler codigo/nome - Associative Array - Blog - WinDev - Curso String - 019 -
Array - Ver Se Existe -: ..exists - Blog - WinDev - Curso String - 020 -
Campo - Posicionar Campo no Final - Cursor - Setfocus - Blog - WinDev - Curso String - 021 -
Blog - WinDev - Curso String - 022 - Cep Formatar
Completar Strings - Remessa Banco- Blog - WinDev - Curso String - 006 - Complet -
Contem - Blog - WinDev - Curso String - 007 - Contains -
Multilinhas Strings - Blog - WinDev - Curso String - 015 -
Numeracao Campo Dim - Blog - WinDev - Curso String - 016 -
Numeracao - Juntar Numeracao e Pares - Blog - WinDev - Curso String - 017 -
Placa - LLL9999 - Blog - WinDev - Curso String - 009 - String -
Retirar texto Bloco String - Blog - WinDev - Curso String - 002 -
Retirar Texto do Lado Esquerdo e Direito - Blog - WinDev - Curso String - 005 -
Rtf - Colorir String - Blog - WinDev - curso String - 014 -
RTF - Posicionar e Colorir - Blog - WinDev - Curso String - 018 -
Rtf Somar Quantas Linhas - Blog - WinDev - Curso String - 023 -
StringBuild - Blog - WinDev - Curso String - 010 -
StringFormat - Blog - WinDev - Curso String - 011 -
StringIncrement - Blog - WinDev - Curso String - 012 -
Tamanho das Strings - Length - Blog - WinDev - Curso String - 003 -
Tirando Enter Observação - Blog - WinDev - Curso String - 013 -
Tirar pontos Cnpj - Replace - Blog - WinDev - Curso String - 008 -
Transformar String Base 654 Em pdf - Blog - WinDev - Curso String - 004 -
Zeros direita - Rigth - Blog - WinDev - Curso String - 001/... -
n_tamanho_cnpj_i,n_tamanho_cnpj_f,n_tamanho_inscricao_est_i,n_tamanho_inscricao_est_f is int=0
s_texto is string="Cnpj:"
n_tamanho_cnpj_i=Length(s_texto)
s_texto+="92.715.978.0001-58 "
n_tamanho_cnpj_f=Length(s_texto)
s_texto+=CR+"Insc.Est: "
n_tamanho_inscricao_est_i=Length(s_texto)
s_texto+="Isento"
n_tamanho_inscricao_est_f=Length(s_texto)
s_texto+=CR+"======================"
EDT_RTF_Text=s_texto
EDT_RTF_Text..Cursor=n_tamanho_cnpj_i
EDT_RTF_Text..CursorEnd=n_tamanho_cnpj_f
RTFSelection(EDT_RTF_Text,rtfColor,LightBlue)
EDT_RTF_Text..Cursor=n_tamanho_inscricao_est_i
EDT_RTF_Text..CursorEnd=n_tamanho_inscricao_est_f
RTFSelection(EDT_RTF_Text,rtfColor,LightMagenta)
//No Final das Linhas vou Digitar
n_inicio_digitacao is int=Length(EDT_RTF_Text)
//Agora é o segredo
EDT_RTF_Text..Cursor=n_inicio_digitacao+1
SetFocus(EDT_RTF_Text)
//No Final das Linhas vou Digitar
n_inicio_digitacao is int=Length(EDT_RTF_Text)
//Agora é o segredo
EDT_RTF_Text..Cursor=n_inicio_digitacao+1
SetFocus(EDT_RTF_Text)
