-
Total de itens
8.257 -
Registro em
-
Última visita
Tudo que Graymalkin postou
-
Você pode colocar um componente CommonDialogs (clicando em "Mais controles" na barra de controles) e depois usar o seguinte código (dentro do evento Click do botão): CommonDialog1.CancelError = True CommonDialog1.Filter = "Apresentação do PowerPoint|*.ppt" Err.Clear On Error Resume Next CommonDialog1.ShowSave If Err.Number = 0 Then ActivePresentation.SaveAs CommonDialog1.FileName End If On Error GoTo 0 Sendo que eu não sei se as "respostas" serão salvas, já que eu não uso PowerPoint. Abraços, Graymalkin PS: Movido para VBA.
-
De posse dos valores de 0 até 9, de 10 até 19 e das dezenas (20, 30, 40, 50, ..., 90) é só analisar o número e juntar as palavras. Usando um dicionário fica fácil de se fazer isso. Abraços, Graymalkin
-
Acredito que seja mais simples você ler as linhas (se não forem muitas) e daí mostrar especificamente a que você quer: linhas = file("c:/arquivo.txt", "r").readlines() print linhas[2] Certo? ;) Graymalkin
-
O problema é que Find *não* é um método, e sim uma propriedade. Para executar mesmo é o método Execute() desta propriedade. Veja um código de exemplo: Type tipoWord = Type.GetTypeFromProgID("Word.Application"); Type tipoDocuments, tipoSelection, tipoFind; object winword = Activator.CreateInstance(tipoWord); object Documents, Selection, Find; Documents = tipoWord.InvokeMember("Documents", BindingFlags.GetProperty, null, winword, new Object[] {}); tipoDocuments = Documents.GetType(); tipoDocuments.InvokeMember("Add", BindingFlags.InvokeMethod, null, Documents, new Object[] {}); Selection = tipoWord.InvokeMember("Selection", BindingFlags.GetProperty, null, winword, new Object[] {}); tipoSelection = Selection.GetType(); tipoSelection.InvokeMember("TypeText", BindingFlags.InvokeMethod, null, Selection, new Object[] {"um $nome$ e outro teste"}); tipoSelection.InvokeMember("HomeKey", BindingFlags.InvokeMethod, null, Selection, new Object[] { 6 }); Find = tipoSelection.InvokeMember("Find", BindingFlags.GetProperty, null, Selection, new Object[] {}); tipoFind = Find.GetType(); tipoFind.InvokeMember("Text", BindingFlags.SetProperty, null, Find, new object[] { "$nome$" }); tipoFind.InvokeMember("Execute", BindingFlags.InvokeMethod, null, Find, new Object[] {}); tipoWord.InvokeMember("Visible", BindingFlags.SetProperty, null, winword, new object[] {true}); Certo? ;) Graymalkin
-
Qual é, exatamente, a sua dúvida? Abraços, Graymalkin
-
Iguais aos do Clipper, né? Realmente são ótimos! :) Bom, um form só com botões tem o foco alterado pelas setas direcionais. No caso do sub-menu você poderia utilizar outros forms da mesma maneira. Sendo que, na minha opinião, um menu convencional do Windows é bem mais prático e também é utilizável pelo teclado. Abraços, Graymalkin
-
Se você quiser passar o seu projeto eu posso dar uma olhada e tentar descobrir o que está errado. Meu e-mail é: wap@openlink.com.br Abraços, Graymalkin
-
Proposta De Tradução
pergunta respondeu ao Hailton de Graymalkin em Outras Linguagens de Programação
Eles responderam... .... ou seja, infelizmente, a gente não pode fazer a tradução. Abraços, Graymalkin -
Impressão Condensada Na Jato De Tinta
pergunta respondeu ao Ivan Xavier de Graymalkin em Visual Basic
O que você usa para imprimir? O objeto Printer? Se for, não seria só diminuir a fonte e colocá-la em negrito? (Se me lembro bem, o condensado é assim). Abraços, Graymalkin -
Não, e nem o contrário dela (atoi()) faz isso. Você teria que fazer os cálculos igual a gente faz na mão (você poderia criar uma função para isso). Abraços, Graymalkin
-
Isso já passou aqui no fórum. Experimente fazer uma busca. Abraços, Graymalkin
-
A descrição e utilização destes métodos você encontra no help do VBA do Word, sendo que o jeito mais prático de utilizá-los é, no próprio Word, gravando uma macro fazendo exatamente o que você quer e depois indo no Editor do VBA (ALT+F11) e vendo o código gerado. Daí, é só adaptar. Abraços, Graymalkin
-
De nada. :) Nós ajudamos no que podemos. E, se você está iniciando na programação agora, sugiro a você dar uma estudada sobre lógica de programação (aliás, temos uma sala para isso). Abraços, Graymalkin
-
Em C# tanto faz você usar object ou Object (sendo System.Object o nome real deste último), já que eles são a mesma coisa. A diferença na utilização é em como chamar os métodos e propriedades deste, e é justamente isso que o artigo mostra. Enquanto em VB.NET você pode fazer... objWord.Documents.Open("e:\teste\teste.doc") ... em C# a mesma linha seria algo como (baseada nos objetos do artigo): tipoDocuments.InvokeMember("Open", BindingFlags.InvokeMethod, null, Documents, new Object[[]] {"e:/teste/teste.doc"}); Isso porque C# não tem o recurso de late-binding. Abraços, Graymalkin
-
MdiChildren é uma coleção, portanto seus elementos podem ser acessados via índice (MdiChilren(0), MdiChildren(1), etc.) ou através de um For Each: For Each janela As Form In Me.MdiChildren MessageBox.Show(janela.Name) Next janela Certo? ;) Graymalkin
-
Logo abaixo da linha "Inherits ..." você pode declarar esse objeto, porém você deverá utilizar o nome da classe (o nome da classe é "atendimento"?). Exemplo: dim x as new atendimento() Supondo que "atendimento" é o nome da classe e que "x" será o objeto a ser utilizado. Sendo que sem saber como você fez essa classe e onde ela está fica difícil dizer se o código acima vai ser válido no seu caso. Abraços, Graymalkin
-
E naquela tela de splash (quando você abre o VB)? Aparece algo como "Enterprise Edition", "Standard Edition", etc.? Pergunto isso porque existe uma versão acadêmica que acredito que não permita gerar o executável. Abraços, Graymalkin
-
Dê uma olhada neste tutorial que escrevi: http://www.onmasters.com.br/?area=ler_arti...os&artid=61 Acredito que ele vá te ajudar a fazer isso. Abraços, Graymalkin
-
Assim: import sys sys.exit(0) Abraços, Graymalkin
-
Como Faço Para Saber Qual O Tipo De Dado De Um Campo Do Bd?
pergunta respondeu ao Patrick Coelho de Graymalkin em ASP
Se você usa ADO para abrir o banco, veja se o código abaixo resolve o caso: For Each campo In rs.Fields Response.Write campo.Name & " -> " & campo.Type Next campo Abraços, Graymalkin -
A identação está irregular, não? E a qual "segundo if" você se refere? Abraços, Graymalkin
-
Se você utiliza Windows, dê uma olhada no WCurses: http://adamv.com/dev/python/curses/ E se você não precisar de nada sofisticado, você pode usar o módulo msvcrt também: import msvcrt def LerSenha(tamanho=4): retorno = "" print "Senha:" while len(retorno)<tamanho: letra = msvcrt.getch() msvcrt.putch("*") retorno += letra return retorno digitada = LerSenha(4) print "\nSenha digitada: %s" % digitada Abraços, Graymalkin
-
Onde o objeto (ou classe?) "atendimento" é declarado? Abraços, Graymalkin
-
Você pode usar o módulo curses que acompanha Python. Particularmente eu nunca usei, mas você vai encontrá-lo na documentação oficial da linguagem. Abraços, Graymalkin
-
Qual a versão do seu VB6? Graymalkin