Registro Do Windows

[ppgsalomao]

Como faz para adicionar e gerenciar informações do registro do windows ?

Ou seja, como faz para adicionar e recuperar informações do registro ?

Valeu !

[Bicicleta]

Dá uma lida aqui: VB - Manipulando o registro do Windows

Eu vi se não me engano no site da vbaccelerator (www.vbaccelerator.com - se não me engano), uma parada que dá pra você ler qualquer chave do registro do windows, só não tenho a URL!!!

[]s

[ppgsalomao]

Outra pergunta, meio que quase nada a ver:

Como eu faço para tratar um erro do Common Dialog Control que é o seguinte:

Quando um usuário clica em cancelar numa Janela de Diálogo gerada pelo Common Dialog Control, ele dá um erro do VB !

Como eu faço para saber se o usuário clico em cancelar ?

[Graymalkin]

Faça o seguinte:

err.Clear
On Error Resume Next
'método do commondialog (showOpen, showSave, etc.)
if err.number=cdlcancel then
  msgbox "O usuário pressionou Cancelar"
endif
On Error Goto 0

Abraços,

Graymalkin

[ppgsalomao]

Fala GrayMalkin !!

Eu tentei mas não deu certo ... ele nem muda a fonte quando eu clico OK nem mostra a MsgBox quando eu clico cancelar !!

Meu código:

Private Sub mnuFonte_Click()

dlg1.Flags = &H1

Err.Clear

On Error Resume Next

    dlg1.ShowFont

If Err.Number = 32755 Then

    MsgBox "O usuário pressionou Cancelar"

Else

    txtConteudo(0).FontName = dlg1.FontName

    txtConteudo(0).FontBold = dlg1.FontBold

    txtConteudo(0).FontItalic = dlg1.FontItalic

    txtConteudo(0).FontSize = dlg1.FontSize

    txtConteudo(0).FontStrikethru = dlg1.FontStrikethru

    txtConteudo(0).FontUnderline = dlg1.FontUnderline

   

    txtConteudo(1).FontName = dlg1.FontName

    txtConteudo(1).FontBold = dlg1.FontBold

    txtConteudo(1).FontItalic = dlg1.FontItalic

    txtConteudo(1).FontSize = dlg1.FontSize

    txtConteudo(1).FontStrikethru = dlg1.FontStrikethru

    txtConteudo(1).FontUnderline = dlg1.FontUnderline

End If

On Error GoTo 0

End Sub

[ppgsalomao]

valeu Gente,

Mas acabei que entendi a lógica e conseguir arrumar !! Falow !

[William Rodrigues]

Beleza..

E qualquer coisa é só nos dar um toque beleza

Abraços,

William Rodrigues