CHECKBOX TRANSPARENTE
Alguem conhece algum user control ou componente que faca um checkbox ficar transparante. O label tem a propriedade styleborde (opaco e transparent).
Alguem conhece algo que faca o mesmo com o checkbox.
Alguem conhece algo que faca o mesmo com o checkbox.
Aqui tem um o
CHECKBOX TRANSPARENTE
Espero ter ajudado..
Não se esqueça de finalizar o TÓ“PICO.
CHECKBOX TRANSPARENTE
Espero ter ajudado..
Não se esqueça de finalizar o TÓ“PICO.
Ops.
Valeu Germanir procurei em tudo que é lugar e esqueci daqui..[S51]
E a rotina é do paganini, to bem servido.
Esta dando a seguinte mensagem quando incluo no projeto
selectbox can not be public in the type project the item has been changed to private.
O check funciona mais porque a mensagem ????
Valeu Germanir procurei em tudo que é lugar e esqueci daqui..[S51]
E a rotina é do paganini, to bem servido.
Esta dando a seguinte mensagem quando incluo no projeto
selectbox can not be public in the type project the item has been changed to private.
O check funciona mais porque a mensagem ????
Tradução (Desculpe erros)
a sub ou function 'selectbox não pode ser PÃÅ¡BLICA e foi mudada para PRIVADA'
se ainda continuar a aparecer a mensagem, localize a sub SELECTBOX e em vez de
PUBLIC SELECTBOX
coloque
PRIVATE SELECTBOX
[txt-color=#ff0000]Espero ter ajudado..
Não se esqueça de finalizar o TÓ“PICO.[/txt-color]
a sub ou function 'selectbox não pode ser PÃÅ¡BLICA e foi mudada para PRIVADA'
se ainda continuar a aparecer a mensagem, localize a sub SELECTBOX e em vez de
PUBLIC SELECTBOX
coloque
PRIVATE SELECTBOX
[txt-color=#ff0000]Espero ter ajudado..
Não se esqueça de finalizar o TÓ“PICO.[/txt-color]
Estou dando uma olhada nela.
Peguei um erro, quando voce coloca enable = false ela da um erro de atribuicao. Acertei mais ela nao tem efeito de desabilitação (cor mais fraca).
Alguem usa ela em producao. Estou um pouco preocupado
, mais fuçando[S29]
Peguei um erro, quando voce coloca enable = false ela da um erro de atribuicao. Acertei mais ela nao tem efeito de desabilitação (cor mais fraca).
Alguem usa ela em producao. Estou um pouco preocupado
, mais fuçando[S29]
Vou ver agora ela pra vc.. espere..
Claudio
Tu pode usar um CheckBox com Caption = "" e uma Label ao lado, não vai ter que inserir outro Activex nem distribuir e o efeito deve ser o mesmo.
[s92]
Tu pode usar um CheckBox com Caption = "" e uma Label ao lado, não vai ter que inserir outro Activex nem distribuir e o efeito deve ser o mesmo.
[s92]
A solução do KPELLAJR é bem prática, então vai uma sugestão, coloque um evento no click do label para modificar o valor do check...
Não é que é...... se vc estiver querendo um CHECKBOX transparente é bem mais prático... vc.. usar o caption = "" (sem o caption)......
[txt-color=#ff0000]mas detalhe... vc vai ter que MUDAR o HEIGHT E WIDTH......... PARA não aparecer o fundo...... no meu exemplo eu coloquei.. os dois para 200[/txt-color]
Atééé..
[txt-color=#ff0000]mas detalhe... vc vai ter que MUDAR o HEIGHT E WIDTH......... PARA não aparecer o fundo...... no meu exemplo eu coloquei.. os dois para 200[/txt-color]
Atééé..
Ja tinha pensado nisso o problema é que quando tenho muito check vai complicar pois terei omesmo numero de label. Tenho uma configuração com 33 check (cruzes) . Ai terei 66 itens contando com label.
Corrigi o ctl, agora nao da mais problema. Tenho medo de usar e depois pegar outro bug pois o sistema ja esta rodando e so estou fazendo fluflu.
Quem quizer corriguir o bug basta colocar no Timer_Timer as seguites linhas em negrito.
lRtn = GetWindowRect(UserControl.hwnd, R)
' Get the cursor position on the screen
GetCursorPos pt
' Determine if point coordinates within our rectangle
lRtn = PtInRect(R, pt.x, pt.y)
If UserControl.Enabled = False Then
Exit Sub
End If
Corrigi o ctl, agora nao da mais problema. Tenho medo de usar e depois pegar outro bug pois o sistema ja esta rodando e so estou fazendo fluflu.
Quem quizer corriguir o bug basta colocar no Timer_Timer as seguites linhas em negrito.
lRtn = GetWindowRect(UserControl.hwnd, R)
' Get the cursor position on the screen
GetCursorPos pt
' Determine if point coordinates within our rectangle
lRtn = PtInRect(R, pt.x, pt.y)
If UserControl.Enabled = False Then
Exit Sub
End If
é verdade, é um RISCO que vc tem que correr.. pelo que vi.... este CONTROLE é muit INSTà ÂVEL!!
Você pode ter problemas futuros......
Ponha na balança e veja o que será melhor...
Você pode ter problemas futuros......
Ponha na balança e veja o que será melhor...
Tópico encerrado , respostas não são mais permitidas