-
Total de itens
8.257 -
Registro em
-
Última visita
Tudo que Graymalkin postou
-
Quando for assim, poste a mensagem de erro ao invés do número. Nesse caso, o problema, pelo que pude perceber, é que ou a tabela está vazia, ou o registro atual foi apagado. Abraços, Graymalkin
-
Dê uma olhada neste post: http://scriptbrasil.com.br/forum/index.php?showtopic=31417 Lá tem um código para criptografar e descriptografar (basta adaptar para a leitura e escrita em arquivos). Abraços, Graymalkin
-
Experimente usar... Me.Hide ... ao invés de... Unload Me ... e veja se dá certo. Note que você pode estar tentando executar algo que está no form, porém antes você manda descarregá-lo (unload), ou seja, você está mandando ele executar algo em um form que não existe mais. Abraços, Graymalkin
-
Mas e a criação dos objetos...? Com o CreateObject...? A declaração dos tipos...? Graymalkin
-
Dê uma olhada nestes posts: http://scriptbrasil.com.br/forum/index.php?showtopic=45507 http://scriptbrasil.com.br/forum/index.php?showtopic=45574 http://scriptbrasil.com.br/forum/index.php?showtopic=39408 http://scriptbrasil.com.br/forum/index.php?showtopic=38055 Sempre faça um busca no fórum antes de postar, ok? Abraços, Graymalkin
-
Instalando o Office 2003. O seu então deve ser o Office 2000, certo? Acho que a lista é: Office 97 = 8.0 Office 2000 = 9.0 Office XP = 10.0 Office 2003 = 11.0 Certo? Graymalkin
-
Que papo chato este hein Hehehehe... . Abraços, Graymalkin
-
Por que você não usa um outro form só para a imagem e faz com que o mesmo se movimente pela tela? Abraços, Graymalkin
-
Ué? Qual a versão do Access referenciada (no menu Project -> References)? O meu aqui é o 11.0 Abraços, Graymalkin
-
Eu ia sugerir esse, mas como ele é praticamente a mesma coisa que o evento Click, pensei que não iria servir. Abraços, Graymalkin
-
Nessa parte aqui... If Resp = 6 Then unload me cadastro.show Else ... inverta para... If Resp = 6 Then cadastro.show unload me Else ... e veja se dá certo. Abraços, Graymalkin
-
Seria bom se você postasse os códigos utilizados em cada um dos eventos citados e a ordem em que eles são executados. Acho que ficaria mais claro. Abraços, Graymalkin
-
Dê uma olhada neste outro post: http://scriptbrasil.com.br/forum/index.php?showtopic=50446 Abraços, Graymalkin
-
Então use o evento Click. Nele você pega automaticamente. Ou você precisa, realmente, utilizar o MouseDown? Abraços, Graymalkin
-
Ah, mas sem problemas. Você pode continuar usando o ADO mesmo, se preferir. Mas, no caso do código que você está tentando usar, poste ele completo aqui para podermos avaliar melhor. No site do Tio Macoratti (http://www.macoratti.net/) tem bastante coisa legal sobre ADO.NET. Dê uma pesquisada lá. Abraços, Graymalkin
-
Não, somente aqueles. Para ter uma idéia mais clara, adicione um Class Module a um projeto vazio e coloque a seguinte declaração nele: Public Event MeuEvento(ByVal descrição As String, ByVal número As Integer) Depois, vá no form e coloque o seguinte no General Declarations: Dim WithEvents MeuObjeto As Class1 Em seguida, escolha o item "MeuObjeto" na mesma listbox (da tela de código) onde você escolhe o form, botões, listboxes, etc. (repare que ele aparecerá lá após o código acima). Você então terá a seguinte declaração automaticamente: Private Sub MeuObjeto_MeuEvento(ByVal descrição As String, ByVal número As Integer) End Sub Em algum ponto dentro da classe, esse evento poderá ser chamado da seguinte maneira: RaiseEvent MeuEvento("descrição", 100) E serão exatamente estes valores ("descrição" e 100) que você haverá de encontrar nos argumentos do evento (MeuObjeto_MeuEvento). Certo? Graymalkin
-
Dê uma olhada no exemplo: http://www.graymalkin.globalhosts.com.br/stuff/Bitblt.zip Abraços, Graymalkin
-
Use a propriedade SelectedItem. Abraços, Graymalkin
-
Nada. Se houvesse algum argumento ali, ele já apareceria automaticamente. Eles estão ali apenas para indicar que não existe nenhum argumento passado (vide a resposta acima). Tomemos, por exemplo, a declaração do evento MouseMove, a saber: Private Sub List1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Note que dentro dos parênteses você tem quatro argumentos: Button, Shift, X e Y. Quando você usa o evento MouseMove, você poderá querer saber qual botão do mouse o usuário está clicando ao "mover o mouse", para isso existe o argumento Button; ou se ele está pressionando a tecla shift enquanto "move o mouse", para isso o argumento Shift; ou ainda qual a posição em que ele está atualmente enquanto "move o mouse" sobre o controle, parar isso os argumentos X (posição horizontal) e Y (posição vertical). Sacou? Abraços, Graymalkin
-
Bom, nem tentei fazer o exemplo com o FindWindow: descobri que estamos quebrando nossas cabeças à toa... hehehehe. O último parâmetro do OpenCurrentDatabase é utilizado justamente para passar a senha (note o nome dele: bstrPassword). Por isso, basta utilizar: .OpenCurrentDatabase CurDir & "\BancaJornal1.mdb", False, "senha" E não precisa de esquema nenhum para digitar a senha. Certo? Graymalkin
-
Não sei se mudou no Delphi 8, mas no 7 é só colocar... form_cadastro_cliente.show; ... no evento OnClick do botão desejado. Certo? Graymalkin
-
Pelo que vi você continua a usar o ADO no VB.NET? Por que não usa o ADO.NET? No post http://scriptbrasil.com.br/forum/index.php?showtopic=50297 o Natan dá um exemplo em C# utilizando ADO.NET (bastante "adaptável" ao VB.NET). Abraços, Graymalkin
-
Ok, vou ver se consigo e depois te dou um retorno. Abraços, Graymalkin
-
Sim, é uma ótima idéia. Para isso existem as APIs FindWindow e FindWindowEx. Vou ver se faço um exemplo aqui pra ti. Até, Graymalkin
-
Veja o que encontrei: http://blogs.msdn.com/csharpfaq/archive/20...3/11/87816.aspx É uma lista das vantagens do C# sobre o VB.NET e vice-versa. A peculiaridade de que menciono no meu post anterior é comentada superficialmente nesta página também (porém sobre outro ponto de vista). Abraços, Graymalkin