Clipper On Line • Ver Tópico - como alterar a CAPTION em execução?

como alterar a CAPTION em execução?

Projeto HwGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

 

como alterar a CAPTION em execução?

Mensagempor Fernando queiroz » 09 Nov 2017 09:43

tenho a seguinte tela e quero alterar a CAPTION do oLabel2 quando for alterada a data no dDatepicker1.

@ 100,59 GET DATEPICKER oDatepicker1 VAR dDatepicker1 SIZE 183,40 ;
FONT HFont():Add( 'Verdana',0,-21,700,,,) ;
ON CHANGE {|| oDatepicker1_onChange( ) }

@ 23,108 SAY oLabel2 CAPTION "" SIZE 341,26 ;
STYLE SS_CENTER ;
FONT HFont():Add( 'Verdana',0,-16,400,,,)

estou fazendo assim mas nao esta funcionando

STATIC FUNCTION oDatepicker1_onChange

M->SEM_ANA := "DomingoSegundaTerca Quarta Quinta Sexta Sábado "
M->DIA_EXT := TRIM( SUBS( M->SEM_ANA, DOW( dDatepicker1 ) * 7 - 6 , 7 ) ) +;
", " + ALLTRIM( STR (DAY( dDatepicker1 ), 2 ) )
M->ME_SES := "Janeiro FevereiroMarço Abril Maio Junho " +;
"Julho Agosto Setembro Outubro Novembro Dezembro "
M->DIA_EXT += " de " + TRIM( SUBS( ME_SES, MONTH( dDatepicker1 ) * 9 - 8 , 9 ) ) +;
" de " + TRAN( YEAR( M->DAT_HOJE ), "@E 9999" )
M->DIA_EXT += " de " + TRIM( SUBS( ME_SES, MONTH( dDatepicker1 ) * 9 - 8 , 9 ) ) + " de " + TRAN( YEAR( dDatepicker1 ), "@E 9999" )
Thisform:oLabel2:Title :=M->DIA_EXT
Thisform:oLabel2:Release()
RETURN .T.

Alguem da uma dica de onde esta o erro?

ja tentei assim Thisform:oLabel2:Caption :=M->DIA_EXT mas da erro de execução
HARBOUR 3.2, HWGUI 2.23 B3, SEFAZCLASS, PDFClass, ADO + MariaDB/MySQL, RMChart
Fernando queiroz
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 737
Data de registro: 12 Nov 2014 23:41
Cidade/Estado: Porto Alegre/RS
Curtiu: 12 vezes
Mens.Curtidas: 58 vezes

como alterar a CAPTION em execução?

Mensagempor ANDRIL » 09 Nov 2017 09:54

Tenta:

Thisform:oLabel2:setText(M->DIA_EXT)
Até+
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
Avatar de usuário

ANDRIL
Usuário Nível 5

Usuário Nível 5
 
Mensagens: 1270
Data de registro: 06 Jul 2004 00:44
Curtiu: 12 vezes
Mens.Curtidas: 46 vezes

como alterar a CAPTION em execução?

Mensagempor Fernando queiroz » 09 Nov 2017 10:16

:D :D :{ :{ :{ :{
Valeu muito obrigado
HARBOUR 3.2, HWGUI 2.23 B3, SEFAZCLASS, PDFClass, ADO + MariaDB/MySQL, RMChart
Fernando queiroz
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 737
Data de registro: 12 Nov 2014 23:41
Cidade/Estado: Porto Alegre/RS
Curtiu: 12 vezes
Mens.Curtidas: 58 vezes




Retornar para HwGui

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 7 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro