Mascara para números

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

Paulo_CPV
Usuário Nível 3
Usuário Nível 3
Mensagens: 178
Registrado em: 07 Mar 2013 10:27
Localização: Jacarei/SP

Mascara para números

Mensagem por Paulo_CPV »

Bom dia!

Alguém sabe como colocar a mascara de número em milhões em controle LABEL? No formato:

999.999.999,99

Estou utilizando o comando TRANSFORM o resultado que está aparecendo para mim é somente *.

Abraços,

Paulo
Jacareí/SP
Avatar do usuário
Toledo
Administrador
Administrador
Mensagens: 3133
Registrado em: 22 Jul 2003 18:39
Localização: Araçatuba - SP
Contato:

Mascara para números

Mensagem por Toledo »

Amigo, segue um pequeno exemplo:

Código: Selecionar todos

#include "minigui.ch"

Function Main
Local nValor:=1234567.89
Local cValor:=Transform(nValor,"@E 999,999,999.99")

	DEFINE WINDOW Form_Main ;
		AT 0,0 ;
		WIDTH 400 HEIGHT 200 ;
		TITLE 'Exemplo LABEL' ;
		MAIN 

		@ 10,10 BUTTONEX BUTTON_1 ;
			CAPTION "Clique... Mostrar Label" ;
			ACTION {|| Form_Main.Label_1.Value:=cValor } ;
			WIDTH 150 ;
			HEIGHT 25

		@ 50,10 LABEL Label_1 ;
			WIDTH 120 HEIGHT 20 ;
			VALUE "LABEL texto normal..."

	END WINDOW

	CENTER WINDOW Form_Main

	ACTIVATE WINDOW Form_Main

Return Nil
Abraços,
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
Paulo_CPV
Usuário Nível 3
Usuário Nível 3
Mensagens: 178
Registrado em: 07 Mar 2013 10:27
Localização: Jacarei/SP

Mascara para números

Mensagem por Paulo_CPV »

Boa tarde, Toledo!

Obrigado pela diga, agora funcionou certinho.

Abraços,

Paulo
Jacareí/SP
Responder