Clipper On Line • Ver Tópico - CHECKBOX

CHECKBOX

Discussão sobre a biblioteca Fivewin - O Clipper para Windows.

Moderador: Moderadores

 

CHECKBOX

Mensagempor 09466261000176 » 22 Dez 2015 08:34

Olá amigos, estou querendo usar checkbox em TXBROWSE. Alguém tem algum exemplo pronto para me mostrar aqui? Obrigado!
Avatar de usuário

09466261000176
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 39
Data de registro: 19 Mar 2014 15:50
Cidade/Estado: lorena sp
Curtiu: 0 vez
Mens.Curtidas: 0 vez

CHECKBOX

Mensagempor Kapiaba » 22 Dez 2015 09:44

Kapiaba
Colaborador

Colaborador
 
Mensagens: 1483
Data de registro: 07 Dez 2012 15:14
Cidade/Estado: São Paulo
Curtiu: 284 vezes
Mens.Curtidas: 90 vezes

CHECKBOX

Mensagempor 09466261000176 » 23 Dez 2015 14:16

Usei este exemplo e não funcionou

Olha como eu implemento

*Browse
oDB_AGENDA := TXBrowse():New( oDld_CAD_AGENDAMENTO )
oDB_AGENDA:cAlias := 'agenda'
oDB_AGENDA:bKeyDown :={|nKey| IF(nkey=13,( T_ID_AGENDA:=agenda->ID_AGENDA, ),) }
oDB_AGENDA:bChange :={|| T_ID_AGENDA:=agenda->ID_AGENDA,T_CPF_ALUNO:=agenda->CPF_ALUNO,CARREGAR_DADOS_AGENDAMENTO() }
oDB_AGENDA:bLDblClick :={|| T_ID_AGENDA:=agenda->ID_AGENDA,T_CPF_ALUNO:=agenda->CPF_ALUNO,CARREGAR_DADOS_AGENDAMENTO() }
oDB_AGENDA:nMarqueeStyle := MARQSTYLE_HIGHLROW
oDB_AGENDA:nColDividerStyle := LINESTYLE_BLACK
oDB_AGENDA:nRowDividerStyle := LINESTYLE_BLACK
oDB_AGENDA:lColDividerComplete := .F.
oDB_AGENDA:lFooter := .T.
oDB_AGENDA:lRecordSelector := .T.
oDB_AGENDA:nHeaderLines := 1.0
oDB_AGENDA:nDataLines := 1.0
oDB_AGENDA:bClrStd := {|| { CLR_BLACK, IIF((agenda->(ORDKEYNO()))%2==0, rgb(168,211,255), rgb(255,255,255) )}}
oDB_AGENDA:bClrSelFocus := {|| { CLR_WHITE, CLR_BLUE } }
*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------
oCol := oDB_AGENDA:AddCol()
oCol:bStrData := { || agenda->PLACA_VEICULO }
oCol:cHeader := "Placa"
oCol:nDataStrAlign := AL_LEFT
oCol:nHeadStrAlign := AL_LEFT
*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------
oCol := oDB_AGENDA:AddCol()
oCol:bStrData := { || DTOC(agenda->DATA_AGENDAMENTO) }
oCol:cHeader := "Data"
oCol:nDataStrAlign := AL_LEFT
oCol:nHeadStrAlign := AL_LEFT

Seu exemplo

oDB_AGENDA:oCol( "Exist" ):SetCheck( { "GREEN", "RED" }, .t. )

coloco e diz que SetCheck não existe
Avatar de usuário

09466261000176
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 39
Data de registro: 19 Mar 2014 15:50
Cidade/Estado: lorena sp
Curtiu: 0 vez
Mens.Curtidas: 0 vez




Retornar para FiveWin

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 1 visitante


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
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro