Boa tarde Augusto Volto a insistir no SalTblSetContext.... Tente, antes da conta, setar o contexto.... Exemplo: Column: colValorRateio
Message Actions
On SAM_AnyEdit
Call SalTblSetContext( tblXXX, nLinhaXXX ou
lParam )
Set colPercentualRateio = fDivisao(
colValorRateio, fGetValorDocto( ) ) * 100
On SAM_Validate
Return fValidarValorRateio( )
Faca esse teste, ok
Rafael Pereira Larizzatti
Analista Desenvolvedor Centura
Thales Informática Ltda
GE Healthcare
[EMAIL PROTECTED]
________________________________
De: [EMAIL PROTECTED] em nome de Augusto
Enviada: ter 22/7/2008 11:07
Para: sqlwin@virtualand.net
Assunto: RES: [sqlwin] Erro usuando VisTblSetCellColor
A alteração da cor é feita no SAM_Create das colunas e depois não mexo mais com
isso. O problema é o SAM_AnyEdit que para de funcionar.
-----Mensagem original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Em nome de Fernando Simonetti
Enviada em: terça-feira, 22 de julho de 2008 09:07
Para: sqlwin@virtualand.net
Assunto: RES: [sqlwin] Erro usuando VisTblSetCellColor
Mande um salpostmsg para a coluna ou tabela e processe a alteração de cor nela.
Nunca tentei mas deve funcionar.
-----Mensagem original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] nome de Augusto
Enviada em: terça-feira, 22 de julho de 2008 08:04
Para: sqlwin@virtualand.net
Assunto: RES: [sqlwin] Erro usuando VisTblSetCellColor
Bom dia Rafael;
No meu caso, eu estou com o focus na linha que deve ser alterada. Veja
abaixo como é o código:
Column: colPercentualRateio
Message Actions
On SAM_AnyEdit
Set colValorRateio = fDivisao(
colPercentualRateio, 100 ) * fGetValorDocto( )
On SAM_Validate
Return fValidarPercentual( )
Column: colValorRateio
Message Actions
On SAM_AnyEdit
Set colPercentualRateio = fDivisao(
colValorRateio, fGetValorDocto( ) ) * 100
On SAM_Validate
Return fValidarValorRateio( )
O detalhe é que se eu não utilizar a função "VisTblSetCellColor" para
alterar a cor da fonte, tudo funciona corretamente.
Call VisTblGetColColor( hWndForm, SalTblQueryColumnID( hWndItem ),
nForeground, nBackground )
Call VisTblSetColFont( hWndForm, SalTblQueryColumnID( hWndItem ),
FONT_EnhBold )
Call VisTblSetColColor( hWndForm, SalTblQueryColumnID( hWndItem ),
COLOR_Blue, nBackground )
Call VisTblPaint( hWndForm )
-----Mensagem original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Em nome de Thales,
Rafael (GE Healthcare, consultant)
Enviada em: segunda-feira, 21 de julho de 2008 16:34
Para: sqlwin@virtualand.net
Assunto: RE: [sqlwin] Erro usuando VisTblSetCellColor
Boa tarde Augusto.
Não sei se esse é o caso, mas antes de utilizar qualquer função para
alterar valor de célula, utilize a SalTblSetContext para setar a "linha
corrente".
Se você não souber o número da linha corrente, pode utilizar a variável
lParam, contanto que vc não a utilize alterando seu valor dentro de seu código.
Espero ter ajudado.
[]´s
Rafael Pereira Larizzatti
Analista Desenvolvedor Centura
Thales Informática Ltda
GE Healthcare
[EMAIL PROTECTED]
________________________________
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Augusto
Sent: Monday, July 21, 2008 4:08 PM
To: sqlwin@virtualand.net
Subject: [sqlwin] Erro usuando VisTblSetCellColor
Boa tarde a todos,
Estou usando a função VisTblSetCellColor para alterar a cor da fonte de
uma coluna, mais eu uso o SAM_AnyEdit para atualizar o valore de uma coluna na
mesma linha e ele esta ficando maluco. Atualiza uma coluna em outra linha ou
simplesmente não faz nada.
Alguém que utiliza essa função já teve algum problema assim?
Agradeço qualquer ajuda.
<<winmail.dat>>
